PRODNDS

Материал из Фабиус wiki
Версия от 11:24, 23 декабря 2016; Hisava (обсуждение | вклад) (Текст программы)

Перейти к: навигация, поиск

PRODNDS - это функция из справочника R266

% НДС по R11

PRODNDS(NeedKod, [NeedRefl:='R11'] [, defaultNDS:=NDS_STND])

Текст программы

//defaultNDS изначально nil  либо  переданное при вызове значение (0, 10, 18...)
Parameters  NeedKod, NeedRefl:='R11', defaultNDS

Local  assign_defaultNDS:=defaultNDS!=nil

result:=SeekRef(NeedRefl, NeedKod,'PRODNDS',1,0)
if  assign_defaultNDS .and. result=0;  result:=defaultNDS;  endif

Смотрите также

Функции Delphi

Полезные функции