Сообщения без ответов | Активные темы Текущее время: Пт мар 29, 2024 3:52 pm



Ответить на тему  [ Сообщений: 7 ] 
Смена НДС 
Автор Сообщение
Новичок

Зарегистрирован: Ср ноя 01, 2006 10:02 am
Сообщения: 61
Откуда: РК, г.Актюбинск
Сообщение Смена НДС
Здравствуйте, как это не тяжко но с нового года у нас новая ставка НДС (сейчас 15% а будет 14%) сменить требуется в 00:00, т.к. у нас магазин круглосуточный, посему решил написать обработку, чтобы она сама сменила ставку, не горю желанием приезжать на работу в новый год, тем более в самый разгар пьянки...

Штрих-М ПРОФ: обработка добавляет НДС в справочник ставок, изменяет константу, в константах соотвественно
Штрих-М Кассир: изменяет НДС 15% в Налогах на 14%.

собственно вопросы:
1. Везде ли я изменил НДС в эти программах?
2. Как программно изменить НДС в Штрих ФР-Ф-KZ ? т.е. без использования программы Тест драйвера ФР, я знаю что это надо делать в таблицах, но вот как это сделать "без рук"?

_________________
Антон Прокопенко
Инженер-программист ТОО "БРИГ"


Пн дек 25, 2006 1:25 pm
Профиль ICQ WWW
Постоянный участник
Аватара пользователя

Зарегистрирован: Пн мар 14, 2005 10:11 am
Сообщения: 2358
Откуда: Штрих-М
Сообщение 
Цитата:
1. Везде ли я изменил НДС в эти программах?

Да этого будет достаточно.

_________________
_________________
С уважением, Суворов Антон,
Преподаватель учебно-тренингового центра
e-mail: suvorov@shtrih-m.ru,
тел. (495) 787-60-90.


Пн дек 25, 2006 7:02 pm
Профиль WWW
Постоянный участник
Аватара пользователя

Зарегистрирован: Чт мар 10, 2005 6:41 pm
Сообщения: 9908
Откуда: ЗАО "ШТРИХ-М", г. Москва
Сообщение Re: Смена НДС
dark_avenger писал(а):
2. Как программно изменить НДС в Штрих ФР-Ф-KZ ? т.е. без использования программы Тест драйвера ФР, я знаю что это надо делать в таблицах, но вот как это сделать "без рук"?

Для реализации интересующей Вас возможности необходимо использовать методы работы с таблицами, а именно WriteTable (ЗаписатьТаблицу). Подробнее о данном методе Вы можете узнать в Руководстве программиста.

_________________
С уважением, Гонтарь Тимофей Владимирович
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ: Работает Официальный Интернет-Магазин от компании Штрих-М www.shels-m.ru


Пн дек 25, 2006 7:11 pm
Профиль WWW
Новичок

Зарегистрирован: Ср ноя 01, 2006 10:02 am
Сообщения: 61
Откуда: РК, г.Актюбинск
Сообщение 
спасибо, вы меня обрадовали,
сейчас буду искать про WriteTable...

_________________
Антон Прокопенко
Инженер-программист ТОО "БРИГ"


Вт дек 26, 2006 7:46 am
Профиль ICQ WWW
Постоянный участник
Аватара пользователя

Зарегистрирован: Чт мар 10, 2005 6:41 pm
Сообщения: 9908
Откуда: ЗАО "ШТРИХ-М", г. Москва
Сообщение 
В Руководстве программиста описание данного метода находится на стр. 130.

_________________
С уважением, Гонтарь Тимофей Владимирович
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ: Работает Официальный Интернет-Магазин от компании Штрих-М www.shels-m.ru


Вт дек 26, 2006 10:33 am
Профиль WWW
Новичок

Зарегистрирован: Ср ноя 01, 2006 10:02 am
Сообщения: 61
Откуда: РК, г.Актюбинск
Сообщение 
получилось :)

_________________
Антон Прокопенко
Инженер-программист ТОО "БРИГ"


Ср дек 27, 2006 7:03 am
Профиль ICQ WWW
Новичок

Зарегистрирован: Ср ноя 01, 2006 10:02 am
Сообщения: 61
Откуда: РК, г.Актюбинск
Сообщение может кому и пригодится
вот таким способом я изменил НДС... может кому пригодится...
Обработка регистрация продаж, процедура Ожидание()

Код:
//31.12.2006 Anton Prokopenko START       
   Если (текущаядата()>=дата("01.01.2007")) и (НалогИзменен=0) Тогда
      спр=СоздатьОбъект("Справочник.Налоги");
      спр.ВыбратьЭлементы();
      Пока спр.ПолучитьЭлемент()=1 Цикл
          Если спр.Ставка=15 Тогда
               спр.ТекстДляЧека="НДС 14%";
              спр.Ставка=14;
            спр.Записать();                           
            НалогИзменен=1;                       
            
            ФискальныйРегистратор.RowNumber=2;
            ФискальныйРегистратор.TableNumber=6;
            ФискальныйРегистратор.FieldNumber=1;
            ФискальныйРегистратор.Password=Число(Константа.ПарольСистемногоАдминистратора);
            ФискальныйРегистратор.GetFieldStruct();
            Если ФискальныйРегистратор.ResultCode<>0 Тогда
                  Предупреждение("Ошибка перевода НДС");
            КонецЕсли;
            ФискальныйРегистратор.RowNumber=2;
            ФискальныйРегистратор.TableNumber=6;
            ФискальныйРегистратор.FieldNumber=1;
            ФискальныйРегистратор.Password=Число(Константа.ПарольСистемногоАдминистратора);
            ФискальныйРегистратор.ValueOfFieldInteger=14;
            ФискальныйРегистратор.WriteTable();
            
            ФискальныйРегистратор.RowNumber=2;
            ФискальныйРегистратор.TableNumber=6;
            ФискальныйРегистратор.FieldNumber=2;
            ФискальныйРегистратор.Password=Число(Константа.ПарольСистемногоАдминистратора);
            ФискальныйРегистратор.GetFieldStruct();
            Если ФискальныйРегистратор.ResultCode<>0 Тогда
                  Предупреждение("Ошибка перевода НДС");
            КонецЕсли;
            ФискальныйРегистратор.RowNumber=2;
            ФискальныйРегистратор.TableNumber=6;
            ФискальныйРегистратор.FieldNumber=2;
            ФискальныйРегистратор.Password=Число(Константа.ПарольСистемногоАдминистратора);
            ФискальныйРегистратор.ValueOfFieldString="НДС 14%";
            ФискальныйРегистратор.WriteTable();
            
            Предупреждение("НДС изменен на 14%");
         КонецЕсли;                                       
      КонецЦикла;
   КонецЕсли;                         
   //31.12.2006 Anton Prokopenko END


Налог изменен Глоб. переменная....

_________________
Антон Прокопенко
Инженер-программист ТОО "БРИГ"


Ср янв 10, 2007 10:04 am
Профиль ICQ WWW
Показать сообщения за:  Поле сортировки  
Ответить на тему   [ Сообщений: 7 ] 

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group.
Designed by STSoftware for PTF.
Русская поддержка phpBB