Предварительный почасовой заказ — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
Строка 35: Строка 35:
 
  endif
 
  endif
 
   
 
   
if DATDOC <> DOCS1->DATDOC
 
  { 'clRed', 'clRed' }
 
endif
 
 
 
= Смотрите также =
 
= Смотрите также =
 
[[NAT]]
 
[[NAT]]

Версия 16:49, 10 февраля 2017

Документ NAT

Диспетчерская (все заказы) - Документы - Предварительный почасовой заказ - Торговый дом "Настюша"

Цвета

parameters fld

if fld = 'NATTR5' or fld = 'CATTR5'
  result := { 'clWhite', 'clBlue' }
endif

 if val( K1NAME ) > 0
  if fld = 'NATTR1'
    if Left( K1NAME, 1 ) = '1'
      result := { 'clRed', 'clRed' }
    endif
  endif

  if fld = 'NATTR2'
    if SubStr( K1NAME, 2, 1 ) = '1'
      result := { 'clRed', 'clRed' }
    endif
  endif

  if fld = 'NATTR8'
    if SubStr( K1NAME, 8, 1 ) = '1'
      result := { 'clRed', 'clRed' }
    endif
  endif
endif

if DANAL1 <> DOCS1->DANAL1
  { 'clRed', 'clRed' }
endif

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

NAT