object TGBReport HeaderStringCount = 4 ShouldCopyDataSet = True PaperSize = A4 DataSetName = 'Goodies' Landscape = False InPixels = True LeftMargin = 10 RightMargin = 15 TopMargin = 10 BottomMargin = 20 RepWidth = 100 RepHeight = 100 object Title: TGBRepBand Color = 13421772 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = 'Arial' Font.Style = [] BandHeight = 40 ShouldCopyDataSet = True IniIndirectFields = '"F1=IIF((pos(User(),Firm.Heap.@SUsers)=0) and (Id.Logs[ActionNam' + 'e='#39'P'#39'].Count>0),Exception('#39'Этот документ уже напечатали!'#39'),0)";' DataSetName = 'DataSet' Frames = [rfLeft, rfRight, rfBottom, rfTop] FieldsCollection = <> DataStyle = rdsCustom ColorScheme = <> BandType = rbtPageHeader ViewStyle = rvsCustom ListDataLeft = 100 ListDataLeftInPixels = True SingleListFieldCentered = True object TGBReportLabel Left = 20 Top = 12 Width = 109 Height = 16 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = 'Arial' Font.Style = [fsBold] Caption = 'Счет-фактура N' end object TGBReportDBText Left = 140 Top = 12 Width = 72 Height = 16 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = 'Arial' Font.Style = [fsBold] AutoStretch = False FieldName = 'SNumber='#39'00'#39'+DocNumber' end object TGBReportLabel Left = 216 Top = 12 Width = 15 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = 'от' end object TGBReportDBText Left = 236 Top = 12 Width = 132 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'Sd=FormatDate('#39'dd '#39',Docdate)+'#39' '#39'+FormatDate('#39'mmm yyyy'#39',Docdate)' end object TGBReportLabel Left = 612 Top = 12 Width = 44 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = 'Склад:' end object TGBReportDBText Left = 662 Top = 12 Width = 40 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'StockName' end end object PageHeader: TGBRepBand Color = clWhite Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] BandHeight = 207 ShouldCopyDataSet = True DataSetName = 'DataSet' Frames = [rfTop] FieldsCollection = <> DataStyle = rdsCustom ColorScheme = <> BandType = rbtTitle ViewStyle = rvsCustom ListDataLeft = 100 ListDataLeftInPixels = True SingleListFieldCentered = True object TGBReportDBText Left = 90 Top = 3 Width = 245 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'SCombFS=Firm.FullName' DataSetName = 'DataSet' end object TGBReportDBText Left = 10 Top = 41 Width = 219 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'SINN='#39'ИНН/КПП '#39'+Firm.Heap.@INN' DataSetName = 'DataSet' end object TGBReportDBText Left = 8 Top = 115 Width = 231 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'S5='#39'Покупатель '#39'+Partner.FullName' DataSetName = 'DataSet' end object TGBReportLabel Left = 10 Top = 134 Width = 44 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = 'Адрес:' end object TGBReportDBText Left = 64 Top = 134 Width = 151 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'Partner.Heap.@Address' DataSetName = 'DataSet' end object TGBReportLabel Left = 10 Top = 154 Width = 61 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = 'ИНН/КПП:' end object TGBReportDBText Left = 72 Top = 154 Width = 123 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'Partner.Heap.@INN' DataSetName = 'DataSet' end object TGBReportDBText Left = 10 Top = 22 Width = 470 Height = 16 Alignment = taLeftJustify AutoSize = False AutoStretch = False FieldName = 'SAddress='#39'Адрес: '#39'+Firm.Heap.@Address' DataSetName = 'DataSet' end object TGBReportDBText Left = 413 Top = 183 Width = 181 Height = 16 Alignment = taLeftJustify AutoSize = False AutoStretch = False FieldName = 'Heap.@Expeditor[fmId+otPartners].Name' end object TGBReportLabel Left = 330 Top = 183 Width = 81 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = 'Экспедитор:' end object TGBReportLabel Left = 8 Top = 60 Width = 209 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = 'Грузоотправитель и его адрес: ' end object TGBReportLabel Left = 8 Top = 79 Width = 122 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = 'Грузополучатель: ' end object TGBReportDBText Left = 8 Top = 97 Width = 288 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'S66='#39'К платежно-расчетному документу № '#39 DataSetName = 'DataSet' end object TGBReportDBText Left = 222 Top = 60 Width = 165 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'SCombFS=Firm.FullName' DataSetName = 'DataSet' end object TGBReportDBText Left = 390 Top = 60 Width = 470 Height = 16 Alignment = taLeftJustify AutoSize = False AutoStretch = False FieldName = 'Firm.Heap.@Address' DataSetName = 'DataSet' end object TGBReportDBText Left = 134 Top = 79 Width = 248 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'Partner.FullName' DataSetName = 'DataSet' end object TGBReportLabel Left = 10 Top = 3 Width = 69 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = 'Продавец:' end object TGBReportDBText Left = 362 Top = 80 Width = 151 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'Partner.Heap.@Address' DataSetName = 'DataSet' end object TGBReportLabel Left = 308 Top = 80 Width = 52 Height = 16 Alignment = taLeftJustify AutoSize = True Caption = ', Адрес:' end end object __DetailBand: TGBDetailBand Color = clWhite Font.Charset = RUSSIAN_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] BandHeight = 14 ShouldCopyDataSet = True DataSetName = 'Goodies' DBGridName = '1.VGoodies' Frames = [] FieldsCollection = < item FieldName = 'ArticulName' PartWidth = 180 DisplayLabel = 'Наименование' Alignment = taLeftJustify EvalType = etNone FontHeight = -11 FontName = 'Arial' end item FieldName = 'PackMinName' PartWidth = 22 DisplayLabel = 'Ед. изм' Alignment = taLeftJustify EvalType = etNone FontHeight = -11 FontName = 'Arial' end item FieldName = 'Quantity' PartWidth = 37 DisplayLabel = 'Кол- во шт.' Alignment = taRightJustify EvalType = etNone end item FieldName = 'PackQuantity' PartWidth = 37 DisplayLabel = 'Кол- во мест' Alignment = taRightJustify EvalType = etSum FontHeight = -11 FontName = 'Arial' end item FieldName = 'NonTaxedPrice' PartWidth = 45 DisplayLabel = 'Цена за ед.' Alignment = taRightJustify EvalType = etNone FontHeight = -11 FontName = 'Arial' end item FieldName = 'Spr=Amount(PriceList*Quantity,1)' PartWidth = 66 DisplayLabel = 'Стоимость товаров всего без налога' Alignment = taRightJustify EvalType = etSum FontHeight = -11 FontName = 'Arial' end item FieldName = 'Skg='#39'-'#39 PartWidth = 28 DisplayLabel = 'в т.ч. акциз' Alignment = taCenter EvalType = etNone FontHeight = -11 FontName = 'Arial' end item FieldName = 'FNDSPercents=IIF(Pos(Char(59)+'#39'7'#39'+Char(59),Char(59)+Taxes+Char(5' + '9))>0,18,IIF(Pos(Char(59)+'#39'6'#39'+Char(59),Char(59)+Taxes+Char(59))>' + '0,10,0))' PartWidth = 28 DisplayLabel = 'Нало- говая став- ка' Alignment = taRightJustify EvalType = etNone end item FieldName = 'FTradeTax[a]=IIF(ISNULL(?BaseOneTaxAmt21),0,?BaseOneTaxAmt21)+II' + 'F(ISNULL(?BaseOneTaxAmt3),0,?BaseOneTaxAmt3)+IIF(ISNULL(?BaseOne' + 'TaxAmt5),0,?BaseOneTaxAmt5)' PartWidth = 0 DisplayLabel = 'a' Alignment = taLeftJustify EvalType = etSum FontHeight = -11 FontName = 'Arial' end item FieldName = 'FNDSSum[Сумма НДС,2]=0-FTradeTax+BaseTaxAmt' PartWidth = 71 DisplayLabel = 'Сумма налога' Alignment = taRightJustify EvalType = etSum end item FieldName = 'FSumWithNDS[Всего с НДС,2]=0-FTradeTax+BaseTaxedAmt' PartWidth = 82 DisplayLabel = 'Стоимость товаров всего с учетом налога' Alignment = taRightJustify EvalType = etSum FontHeight = -11 FontName = 'Arial' end item FieldName = 'SCountry='#39'Россия'#39 PartWidth = 43 DisplayLabel = 'Страна прои- схожде- ния' Alignment = taLeftJustify EvalType = etNone end item PartWidth = 27 DisplayLabel = 'Номер ГТД' Alignment = taLeftJustify EvalType = etNone end> DataStyle = rdsFieldsCollection ColorScheme = <> SummaryFont.Charset = RUSSIAN_CHARSET SummaryFont.Color = clBlack SummaryFont.Height = -13 SummaryFont.Name = 'Arial' SummaryFont.Style = [] SummaryPrefix = 'Итого:' PageSummaryPrefix = 'Итого по странице:' AutoSummary = True PageSummary = False SummaryFrames = [rfLeft, rfRight, rfBottom, rfTop] OrderFields = 'PackQuantity' AutoColumnHeader = True AutoDetailNo = True ThroughDetailNo = False DetailNoWidth = 21 HeaderFont.Charset = RUSSIAN_CHARSET HeaderFont.Color = clBlack HeaderFont.Height = -12 HeaderFont.Name = 'Arial' HeaderFont.Style = [] MasterDetail = False PutHeadAfterMaster = False end object TotalSumBand: TGBRepBand Color = clWhite Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] BandHeight = 55 ShouldCopyDataSet = True DataSetName = 'GoodiesAutoSummarySet' ParentBand = __DetailBand Frames = [] FieldsCollection = <> DataStyle = rdsCustom ColorScheme = <> BandType = rbtTitle ViewStyle = rvsCustom ListDataLeft = 100 ListDataLeftInPixels = True SingleListFieldCentered = True object TGBReportDBText Left = 116 Top = 2 Width = 574 Height = 28 Alignment = taLeftJustify AutoSize = False AutoStretch = False FieldName = 'SSumWithNDS=AmountLiterally(FSumWithNDS,1)' end object TGBReportDBText Left = 2 Top = 25 Width = 301 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'STradeTaxL=iif(FTradeTax,'#39'Налог с продаж (4%):'#39','#39#39')' end object TGBReportDBText Left = 525 Top = 25 Width = 175 Height = 20 Alignment = taRightJustify AutoSize = False AutoStretch = False FieldName = 'STradeTaxSum=iif(FTradeTax,Amount(FTradeTax,1),'#39#39')' end object TGBReportDBText Left = 2 Top = 40 Width = 614 Height = 28 Alignment = taLeftJustify AutoSize = False AutoStretch = False FieldName = 'STotalL=iif(FTradeTax,'#39'Всего к оплате: '#39'+AmountLiterally(DataSet' + '.TotalSum,1),'#39#39')' end object TGBReportDBText Left = 525 Top = 40 Width = 175 Height = 28 Alignment = taRightJustify AutoSize = False AutoStretch = False FieldName = 'STotalSum=iif(FTradeTax,Amount(DataSet.TotalSum,1),'#39#39')' end object TGBReportDBText Left = 0 Top = 0 Width = 298 Height = 16 Alignment = taLeftJustify AutoSize = True AutoStretch = False FieldName = 'SLabel=iif(FTradeTax,'#39'На сумму:'#39','#39'Всего к оплате:'#39')' end end object Last1Band: TGBRepBand Color = clWhite Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] BandHeight = 156 ShouldCopyDataSet = True DataSetName = 'DataSet' ParentBand = TotalSumBand Frames = [] FieldsCollection = <> DataStyle = rdsCustom ColorScheme = <> BandType = rbtTitle ViewStyle = rvsCustom ListDataLeft = 100 ListDataLeftInPixels = True SingleListFieldCentered = True object TGBReportLabel Left = 4 Top = 8 Width = 640 Height = 14 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Caption = 'Руководитель предприятия ___________________________________ ' + ' Главный бухгалтер ___________________________' end object TGBReportLabel Left = 12 Top = 88 Width = 494 Height = 14 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Caption = 'Примечание: Первый экземпляр (оригинал) - покупатель. Второй экз' + 'емпляр (копия) - продавец.' end object TGBReportLabel Left = 12 Top = 106 Width = 471 Height = 14 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Caption = 'Претензий по количеству и качеству полученного товара не имею___' + '__________________' end object TGBReportLabel Left = 191 Top = 22 Width = 35 Height = 10 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clBlack Font.Height = -8 Font.Name = 'Arial' Font.Style = [] Caption = '(подпись)' end object TGBReportDBText Left = 576 Top = 5 Width = 81 Height = 14 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] AutoStretch = False FieldName = 'Firm.Heap.@Buh' DataSetName = 'DataSet' end object TGBReportDBText Left = 276 Top = 5 Width = 100 Height = 14 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] AutoStretch = False FieldName = 'Firm.Heap.@Director' DataSetName = 'DataSet' end object TGBReportLabel Left = 296 Top = 22 Width = 27 Height = 10 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -8 Font.Name = 'Arial' Font.Style = [] Caption = '(ф.и.о.)' end object TGBReportLabel Left = 594 Top = 22 Width = 27 Height = 10 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -8 Font.Name = 'Arial' Font.Style = [] Caption = '(ф.и.о.)' end object TGBReportLabel Left = 519 Top = 22 Width = 35 Height = 10 Alignment = taLeftJustify AutoSize = True Font.Charset = RUSSIAN_CHARSET Font.Color = clBlack Font.Height = -8 Font.Name = 'Arial' Font.Style = [] Caption = '(подпись)' end end object PageFooterBand: TGBRepBand Color = clWhite BandHeight = 16 ShouldCopyDataSet = True DataSetName = 'DataSet' Frames = [] FieldsCollection = <> DataStyle = rdsCustom ColorScheme = <> BandType = rbtTitle ViewStyle = rvsCustom ListDataLeft = 100 ListDataLeftInPixels = True SingleListFieldCentered = True end end