Как убрать эти крестики? Чтобы было только напротив II пункта крестики, на всех остальных ячейках не было! Нашел в конфигураторе Налоговая Накладная, изменяю а в 1С когда смотришь результат, нечего не меняеться!
Пока лТаблЗН.ПолучитьСтроку() = 1 Цикл лНомСтр = лНомСтр + 1; Если (лТаблЗН.Док.Вид()="НалоговаяНакладнаяПриходная") Тогда лВидДок_вНУ="ПН"; КонецЕсли;
Что-то кассового чека среди документов реестра я не наблюдаю. Вопрос в лоб, из нижеследующего списка оставьте те, которыми пользуетесь: ППН,ПН01,ПН02,ПН03,ПН04,ПН05,ПН06,ПН07,ПН08,ПН09,ПН10,ПН11,РК,ВМД,БО,ПНУ,ПН01У,П Н02У,ПН03У,ПН04У,ПН05У,ПН06У,ПН07У,ПН08У,ПН09У,ПН10У,ПН11У,РКУ,ВМДУ,БОУ,
нечего, а конкретно те документы, которые используют, перечень уже писал, можно без, чека, хоть покажите как будет выглидеть, с ПН приходной, в конфегурации А4.
В А4:БТР в реестр налоговых накладных (то бишь в книгу закупок и продаж - тогда еще реестра как такого не было) попадают только 6 видов документов: Кассовый чек никогда не попадал - по нему необходимо было сделать или налоговую накладную либо ЗаписьКНиги. Вопрос звучит в том, что необходимо узнать методы работы Вашего бухгалтера: Например, чтобы Вывести в реестр НН вид налогового документа ПН11 - признаком может служить ДокументОснование в НалоговойНакладнойРасходной есть документ Вида "ОтчетПОРРО" либо "РасходИзРозницы" либо "Приходный Кассовый ордер". Мой вопрос звучал вот именно какие ПН?? на Вашем предприятии используются?
В основном ПН и РК расходные, редко бывает, приходные и очень редко, кассовый чек.
Я так и не услышал ответ а свой вопрос. Чтобы подсказать алгоритм работы, мне необходимо знать какие на Вашем предприятие используются виды документов в налоговом учете. Если смотреть новый релиз реестра то список документов ПН01,..,ПН11 и т.д. Неужели все? (внешнеэкономической деятельностью занимаетесь - нет значит в принципе и нет ГТД) -для всего писать будет слишком заморочено. Спросите у бухгалтера какие виды документов у него должны попадать в реестр, если сами не знаете...
НалоговаяНакладнаяПриходная ЗаписьКнигиЗакупок Дополнение2КНалоговойНакладнойПриходной НалоговаяНакладнаяРасходная Дополнение2КНалоговойНакладнойРасходной НалоговаяНакладнаяРасходная ЗаписьКнигиПродаж Кассовый Чек
yfrf111, скажите честно - вы много литературы по 1С прочитали? 5_kopeek вам говорит простые вещи, а вы даже их не понимаете. Так дела не будет.
1С 7.7 -Описание встроеного языка и+ Сайт http://www.mista.ru/tutor_1c/index.htm книжку только начал с ней работать! Вторая неделя с 1С у меня Вы же не проснулись, и сразу умели и программировать и все делать, прошло какое-то время! Когда знаешь в своем деле много, думаешь да это просто, нечего, делать. А когда с чем то новым сталкиваешься, приходиться почисать затылок и не только.)
yfrf111, иногда меня поражает так называемая мужская логика, яркой иллюстрацией которой является Ваш ответ. Почему цитирование Ваших изречений Вы называете
, мне не понять (либо эмоции мешают, либо количество запятых в предложениях).
Из моих ответов в созданной Вами теме этого не следует, как, впрочем, и из других моих постов. Но, хотя Вы и сделали неверные выводы (возможно, причиной этому является специфическое логическое мышление), очевидно, что Вы не ограничились прочтением моих сообщений только в этой ветке.
Были у меня глубокие сомнения, стоит ли показывать свое лицо, и, судя по всему, не зря. Почему-то его созерцание мешает оппонентам адекватно воспринимать мои слова. Пожалуй, дней через 10 верну status quo ante bellum.
Смысл этой фразы является для меня загадкой. Под черным Вы понимаете факт моего вступления в дискуссию с Вами и желание помочь непонятным Вам способом, а под белым -- разжевывание алгоритмов с приведением примеров?.. Если так, то воздержусь от комментариев.
Естественно. При определенных условиях буду помогать в дальнейшем.
Уважаемые модераторы и администраторы! Прошу меня извинить за флуд в данном посте, позволила себе это исключительно как компенсацию за потраченное на обучение yfrf111 время.
Мужская логика запуталась и просит помощь у женской?)
Надеюсь, что когда-нибудь Вы поймете, что совет читать и пробовать -- это не есть "плохое", а как раз наоборот. То же относится к АНАЛИЗУ типовых конфигураций. Спасибо, что избавили от труда искать надпись в логотипе (это было довольно сложно), но только надписи "Обучение нежелающих читать и думать программированию в 1С" нет ни в логотипе, ни в ином месте. А по поводу этого
, то пока за помощь получила обвинение в деянии "плохого".
Вот в этом утверждении Вы очень сильно ошибаетесь: все зависит от желания добиться результата и количества/качества приложенных усилий. А наличие подсказчика только облегчает Ваш труд за счет его усилий объяснить Вам что-либо. А теперь по делу. Если Вы хотите научиться что-то делать своими руками и головой, последующая информация поможет Вам. В реестр данные попадают из таблицы лТаблЗН, как видно из Вашего рисунка (Вы этого посмотреть сами не хотите, желаете, чтобы позсказчик посмотрел и Вам объяснил). Проверьте, есть ли в этой таблице колонка с самим документом или его видом. Если есть, значит Вы можете организовать проверку: если вид документа в конфигураторе налоговая накладная выданная, то вид документа в рееестре ПН, а если вид документа приложение 2, то РК. Если же в таблице подобной колонки нет, можете добавить колонку с видом документа в реестре, анализируйте вид документа на стадии заполнения таблицы и сразу заполняйте новую колонку необходимым значением. А в печатной форме документа колонку Вид документа заполняйте из той же таблицы. Это все будет выглядеть приблизительно так (это пример, его надо переделать под Вашу конфигурацию и реестр):
// добавляем колонку в таблицу (там, где создаются остальные колонки таблицы) лТаблЗН.НоваяКолонка("ВидДока","Строка",6,);
// где-то при обходе результатов выборки налоговых документов (обход результатов запроса) // виды документов необходимо указывать так, как они заданы в конфигураторе Если Запрос.ДокументНалоговаяНакладная.Вид()="НалоговаяНакладнаяРасходная" Тогда лТаблЗН.ВидДока="ПН"; ИначеЕсли Запрос.ДокументНалоговаяНакладная.Вид()="Приложение2" Тогда лТаблЗН.ВидДока="РК"; Иначе // что-то пишем, если есть другие варианты КонецЕсли; // ДокументНалоговаяНакладная.Вид()="НалоговаяНакладнаяРасходная"
А в печатной форме вставляем формулу
лТаблЗН.ВидДока
Не совсем, понял где его менять? Два дня помучался все варианты ищерпаны.
вот код модуля
Перем ТекстЗапр, ДатаКвартала, ДатаНач, ДатаКон; //----------------------------------- Процедура ПечатьРеестр1() лТаблЗН=СоздатьОбъект("ТаблицаЗначений"); лТаблЗН.НоваяКолонка("Док","Документ"); //сам документ или док-основание из табличной части лТаблЗН.НоваяКолонка("Дата"); //дата (из шапки или строки) лТаблЗН.НоваяКолонка("Номер"); лТаблЗН.НоваяКолонка("Клн"); лТаблЗН.НоваяКолонка("НомерНДС");
//остальные - числа, идентификаторы С+номер колонки в таблице лСтрокаСвернуть = ""; Для i=6 по 14 Цикл лИдКолонки="С"+СокрЛП(Строка(i)); лТаблЗН.НоваяКолонка(лИдКолонки); лСтрокаСвернуть = лСтрокаСвернуть + ?(лСтрокаСвернуть="","",", ") + "С"+СокрЛП(Строка(i)); КонецЦикла;
//цикл по налоговым документам (участвуют только 3 документа!) Пока лДок.ПолучитьДокумент() = 1 Цикл Если (лДок.Вид()<>"НалоговаяНакладнаяПриходная") и (лДок.Вид()<>"ЗаписьКнигиЗакупок") и (лДок.Вид()<>"Дополнение2КНалоговойНакладнойПриходной") и (лДок.Вид()<>"Операция") Тогда Продолжить; КонецЕсли;
//HP включаем только проведенные (по константе) Если (лДок.Проведен()=0)И(Константа.ПечатьКнигНДС=0) Тогда Продолжить; КонецЕсли;
Если лДок.ПометкаУдаления()=1 Тогда Продолжить; КонецЕсли;
Если (ВыбФирма.Выбран()=1)И(лДок.ДтФирма<>ВыбФирма)И(лДок.Вид()<>"Операция") Тогда Продолжить; КонецЕсли;
Если (ВыбПодразделение.Выбран()=1) И (лДок.ДтПодразделение<>ВыбПодразделение) Тогда Продолжить; КонецЕсли;
Если лДок.Вид()="Операция" Тогда Если ПустоеЗначение(лДок.Операция.НомерНН) = 1 Тогда Продолжить; КонецЕсли; лТаблЗН.НоваяСтрока(); лТаблЗН.Заполнить(0,лТаблЗН.НомерСтроки,лТаблЗН.НомерСтроки,); лДок.Операция.ВыбратьПроводки(); лДок.Операция.ПолучитьПроводкуПоНомеру(1,1); лКлиент = лДок.Операция.Кредит.Субконто(1); лТаблЗН.Дата=лДок.Операция.ДатаОперации; лТаблЗН.Клн=лКлиент; лТаблЗН.НомерНДС=лКлиент.НомерНДС; лТаблЗН.Номер=лДок.Операция.НомерНН; лТаблЗН.Док=лДок.Операция.ТекущийДокумент(); лСум = лДок.Операция.Сумма; лТаблЗН.С7=лСум; лДок.Операция.ПолучитьПроводкуПоНомеру(2,1); лТаблЗН.С8=лДок.Операция.Сумма; лСум = лСум + лДок.Операция.Сумма; лТаблЗН.С6=лСум; ИначеЕсли лДок.Вид()="Дополнение2КНалоговойНакладнойПриходной" Тогда лТаблЗН.НоваяСтрока(); лТаблЗН.Заполнить(0,лТаблЗН.НомерСтроки,лТаблЗН.НомерСтроки,); лКлиент=лДок.ДтКлиент; лТаблЗН.Дата=лДок.ДатаДок; лТаблЗН.Клн=лКлиент; лТаблЗН.НомерНДС=лКлиент.НомерНДС; лТаблЗН.Номер=лДок.НомерДок; лТаблЗН.Док=лДок.ТекущийДокумент();
лТаблЗН.С6=лДок.СуммаПоДокументу; лТаблЗН.С7=лДок.СуммаПоДокументу - лДок.НДСпоДокументу; лТаблЗН.С8=лДок.НДСпоДокументу; ИначеЕсли лДок.Вид()="НалоговаяНакладнаяПриходная" Тогда Если лДок.НалоговыйКредит = Перечисление.Булево.Да Тогда лТаблЗН.НоваяСтрока(); лТаблЗН.Заполнить(0,лТаблЗН.НомерСтроки,лТаблЗН.НомерСтроки,); лКлиент=лДок.ДтКлиент; лТаблЗН.Дата=лДок.ДатаДок; лТаблЗН.Клн=лКлиент; лТаблЗН.НомерНДС=лКлиент.НомерНДС; лТаблЗН.Номер=лДок.НомерДок; лТаблЗН.Док=лДок.ТекущийДокумент(); лДок.ВыбратьСтроки(); лДок.ПолучитьСтроку(); лТаблЗН.С6=лДок.СуммаПоДокументу; лТаблЗН.С7=лДок.СуммаПоДокументу - лДок.Итог("НДСвСтроке"); лТаблЗН.С8=лДок.Итог("НДСвСтроке"); Иначе лДок.ВыбратьСтроки(); Пока лДок.ПолучитьСтроку() = 1 Цикл лТаблЗН.НоваяСтрока(); лТаблЗН.Заполнить(0,лТаблЗН.НомерСтроки,лТаблЗН.НомерСтроки,); лКлиент=лДок.ДтКлиент; лТаблЗН.НомерНДС=лКлиент.НомерНДС; лТаблЗН.Дата=лДок.ДатаДок; лТаблЗН.Клн=лКлиент; лТаблЗН.Номер=лДок.НомерДок; лТаблЗН.Док=лДок.ТекущийДокумент(); Если лДок.Товар.Вид() = "Товары" Тогда Если лДок.Товар.ВидТовара = Перечисление.Неамортизируемые.Услуга Тогда лТаблЗН.С13=лДок.ПродСумма; лТаблЗН.С14=Окр(лДок.ПродСумма*лДок.ВидНДС.ТарифНДС/100,Константа.ОкруглятьДо); лТаблЗН.С6=лТаблЗН.С13+лТаблЗН.С14; Иначе лТаблЗН.С11=лДок.ПродСумма; лТаблЗН.С12=Окр(лДок.ПродСумма*лДок.ВидНДС.ТарифНДС/100,Константа.ОкруглятьДо); лТаблЗН.С6=лТаблЗН.С11+лТаблЗН.С12; КонецЕсли; Иначе лТаблЗН.С11=лДок.ПродСумма; лТаблЗН.С12=Окр(лДок.ПродСумма*лДок.ВидНДС.ТарифНДС/100,Константа.ОкруглятьДо); лТаблЗН.С6=лТаблЗН.С11+лТаблЗН.С12; КонецЕсли; КонецЦикла; КонецЕсли; ИначеЕсли лДок.Вид()="ЗаписьКнигиЗакупок" Тогда //для многострочной части документа будем каждый раз генерить новую строку таблицы лДок.ВыбратьСтроки(); Пока лДок.ПолучитьСтроку() = 1 Цикл лТаблЗН.НоваяСтрока(); лТаблЗН.Заполнить(0,лТаблЗН.НомерСтроки,лТаблЗН.НомерСтроки,); лКлиент=лДок.Клиент; лТаблЗН.Дата=лДок.ДатаНДС; лТаблЗН.Клн=лКлиент; лТаблЗН.НомерНДС=лКлиент.НомерНДС; лТаблЗН.Номер=лДок.Номер; лТаблЗН.Док=лДок.ТекущийДокумент(); Если лДок.НалоговыйКредит = Перечисление.Булево.Да Тогда лТаблЗН.С6=лДок.ПродСумма + лДок.НДСвСтроке; лТаблЗН.С7=лДок.ПродСумма; лТаблЗН.С8=лДок.НДСвСтроке; Иначе Если лДок.НаЗатраты = Перечисление.Булево.Да Тогда лТаблЗН.С9=лДок.ПродСумма; лТаблЗН.С10=лДок.НДСвСтроке; лТаблЗН.С6=лТаблЗН.С9+лТаблЗН.С10; Иначе лТаблЗН.С11=лДок.ПродСумма; лТаблЗН.С12=лДок.НДСвСтроке; лТаблЗН.С6=лТаблЗН.С11+лТаблЗН.С12; КонецЕсли; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла;
лТаб.Опции(0,0,4.,0); лТаб.ТолькоПросмотр(1); лТаб.Показать("Реєстр податкових накладних розділ І",""); лТаблЗН.УдалитьСтроки(); КонецПроцедуры
//----------------------------------- Процедура ПечатьРеестр2() лТаблЗН=СоздатьОбъект("ТаблицаЗначений"); лТаблЗН.НоваяКолонка("Док","Документ"); //сам документ или док-основание из табличной части лТаблЗН.НоваяКолонка("Дата"); //дата (из шапки или строки) лТаблЗН.НоваяКолонка("Номер"); лТаблЗН.НоваяКолонка("Клн"); лТаблЗН.НоваяКолонка("НомерНДС");
//остальные - числа, идентификаторы С+номер колонки в таблице лСтрокаСвернуть = ""; Для i=6 по 14 Цикл лИдКолонки="С"+СокрЛП(Строка(i)); лТаблЗН.НоваяКолонка(лИдКолонки); лСтрокаСвернуть = лСтрокаСвернуть + ?(лСтрокаСвернуть="","",", ") + "С"+СокрЛП(Строка(i)); КонецЦикла;
//цикл по налоговым документам (участвуют только 3 документа!) Пока лДок.ПолучитьДокумент() = 1 Цикл Если (лДок.Вид()<>"НалоговаяНакладнаяРасходная") и (лДок.Вид()<>"ЗаписьКнигиПродаж") и (лДок.Вид()<>"Дополнение2КНалоговойНакладнойРасходной") Тогда Продолжить; КонецЕсли;
//HP включаем только проведенные (по константе) Если (лДок.Проведен()=0) И (Константа.ПечатьКнигНДС=0) Тогда Продолжить; КонецЕсли;
Если лДок.ПометкаУдаления()=1 Тогда Продолжить; КонецЕсли;
Если (ВыбФирма.Выбран()=1) И (лДок.ДтФирма<>ВыбФирма) Тогда Продолжить; КонецЕсли;
Если (ВыбПодразделение.Выбран()=1) И (лДок.ДтПодразделение<>ВыбПодразделение) Тогда Продолжить; КонецЕсли;
Если лДок.Вид()="НалоговаяНакладнаяРасходная" Тогда лТаблЗН.НоваяСтрока(); //перед заполнением "пронулим" колонки таблицы лТаблЗН.Заполнить(0,лТаблЗН.НомерСтроки,лТаблЗН.НомерСтроки,); //клиент и документ лКлиент=лДок.ДтКлиент; лТаблЗН.Дата=лДок.ДатаДок; лТаблЗН.Клн=лКлиент.ПолноеНазвание; лТаблЗН.НомерНДС=лКлиент.НомерНДС; лТаблЗН.Номер=лДок.НомерДок; Если лКлиент.Код = "." Тогда лТаблЗН.Номер=ПолучитьПустоеЗначение(); Иначе лТаблЗН.Номер=лДок.НомерДок; КонецЕсли; лТаблЗН.Док=лДок.ТекущийДокумент(); лТаблЗН.С6=лДок.СуммаПоДокументу;
Если лКлиент.ПризнакКлиентРезидент=Перечисление.ПризнакРезидентности.Нерезидент Тогда лТаблЗН.С11=лДок.СуммаПоДокументу; лТаб.ВывестиСекцию("Строка"); //вывод обычного документа (НалоговойНакладнойПоставщика и Дополнения...) Состояние("В звіт виведено "+лТаблЗн.НомерСтроки +" рядків."); продолжить; КонецЕсли; лДок.ВыбратьСтроки(); лДок.ПолучитьСтроку(); Если лДок.ВидНДСвСтроке.ЗначениеНДС=Перечисление.ЗначенияНДС.ОсновнаяСтавкаНДС Тогда лТаблЗН.С7=лДок.СуммаПоДокументу-лДок.Итог("НДСвСтроке"); лТаблЗН.С8=лДок.Итог("НДСвСтроке"); ИначеЕсли лДок.ВидНДСвСтроке.ЗначениеНДС=Перечисление.ЗначенияНДС.ЛьготнаяСтавкаНДС Тогда лТаблЗН.С9=лДок.СуммаПоДокументу; ИначеЕсли (лДок.ВидНДСвСтроке.ЗначениеНДС=Перечисление.ЗначенияНДС.БезНДС) ИЛИ (ПустоеЗначение(лДок.ВидНДСвСтроке.ЗначениеНДС) = 1) Тогда лТаблЗН.С10=лДок.СуммаПоДокументу; КонецЕсли; ИначеЕсли лДок.Вид()="Дополнение2КНалоговойНакладнойРасходной" Тогда лТаблЗН.НоваяСтрока(); //перед заполнением "пронулим" колонки таблицы лТаблЗН.Заполнить(0,лТаблЗН.НомерСтроки,лТаблЗН.НомерСтроки,); //клиент и документ лКлиент=лДок.ДтКлиент; лТаблЗН.Дата=лДок.ДатаДок; лТаблЗН.Клн=лКлиент.ПолноеНазвание; лТаблЗН.НомерНДС=лКлиент.НомерНДС; лТаблЗН.Номер=лДок.НомерДок; лТаблЗН.Док=лДок.ТекущийДокумент(); лТаблЗН.С6=лДок.СуммаПоДокументу; Если лДок.ПолучитьСтрокуПоНомеру(1) = 1 Тогда // Иначе Продолжить; КонецЕсли;
Если лКлиент.ПризнакКлиентРезидент=Перечисление.ПризнакРезидентности.Нерезидент Тогда лТаблЗН.С11=лДок.СуммаПоДокументу; лТаб.ВывестиСекцию("Строка"); //вывод обычного документа (НалоговойНакладнойПоставщика и Дополнения...) Состояние("В звіт виведено "+лТаблЗн.НомерСтроки +" рядків."); Продолжить; КонецЕсли; Если лДок.ВидНДСвСтроке.ЗначениеНДС=Перечисление.ЗначенияНДС.ОсновнаяСтавкаНДС Тогда лТаблЗН.С7=лДок.СуммаПоДокументу-лДок.НДСПоДокументу; лТаблЗН.С8=лДок.НДСПоДокументу; ИначеЕсли лДок.ВидНДСвСтроке.ЗначениеНДС=Перечисление.ЗначенияНДС.ЛьготнаяСтавкаНДС Тогда лТаблЗН.С9=лДок.СуммаПоДокументу; ИначеЕсли (лДок.м.ЗначениеНДС=Перечисление.ЗначенияНДС.БезНДС) ИЛИ (ПустоеЗначение(лДок.ВидНДСвСтроке.ЗначениеНДС) = 1) Тогда лТаблЗН.С10=лДок.СуммаПоДокументу; КонецЕсли; ИначеЕсли лДок.Вид()="ЗаписьКнигиПродаж" Тогда лДок.ВыбратьСтроки(); Пока лДок.ПолучитьСтроку()=1 Цикл //для многострочной части документа будем каждый раз генерить новую строку таблицы лТаблЗН.НоваяСтрока(); //перед заполнением "пронулим" колонки таблицы лТаблЗН.Заполнить(0,лТаблЗН.НомерСтроки,лТаблЗН.НомерСтроки,); //клиент и документ
Если лКлиент.ПризнакКлиентРезидент=Перечисление.ПризнакРезидентности.Нерезидент Тогда лТаблЗН.С11=лДок.ПродСумма; лТаб.ВывестиСекцию("Строка"); //вывод обычного документа (НалоговойНакладнойПоставщика и Дополнения...) Состояние("В звіт виведено "+лТаблЗн.НомерСтроки +" рядків."); Продолжить; КонецЕсли; Если лДок.ВидНДСвСтроке.ЗначениеНДС=Перечисление.ЗначенияНДС.ОсновнаяСтавкаНДС Тогда лТаблЗН.С7=лДок.ПродСумма; лТаблЗН.С8=лДок.НДСВСтроке; ИначеЕсли лДок.ВидНДСвСтроке.ЗначениеНДС=Перечисление.ЗначенияНДС.ЛьготнаяСтавкаНДС Тогда лТаблЗН.С9=лДок.ПродСумма; ИначеЕсли (лДок.ВидНДСвСтроке.ЗначениеНДС=Перечисление.ЗначенияНДС.БезНДС) ИЛИ (ПустоеЗначение(лДок.ВидНДСвСтроке.ЗначениеНДС) = 1) Тогда лТаблЗН.С10=лДок.ПродСумма; КонецЕсли;
лТаб.ВывестиСекцию("Строка"); //вывод многострочной части ЗаписиКнигиЗакупок Состояние("В звіт виведено "+лТаблЗн.НомерСтроки +" рядків."); КонецЦикла; // по строкам Книги продаж Продолжить; КонецЕсли; //по строкам книги закупок
5_kopeek Похоже вы настоящая женщина, как правило женщины думают эмоциями, и любители все перефразировать, под свой лад, вы это лишний раз доказали, еще раз! Похоже в вас, все еще сражаются, черное и белое, возможно так будет, до конца жизни! Вы как-то все приняли, близко к сердцу, перемолов на свой лад, выплеснули в светло-серых тонах. Опираясь на какой-то свой опыт, вы сделали и какой то свой вывод, написали что ваш жизненый путь из возможных верен, взяв за переменную свой опыт, вы мне обьявили. Перем ВашОпытЖизненный; ВашОпытЖизненный=Вы; но забыли что есть еще, Если, ИначеЕсли, Тогда. С вашей помощью, мой прогресс будет быстрее!
Сколько видов документов в налоговом учете используется (ПН,РК,...)? В БТР же только два вида документа НалоговаяНакладнаяРасходная и Дополнение2КНалоговойНакладной...
А еще чек! Или я шибаюсь? Вам веднее!))) Небольшой пример, бы мне помог или указать место, где примерно используеться тот же принцип! Релизы смотрел для Укр. 035 и 036 там какая-то высшая математика, где все сылаеться, на XML не могу понять!
Насколько я понимаю, используется лицензионный программный продукт, в состав которого входят такие книги как "Администрирование и конфигурирование" и "Описание встроенного языка". Для решения Ваших задач их предостаточно. А также, повторюсь в который раз, у Вас имеются типовые решения, которые могут служить отличным примером. Если Вы хотите чему-то научиться -- читайте и пробуйте ("для опыта"), заодно и маме поможете. А пока больше похоже на то, что Вы желаете "опыта" прибавить нам, предлагая вникать в имеющуюся у Вас конфигурацию.
Да так и есть, используеться лицензионная программа, с ЛПТ ключом к сожалению нет книг, имено таких как вы опесали! Сама поставка осуществлялась А4, есть только книги по использований самой программы и конфигурации. В книгах которые есть, только упоминается, что есть еще конфигуратор, на этом все тонкости заканчиваються! Я думаю синтаксис, программирование 1С одинаковый, просто по разному можно записать!
Думаю зависит от опытности, подсказчика и желания помочь!
Как заметили, я выкладываю и результат в коде, который мне помог, может еще кому пригодиться!!!
Если не заметили, то слева вверху, логотип, на нем слова написаны, которыми данный форум занемаеться!
Если вам трудно найти то напишу"Украинский форум 1С, Помощь в ежедневных вопросах".
Чем больше помощи людям, рано или поздно все это, приумножиться и вернеться, независимо хотите вы этого!
Все 3 темы автора (по реестрам НН) - однообразны. Это только я так считаю? Или может стоит слепить эти темы в одну?
Цитата(Vofka @ 23.02.11, 13:13)
yfrf111, алё! Хватит жестко офтопить. Изначальный вопрос решён? Если решён - создаём другую тему с новым вопросом, если нет - продолжаем писать здесь по теме. Не нужно всё свои вопросы сваливать в одну тему!
Vofka Вы уже как-то определитесь, как мне писать, свои впоросы! Я бы все, это сделал, в одну тему, все мои вопросы касаемые рееста, касаються только реестра! Тойсть одной темы, кроме налоговых накладных.
Иногда пару верных слов, могут направить, прямо в точку! А эта точка, выглядит так. Для релиза А4 БТР ИДНДир = ВыбФирма.Директор.Получить(ДатаКон).ИДНомер; ////Для Директора ИДНБух = ВыбФирма.ГлавныйБухгалтер.Получить(ДатаКон).ИДНомер; ////Для гл.Бух.
Соответственно, в ячейках пишем для Дир. Сред(ИДНДир, 1, 1) и.т.д до 10 а для гл.Буха, наверно уже догадались)
А литература и здесь выкладывалась - смотрите соответствующий раздел.
ЗЫ. С такими конфигурациями нельзя работать ни бесплатно ни задешево. Разработчик отказался от сопровождения - думаете, сможете успевать за изменениями законодательства?
Как, я вижу, и действующие конфигурации, вернее их разработчики, не успевают и с ошибками, дают обновления. Просто у здешних бухгалтеров, небольшие запросы. Предприятие, не действует уже.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!
Открытая тема (есть новые ответы)
Опрос (есть новые голоса)
Открытая тема (нет новых ответов)
Опрос (нет новых голосов)
Горячая тема (есть новые ответы)
Закрытая тема
Горячая тема (нет новых ответов)
Тема перемещена