RETPRICE — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Текст) |
||
| (не показаны 2 промежуточные версии этого же участника) | |||
| Строка 10: | Строка 10: | ||
r20_kod - код магазина | 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 | ||
= Смотрите также = | = Смотрите также = | ||
[[Полезные функции]] | [[Полезные функции]] | ||
Текущая версия на 09:53, 23 мая 2017
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
