RETPRICE

Материал из Фабиус wiki
Версия от 09:53, 23 мая 2017; Hisava (обсуждение | вклад) (Текст)

(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

RETPRICE - это программа из справочника R266

Вернуть цену на товар

RETPRICE( refl, kod, data, r20_kod )

refl - справочник

kod - код

data - дата

r20_kod - код магазина

Текст

parameters refl, kod, data, r20_kod

if len( refl ) = 3
  refl := refl + ' '
endif

local aa

// r08
if refl = 'R08 '
  aa := R473_PRICE( kod, data,,, r20_kod )
  if !Empty( aa )
    result := aa[6]
  endif
endif

// r11
if refl = 'R11 '
  result := PRODPRICE2( kod, data, r20_kod )
endif

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

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