R10 ORL 20170608 — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
 
Строка 1: Строка 1:
 
[[R10_ORL_20170608]] - это бланк из справочника [[R221]]
 
[[R10_ORL_20170608]] - это бланк из справочника [[R221]]
 
  - = ЦЕННИКИ ( 9 магазин ) с учетом выделенных строк = -
 
  - = ЦЕННИКИ ( 9 магазин ) с учетом выделенных строк = -
= Программа =
 
<LABEL2/GETTEXT>
 
result := SeekRef( DREFL2, DANAL2, 'KOD_PLU', 1 )
 
if Empty( result )
 
  result := ''
 
else
 
  result := 'PLU ' + result
 
endif
 
// alc
 
if Empty( result )  and DREFL2 = 'R08 ' and SeekRef( 'R08', DANAL2, 'ALCVOLUME', 1 )>0
 
  result := 'Креп. ' + SeekRef( 'R08', DANAL2, 'ALCVOLUME', 1 ) + ' ' + R11WGHT(danal2,"R08")  +" л"
 
endif
 
if Empty( result )
 
  result := ''
 
endif
 
<LABEL3/GETTEXT>
 
local r20_kod
 
r20_kod := GetPrm( 'TASKANAL', TaskName, TaskNum )
 
if r20_kod = 2509
 
  result := 'Магазин 9'
 
endif
 
if r20_kod = 2511
 
  result := 'Магазин 11'
 
endif
 
result := REALNAME( DREFL1, DANAL1 )
 
<LABEL6/GETTEXT>
 
  result := SeekRef( 'R08', Danal2, 'MADE_IN', 1 )
 
<LABEL4/GETTEXT>
 
// local alc_volume, sql
 
// alc_volume := ''
 
// sql := [ Select ALCVOLUME From R08 Where KOD = ] + KOD
 
// alc_volume := SqlToArr( sql,, ReflisPath )
 
// if !Empty( alc_volume )
 
//  alc_volume := 'Крепость ' + alc_volume + '%'
 
// else
 
//  alc_volume := ''
 
// endif
 
 
= Смотрите также =
 
= Смотрите также =
 
[[R221]]
 
[[R221]]

Текущая версия на 15:14, 5 августа 2021

R10_ORL_20170608 - это бланк из справочника R221

- = ЦЕННИКИ ( 9 магазин ) с учетом выделенных строк = -

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

R221