Block( {Графа 8} If(Pos('G08', ClosedFields) = 0, Block( GTD.SFP('Графа 8_ИНН', 'Caption', FirmTopData(PRIM, 8)), GTD.SFP('Графа 8', 'Caption', GetGTDFirmNameAndAddress('08', 1)), GTD.SFP('Графа 8_Код', 'Caption', ConvertToMemo(FirmBottomData(PRIM, 8))) ) ), {Графа 15} If(Pos('G15', ClosedFields) = 0, Block( GTD.SFP('Графа 15', 'Caption', DCL.GetFieldVal(PRIM, 'G15')) ) ), {Графа 17} If(Pos('G17', ClosedFields) = 0, Block( GTD.SFP('Графа 17', 'Caption', DCL.GetFieldVal(PRIM, 'G17B')) ) ), {Графа 18} If(Pos('G18', ClosedFields) = 0, Block( Let(@BufString, Supress(Zero('%d', DCL.GetFieldVal(PRIM, 'G180')), ':') ), Let(@BufString, BufString + DCL.GetFieldVal(PRIM, 'G181')), GTD.SFP('Графа 18_1', 'Caption', BufString), GTD.SFP('Графа 18_2', 'Caption', DCL.GetFieldVal(PRIM, 'G182')) ) ), {Графа 19} If(Pos('G19', ClosedFields) = 0, GTD.SFP('Графа 19', 'Caption', DCL.GetFieldVal(PRIM, 'G19')) ), {Графа 21} If(Pos('G21', ClosedFields) = 0, Block( Let(@BufString, ''), If(Left(DCL.GetFieldVal(PRIM, 'G211'), 3) <> 'см.', Let(@BufString, Supress(Zero('%d', GetFieldVal(PRIM, 'G210')), ':')) ), Let(@BufString, BufString + DCL.GetFieldVal(PRIM, 'G211')), GTD.SFP('Графа 21_1','Caption',BufString), GTD.SFP('Графа 21_2','Caption',DCL.GetFieldVal(PRIM,'G212')) ) ), {Графа 22} If(Pos('G221', ClosedFields) = 0, GTD.SFP('Графа 22_1', 'Caption', GetCurrencyCodeFieldValue(PRIM, 'G221')) ), If(Pos('G222',ClosedFields) = 0, Block( If(GetCurrencyCodeFieldValue(PRIM, 'G221') = 'ООО', GTD.SFP('Графа 22_2', 'Caption', '000'), GTD.SFP('Графа 22_2', 'Caption', GetFloatFieldVal(PRIM, 'G222', '22', 'ГТД'))) ) ), {Графа 25} If(Pos('G25', ClosedFields) = 0, GTD.SFP('Графа 25','Caption',DCL.GetFieldVal(PRIM, 'G251')) ), {Графа 26} If(Pos('G26', ClosedFields) = 0, GTD.SFP('Графа 26', 'Caption', DCL.GetFieldVal(PRIM, 'G261')) ) )