Мне кажется ГЛЮК

"РЕБЯТА ГЛЮК



Примечание

Я сам с Казахстана у нас тут другой план счетов так что будет всё условно                    

Всю конфигурацию писал сам с нуля.

Описание

На счёте 1 учитывается зарплата сотрудников

Там два субконто сами сотрудники и статьи зарплат (Норма, выходные, аренда, больничные и т.д)

Написал документы  Начисление зарплаты, перечисление зарплаты,

До нового года начисляли в EXCEL и вводили общую сумму

С нового года начали вводить по сотрудникам

Первое начисление  именно по сотрудникам в отдельности производилось 31.12.01

И там присутстовало больничные и компенсация отпускных (при уволнении)

До 31.12.01 они НЕ РАЗУ НЕ ИСПОЛЬЗОВАЛИСЬ

Начисленная зарплата перечисляется в банк

При перечислении необходимо снимать суммы с каждого сотрудника и по статьям зарплат

Примечание: счет 1 - валютный (начисляется потому-что в различных валютах - национальной (тенге) и в $)

Если человек получает в Тенге(курс 1) у него валютная сумма и обычная равны



Написал модуль в обрабоке проведения выписки расчётного счёта

Туда вставляется документ Перечисление зарплаты

                           

//ДокПерЗар. документ Перечисление зарплаты, содержащий список сотрудников для перечисления и суммы

//В моём случае имел дату 08.01.02

//Суб - список значений заполняется из документа ДокПерЗар

Ф=СоздатьОбъект("БухгалтерскиеИтоги");

Ф.ИспользоватьСубконто(ВидыСубконто.Сотрудники,Суб,1);

Ф.ИспользоватьСубконто(ВидыСубконто.СтатьиЗарплаты,,1);

Ф.ВыполнитьЗапрос(ДокПерЗар.ТекущийДокумент(),,СчетЗапроса,,Валюта,1,,2);  //Нужна только валюта

Ф.ВыбратьСубконто(1);

Пока Ф.ПолучитьСубконто(1)=1 Цикл

Ф.ВыбратьСубконто(2);

Пока Ф.ПолучитьСубконто(2)=1 Цикл

Сообщить(""""+Ф.Субконто(1)+" "+Ф.Субконто(2)+"  "+Ф.СКК(2));

КонецЦикла;

КонецЦикла;

                           

У сотрудников до 31.01.02 не использовались другие статьи зарплат кроме Начисление зарплаты

А Он выдаёт список сотрудников                                                              

Правильные суммы по Субконто(2)

И появляются ещё Субконто(2) (те которые появятся только в конце месяца) с НУЛЕВЫМИ суммами

То есть субконто есть а ВСЕ (и СКК и СКД и СНК и СНД) нулевые



исправляя строку

                                                                                             

Ф.ВыполнитьЗапрос(ДокПерЗар.ТекущийДокумент(),,СчетЗапроса,,Валюта,1,,2);

на

Ф.ВыполнитьЗапрос(ДокПерЗар.ТекущийДокумент(),,СчетЗапроса,,Валюта,1,,1); //в тенге

тоже самое



и только

                                                                                 

когда



Ф.ВыполнитьЗапрос(ДокПерЗар.ТекущийДокумент(),,СчетЗапроса,,Валюта,1); //без указания что надо рассчитывать

лишние субконто не появляются                                                      



Принципиальной разницы нет я и так вычислил всё что мне надо

но мне кажется это глюк

Я сидел 6 часов и искал у себя ошибку

дополнительно

1С:Предприятие 7.7 (Бухгалтерия), лицензионная не вскрытая,  релиз 7.70.015



УХ?"