GHC CEX — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
 
(не показаны 3 промежуточные версии этого же участника)
Строка 2: Строка 2:
 
  Переформировать проводки по документу CEX
 
  Переформировать проводки по документу CEX
 
[[GHC_CEX]]( data,  r130_kod )
 
[[GHC_CEX]]( data,  r130_kod )
 
+
data - дата
data - дата
+
r130_kod - код кассы
 
+
r130_kod - код кассы
+
= Текст =
+
parameters data, r130_kod
+
if Empty( r130_kod )
+
  r130_kod := [[CHOICEREFR]]( 'R130', 'KOD', { 'KOD', 'PNAME' } )
+
endif
+
if Empty( data )
+
  data := DATE()
+
endif
+
local cex1, flt, shift
+
shift := DtoS( data ) + '1'
+
cex1 := OPENCHILDDOC( 'CEX', '1', ~ParentForm := "", ~IsCondition := false, ~Month := Month( data ), ~Year := Year( data )  )
+
flt := [ KINDDOC = 'CEX' and LVLNUM = '1' and KSHIFT = '] + shift + [' and KREFL1 = 'R130' and KANAL1 = ] + r130_kod
+
( cex1 )->( SetFilter( flt ) )
+
( cex1 )->( Refresh() )
+
( cex1 )->( DbGoTop() )
+
MAKEPRVS( ( cex1 )->( GetArea() ),, 2 )
+
 
= Смотрите также =
 
= Смотрите также =
 
[[Полезные функции]]
 
[[Полезные функции]]
 
[[Функции Delphi]]
 
  
 
[[CEX]]
 
[[CEX]]

Текущая версия на 15:27, 11 января 2020

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

Переформировать проводки по документу CEX

GHC_CEX( data, r130_kod )

data - дата
r130_kod - код кассы

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

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

CEX