Freshmark replication server

freshmark-canonical

Program drill-down

PALL_RECOVERY_RPT

PALLET RECOVERY REPORT. Type DSP, base table STK_DETS.

Field inventory

41

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 Label 1 T -1 1, 25
  
1 0.0 Label 2 T -1 291, 25
  
1 0.0 Label 3 T -1 291, 49
  
1 0.0 Label 4 T -1 621, 25
  
1 0.0 Label 5 T -1 671, 25
  
1 0.0 Label 6 T -1 621, 49
  
1 0.0 Label 7 T -1 671, 49
  
1 0.0 IP I 0 41, 61
$DEFAULT  A:USERIP;;I\IP
1 0.0 AGENT Work 9 I -1 371, 157
$DEFAULT  A:ORGS;;I\ORGS    A:VAR;I\ORGS;I\AGENT    F:AGENT_MAST;;;T\AGENT1=AM_NAME;AM_CODE='$I\ORGS$';  I:I\ORGS;<>;  DO(DEF)   O:DISABLEINPUT;I\AGENT,C\AGENT    O:SETFOCUS;I\SMAN  DOEND(DEF)        $SELECT  S:AGENT_CODE;I\AGENT    $VALIDATE  A:CONST;;T\AGENT1  'M:  C:UCASE    'DISABLE AGENT FIELD FOR AGENTS  I:I\AGEN
1 0.0 MARKET I 0 21, 61
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME    'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE  C:MCASE;;T\MARKET
1 0.0 Work 11 I 0 1, 61
$DEFAULT  A:DATE;DD MMM YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000    A:DATE;DD MMM YYYY;I\FDATE  A:DATE;DD MMM YYYY;I\TDATE
1 0.0 CMD 2 C -1 421, 157
  
1 0.0 Label 14 T -1 241, 193
  
1 0.0 CMD 15 C -1 471, 193
$SELECT  I:I\AGENT;<>;  S:SALESMAN_AGENT;I\SMAN;I\AGENT    I:I\AGENT;=;  S:SALESMAN;I\SMAN
1 0.0 USERID I 0 61, 61
$DEFAULT  A:USERID;;I\USERID
1 0.0 Work 19 I -1 371, 193
$SELECT  I:I\AGENT;<>;  S:SALESMAN_AGENT;I\SMAN;I\AGENT    I:I\AGENT;=;  S:SALESMAN;I\SMAN    $VALIDATE  A:CONST;;T\SNAME  'I:I\SMAN;=;  'A:CONST;ALL;T\SNAME    I:I\SMAN;<>;  DO(K22)    I:I\AGENT;<>;    F:SALESMAN_MAST;Y;;T\SNAME=SLS_NAME;SLS_CODE='$I\SMAN$' AND SLS_AGENT='$I\AGENT$';I\SMAN      I:I\AGENT;=;    F:SALES
1 0.0 CMD 20 C -1 301, 385
$SELECT   '/PRINT=PRINT_PALLET_RECOVERY;18,,,,12 OCT 2010,15  OCT 2010,S /IC:\LEGEND\PROJ_FMS\INI\LAZOLA\FMS.INI    A:CONST;COLLECTING DATA...;T\PROG  E:$GBLROOT$LEGEND\PROJ_FMS\BIN\PRINTING.EXE /PRINT=PRINT_PALLET_RECOVERY;$I\MARKET$,$I\AGENT$,$I\SMAN$,$I\PALL$,$I\FDATE$,$I\TDATE$,$I\PALL_TYPE$,S  I:I\ORGS;=;  DO(03) 
1 0.0 Work 1 I -1 371, 337
$SELECT  S:PALLET_TYPE    $VALIDATE  I;I\PALL_TYPE;<>;  DO(T)  F:PALL_TYPE;Y;;T\PALL_DESC_NAME=PTP_DESC;PTP_DELIND <> 'Y' AND PTP_TYPE='$I\PALL_TYPE$';I\PALL_TYPE  DOEND(T)  O:SETFOCUS;C\RUN  O:BACKCOLOR;C\RUN;YELLOW
1 0.0 CMD 2 C -1 411, 337
$SELECT  S:PALLET_TYPE
1 0.0 Label 3 T -1 241, 337
  
1 0.0 Label 4 T -1 441, 337
  
1 0.0 Label 1 T -1 301, 421
  
1 0.0 Label 3 T -1 451, 157
  
1 0.0 Label 1 T -1 241, 157
  
1 0.0 Work 4 I 0 91, 61
  
1 0.0 CMD 1 C -1 471, 229
  
1 0.0 Work 2 I -1 371, 229
$SELECT  S:PALLET_CODE;I\PALL    $VALIDATE  A:CONST;;T\PALL_DESC  'M:  C:UCASE    I:I\PALL;<>;  DO(1)  F:PALL_MAST;Y;;T\PALL_DESC=PM_DESC;PM_PALL='$I\PALL$';I\PALL  O:DISABLEINPUT;I\PALL_TYPE,C\PALL_TYPE  DOEND(1)  I:I\PALL;=;  DO(2)  O:ENABLEINPUT;I\PALL_TYPE,C\PALL_TYPE  DOEND(2)
1 0.0 Label 3 T -1 241, 229
  
1 0.0 Label 4 T -1 241, 265
  
1 0.0 Work 6 I -1 371, 265
$VALIDATE  A:CONST;$T\DATE$;I\TDATE
1 0.0 Label 7 T -1 241, 301
  
1 0.0 Work 8 I -1 371, 301
$VALIDATE  I:I\PALL;<>;  DO(P)  O:SETFOCUS;C\RUN  O:BACKCOLOR;C\RUN;YELLOW  DOEND(P)
1 0.0 Label 9 T -1 501, 193
  
1 0.0 Label 10 T -1 501, 229
  
1 0.0 H -1 0, 30
  
1 0.0 Work 5 I 0 121, 61
  
10 0.0 ZX_UPDATE Z 0 0, 30
  
10 0.0 ZX_EXIT Z 0 0, 30
  
10 0.0 ZX_SELECT Z 0 0, 30
  
10 0.0 ZX_DELETE Z 0 0, 30
  
10 0.0 ZX_PRINT Z 0 0, 30