Freshmark replication server

freshmark-canonical

Program drill-down

WHS_DELETED_CONS

WHOLESALE DELETED CONSIGNMENTS. Type DSP, base table TROLLEY_MAST.

Field inventory

29

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 H -1 0, 0
  
1 0.0 CMD 1 C -1 331, 229
$SCMD_FOCUS  O:BACKCOLOR;C\RUN;YELLOW  $SELECT    I:I\DATE_D;=;  A:CONST;$T\DATE$;I\DATE_D    I:I\TO_DATE;=;  A:CONST;$T\DATE$;I\TO_DATE      '/PRINT=PRINT_WHOLESALE_TRANS_BY_CONSIGN;18,,01 MAR 2011,07 APR 2011,S /IC:\LEGEND\PROJ_FMS\INI\LAZOLA\FMS.INI  E:$GBLROOT$LEGEND\PROJ_FMS\BIN\PRINTING.EXE /PRINT=PRINT_WHOLESALE
1 0.0 Label 1 T -1 231, 181
  
1 0.0 Work 2 I -1 361, 181
$VALIDATE    I:I\TO_DATE;=;  A:CONST;$T\DATE$;I\TO_DATE    A:DATEDIFF;I\TO_DATE;I\DATEDIFF;I\DATE_D  I:I\DATEDIFF;<;0  D:TO DATE CANNOT BE LESS THAN FROM DATE;ERRORM;I\TO_DATE      O:SETFOCUS;C\RUN  O:BACKCOLOR;C\RUN;YELLOW
1 0.0 Label 2 T -1 291, 25
  
1 0.0 Label 3 T -1 241, 49
  
1 0.0 MARKET I 0 31, 85
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET  A:ORGS;;I\AGENT    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME    'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL  C:MCASE;;T\MARKET    A:DATE;DD MMM YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000      'O:SETFOCUS;C\RUN  'O:BACKCOLOR;C\RUN;YELLOW
1 0.0 Label 5 T -1 621, 25
  
1 0.0 Label 6 T -1 671, 25
  
1 0.0 Label 7 T -1 621, 49
  
1 0.0 Label 8 T -1 671, 49
  
1 0.0 Label 9 T -1 1, 25
  
1 0.0 DATE I -1 361, 145
$DEFAULT  A:DATE;DD MMM YYYY;I\DATE_D  A:DATE;DD MMM YYYY;I\TO_DATE    $VALIDATE  'M:  'C:UCASE  'I:I\DATE_D;<>;T\DATE      '  D:ERROR - YOU MUST ENTER TODAY'S DATE ONLY;ERRORM;I\DATE_D   '  O:SETFOCUS;C\RUN    I:I\DATE_D;=;  A:CONST;$T\DATE$;I\DATE_D    I:I\DATE_D;<>;   DO(FDTE)    O:SETFOCUS;I\TO_DATE   DOEND(FDTE)  
1 0.0 Label 2 T -1 231, 145
  
1 0.0 Work 4 I 0 101, 85
  
1 0.0 Work 3 I 0 31, 133
  
1 0.0 Work 1 I 0 101, 169
$SELECT  'S:CONS_EDIT_WHOLESALE;I\CONSIGN;I\MARKET;I\AGENT  S:CONSIGN_WSALE;I\CONSIGN;I\MARKET    $VALIDATE  A:CONST;;W\DELDATE,W\DELNO,W\FINALDATE    I:I\CONSIGN;<>;  DO(VALIDATE)   A:VAR;I\CONSIGN;I\CONSIGN;;00000000   F:STK_DETS;Y;;I\SD_DATE=SD_DATE,W\DELDATE=SD_DATE,W\DELNO=SD_DELNO;SD_MARKET='$I\MARKET$' AND SD_CO
1 0.0 CMD 2 C 0 101, 193
  
1 0.0 Label 3 T 0 1, 169
  
1 0.0 Work 4 I 0 501, 325
  
1 0.0 Work 5 I 0 391, 325
  
1 0.0 Work 6 I 0 501, 349
  
1 0.0 Work 7 I 0 391, 349
  
1 0.0 Work 8 I 0 391, 373
  
10 0.0 ZX_PRINT Z 0 0, 0
  
10 0.0 ZX_SELECT Z 0 0, 0
  
10 0.0 ZX_DELETE Z 0 0, 0
  
10 0.0 ZX_UPDATE Z 0 0, 0
  
10 0.0 ZX_EXIT Z 0 0, 0