66
cawokru
26.07.12
✎
18:59
|
ааа, я не могу... второй день правлю, а оно все лезет...
Если ВыборкаНоменклатура.Количество=Null Тогда
НоваяСтрокаТабличнаяЧасть.Количество=1;
Иначе
НоваяСтрокаТабличнаяЧасть.Количество=ВыборкаНоменклатура.Количество;
КонецЕсли;
придется в день сисадмина пить сгоря...
У меня тоже есть маги 1 поколения |
|
79
MMF
16.08.12
✎
15:00
|
(37, 73) Ну это еще приличный код.... хуже, если, как у меня в филиале 50%/50% англорусский ховнокод с замечательными идеями и чудными идентификаторами смешанной англолатиницы
ИначеЕсли Лев(ИсхТабл,5)="Налог" Тогда
Таб.КоличествоЭкземпляров(1);
ПечатьНН();
If пар_<>0 then
Таб.ПараметрыСтраницы(1,,1,10,5,5,0,5,0);
q=Таб.ВысотаТаблицы()/2;
q2=?(q-62<11,q-11,62);
If q>64 then
Таб.Записать("c:\111.mxl");
Таб.ОбластьПечати(1,1,62,11);
Таб.Напечатать(0);
Предупреждение("Вставьте первую страницу налоговой накладной (оригинал)");
Таб.Открыть("c:\111.mxl");
Таб.ОбластьПечати(63,1,q+62,11);
Таб.Напечатать(0);
Таб.Открыть("c:\111.mxl");
У меня тоже есть маги 1 поколения |
|