Предварительный почасовой заказ

Материал из Фабиус wiki
Перейти к: навигация, поиск

Документ NAT

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

Цвета

parameters fld

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

if fld = 'NATTR10' or fld = 'CATTR10'
  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

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

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

NAT