1С Попрошайка.
  • Добрый день!
    А к обновлениям УПП доступ у кого-нибудь случайно есть?
  • ЦентрФирма=Докум.Фирма.ТТ_Склад.Грузополучатель;
    Банк = "";НомерСчета = "";БИКБанка = "";СчетБанка = "";
    глПлатежныеРеквизиты(?(ПустоеЗначение(ЦентрФирма)=1,Докум.Фирма.ОсновнойСчет, ЦентрФирма.ОсновнойСчет),, Банк, НомерСчета, БИКБанка, СчетБанка);
    ПериодОплаты=Формат(ДатаМесяц(Докум.ДатаДок),"Ч(0)2")+Прав(ДатаГод(Докум.ДатаДок),2);
    Сумма= ТаблЗнач.Итог("Сумма")*100;
    ЮрЛицо=Докум.Фирма.ЮрЛицо;
    ИНН=глПолучитьИНН(ЮрЛицо.ИНН);
    КПП=глПолучитьКПП(ЮрЛицо.ИНН);
    Продавец= СокрЛП(ПараметрыФирма.Получить("ОфициальноеНаименование")+" ("+ПараметрыФирма.Получить("Наименование")+")");
    БлокОбязательныхРеквизитов="Name="+ Продавец+"|"+"PersonalAcc="+СокрЛП(НомерСчета)+"|"+"BankName="+СокрЛП(Банк)+"|"+"BIC="+СокрЛП(БИКБанка)+"|"+"CorrespAcc="+СокрЛП(СчетБанка);
    БлокДополнительныхРеквизитов="Purpose="+"накладная №"+Докум.номерДок+" от "+Докум.ДатаДок+"|"+"Sum="+Сумма+"|"+"PayeeINN="+СокрЛП(ИНН)+"|"+"KPP="+СокрЛП(КПП)+"|"+"PaymPeriod="+ПериодОплаты +"|"+"TechCode="+ "15";
    Штрихкод="ST00012|"+БлокОбязательныхРеквизитов+"|"+БлокДополнительныхРеквизитов;
  • это код для QR-кода

Привет, незнакомец!

Похоже, Вы новенький! Чтобы начать обсуждение, кликните на одну из кнопок ниже ;)