кбк в графе корреспондирующий счет, субсчет РКО (ПКО)
Показывать по
10
20
40
сообщений
- 1
- 2
18.02.2009
15:46
#1
Подскажите пожалуйста,
что нужно сделать что бы в графе кореспондирующий счет, субсчет перед счетом было кбк в приходно кассовом ордере?
7,7 (7,10,027) релиз 7,70,630
что нужно сделать что бы в графе кореспондирующий счет, субсчет перед счетом было кбк в приходно кассовом ордере?
7,7 (7,10,027) релиз 7,70,630
19.02.2009
08:35
#4
Ну тогда заведи еще одну переменную, присвой ей значение КБК и добавь в ту же ячейку....
19.02.2009
09:19
#5
а можно чуть подробней где это и как правильно? я так понял в конфигураторе в форме этого документа?
19.02.2009
23:35
#6
"а вы случаем не программист?...
в процедуре печать в самом начале
ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
КБК_1 = Строка (ФКР);
КонецЦикла;
потом примерно в районе строки 700
Если СтрДлина(ГрСчКредит)=6 Тогда
КорСчетП=КБК_1 + глКодСчетаКраткий(ГрСчКредит,".");
Иначе
ВыбратьСтроки();
КорСчетП=КБК_1 + глКодСчетаКраткий(ГрСчКредит,".");
СтрСч="""";
Пока ПолучитьСтроку()=1 Цикл
Если КорСчет.Выбран()=1 Тогда
Если СтрДлина(СтрСч)=0 Тогда
СтрСч=КорСчет.Код+",";
КорСчетП=КБК_1 + глКодСчетаКраткий(КорСчет,".");
Иначе
Если Найти(СтрСч,КорСчет.Код+",")=0 Тогда
Если ПустаяСтрока(СтрЗаменить(ГрСчКредит,".",""""))=0 Тогда
КорСчетП=""""+КодИсточника+"."+СокрП(СтрЗаменить(ГрСчКредит,".",""""));
ДлинаКода=СтрДлина(КорСчетП);
Для инд=ДлинаКода+1 По 7 Цикл
КорСчетП=КБК_1 + КорСчетП+"0";
КонецЦикла;
Прервать;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЦикла;
КонецЕсли;
Это вот если усиленно не думать....
"
в процедуре печать в самом начале
ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
КБК_1 = Строка (ФКР);
КонецЦикла;
потом примерно в районе строки 700
Если СтрДлина(ГрСчКредит)=6 Тогда
КорСчетП=КБК_1 + глКодСчетаКраткий(ГрСчКредит,".");
Иначе
ВыбратьСтроки();
КорСчетП=КБК_1 + глКодСчетаКраткий(ГрСчКредит,".");
СтрСч="""";
Пока ПолучитьСтроку()=1 Цикл
Если КорСчет.Выбран()=1 Тогда
Если СтрДлина(СтрСч)=0 Тогда
СтрСч=КорСчет.Код+",";
КорСчетП=КБК_1 + глКодСчетаКраткий(КорСчет,".");
Иначе
Если Найти(СтрСч,КорСчет.Код+",")=0 Тогда
Если ПустаяСтрока(СтрЗаменить(ГрСчКредит,".",""""))=0 Тогда
КорСчетП=""""+КодИсточника+"."+СокрП(СтрЗаменить(ГрСчКредит,".",""""));
ДлинаКода=СтрДлина(КорСчетП);
Для инд=ДлинаКода+1 По 7 Цикл
КорСчетП=КБК_1 + КорСчетП+"0";
КонецЦикла;
Прервать;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЦикла;
КонецЕсли;
Это вот если усиленно не думать....
"
20.02.2009
06:49
#7
к сожелению к програмированию отношения не имею, но иногда сталкиваюсь с такими проблемами
20.02.2009
09:47
#9
пока не успешно. в документы\расходный ордер модуль документа не вижу процедуры печати, и строк там нет 700 там их намного меньше.
20.02.2009
16:18
#10
> Подскажите пожалуйста,
> что нужно сделать что бы в графе кореспондирующий счет, субсчет перед счетом было кбк в приходно кассовом ордере?
Можно еще раз сформулировать вопрос? Не пойму слов:"субсчет перед счетом было кбк"
захожу в ПКО. Таблица. Вижу поле "Кор.счет(кредит)", под ним "КБК(кредит)"...
Или вы про печатную форму?
И в любом случае совет, который вам дали(для печати), реализовывать надо через модуль формы, а не через модуль документа!
И учтите, что форма ПКО (РКО) это форма, утвержденная ГосКомСтатом!
> что нужно сделать что бы в графе кореспондирующий счет, субсчет перед счетом было кбк в приходно кассовом ордере?
Можно еще раз сформулировать вопрос? Не пойму слов:"субсчет перед счетом было кбк"
захожу в ПКО. Таблица. Вижу поле "Кор.счет(кредит)", под ним "КБК(кредит)"...
Или вы про печатную форму?
И в любом случае совет, который вам дали(для печати), реализовывать надо через модуль формы, а не через модуль документа!
И учтите, что форма ПКО (РКО) это форма, утвержденная ГосКомСтатом!
- 1
- 2
Читают тему
(гостей: 1)