PRODNDS — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
Строка 1: Строка 1:
 
[[PRODNDS]] - это функция из справочника [[R266]]
 
[[PRODNDS]] - это функция из справочника [[R266]]
 
 
  % НДС по R11
 
  % НДС по R11
 
 
[[PRODNDS]]( NeedKod,  [NeedRefl:='R11']  [, defaultNDS:=NDS_STND] )
 
[[PRODNDS]]( NeedKod,  [NeedRefl:='R11']  [, defaultNDS:=NDS_STND] )
 
+
= Текст =
= Текст программы =
+
 
+
 
  //defaultNDS изначально nil  либо  переданное при вызове значение (0, 10, 18...)
 
  //defaultNDS изначально nil  либо  переданное при вызове значение (0, 10, 18...)
 
  Parameters  NeedKod, NeedRefl:='[[R11]]', defaultNDS
 
  Parameters  NeedKod, NeedRefl:='[[R11]]', defaultNDS
Строка 14: Строка 10:
 
  result:=[[SeekRef]](NeedRefl, NeedKod,'[[PRODNDS]]',1,0)
 
  result:=[[SeekRef]](NeedRefl, NeedKod,'[[PRODNDS]]',1,0)
 
  if  assign_defaultNDS .and. result=0;  result:=defaultNDS;  endif
 
  if  assign_defaultNDS .and. result=0;  result:=defaultNDS;  endif
 
 
= '''PRODNDS''' =
 
= '''PRODNDS''' =
 
 
'''PRODNDS''' - это поле из справочника [[R08]] и [[R11]]
 
'''PRODNDS''' - это поле из справочника [[R08]] и [[R11]]
 +
= Смотрите также =
 +
[[Полезные функции]]
  
= Смотрите также =
 
 
[[Функции Delphi]]
 
[[Функции Delphi]]
 
[[Полезные функции]]
 

Версия 16:05, 29 августа 2017

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

PRODNDS

PRODNDS - это поле из справочника R08 и R11

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

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

Функции Delphi