Freshmark replication server

freshmark-canonical

Program drill-down

CS_OTHER_IS_DEL

COLD STORAGE OTHER ISSUE DELETIONS. Type DSP, base table LOC_TRANS.

Field inventory

102

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 LOC_TRANS LT_AGENT T 0 1, 181
  
1 0.0 LOC_TRANS LT_DEPNO I -1 371, 157
  
1 0.0 LOC_TRANS LT_TYPE I -1 371, 205
  
1 0.0 I 0 41, 181
  
1 0.0 LOC_TRANS LT_ITEM I 0 21, 313
  
1 0.0 I 0 1, 397
  
1 0.0 IROOM I -1 371, 325
  
1 0.0 LOC_TRANS LT_PRQTY I -1 371, 349
  
1 0.0 LOC_TRANS LT_CONT_CHG_QTY I -1 371, 373
  
1 0.0 LOC_TRANS LT_TRTARIFF I -1 371, 397
  
1 0.0 LOC_TRANS LT_TRVALUE I -1 371, 421
  
1 0.0 LOC_TRANS LT_RCODE I -1 371, 457
$SELECT  S:REASON;I\LT_RCODE    $CALCULATE  F:REASON_MAST;Y;;I\RCODE_DESC=RSN_DESC;RSN_REASON='$I\LT_RCODE$';I\LT_RCODE  O:BACKCOLOR;C\DEL;YELLOW  O:SETFOCUS;C\DEL  
1 0.0 CMD 1 C -1 651, 541
$SELECT  U:CS_DOC_DELETION;LAST_ISSUE_CHECK  I:I\TMP99;=;Y  DO(MM1)   D:LATER ISSUES DETECTED, CANNOT DELETE;ERRORM;I\LT_DOCNO   A:CONST;;I\TMP99  DOEND(MM1)    O:DISABLEINPUT;C\DEL    U:CS_OTHER_IS_DELETION;UPD_TABLES  U:CALL_OTHER_ISSUE_CR_NOTE;CALL    O:ENABLEINPUT;C\DEL    A:CONST;DELETE WAS SUCCESSFUL;T\DELSUC    
1 0.0 DEP_DATE I 0 41, 229
  
1 0.0 LOC_TRANS LT_SHELF I 0 321, 529
  
1 0.0 CMD 46 C -1 421, 457
$SELECT  S:REASON;I\LT_RCODE
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 81, 61
$DEFAULT  A:USERIP;;I\IP  
1 0.0 ORGS I 0 61, 61
$DEFAULT  'A:ORGS;;I\ORGS    
1 0.0 MARKET I 0 41, 61
'TO LOAD MARKET NAME  $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 DEFAULT I 0 21, 61
$DEFAULT  'INITIALIZES THE DATE AND TIME INTO THE T\DATE AND T\TIME FIELDS  A:DATE;DD MMM YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  ''A:TIMER_ON;1000    'PUTS PIC ON THE UPDATE BUTTON  O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\DEL    'O:HIDE;I\LT_DEBTOR,I\LT_ITEM,I\LT_CONT_TYPE,T\LT_DEBTOR,T\LT_ITEM,T\LT_CO
1 0.0 LOC_TRANS LT_DOCNO T -1 201, 109
  
1 0.0 LOC_TRANS LT_DEPNO T -1 201, 157
  
1 0.0 LOC_TRANS LT_TYPE T -1 201, 205
  
1 0.0 LOC_TRANS LT_RCODE T -1 201, 457
  
1 0.0 T -1 201, 253
  
1 0.0 LOC_TRANS LT_ITEM T 0 1, 313
  
1 0.0 LOC_TRANS LT_CONT_TYPE T 0 11, 289
  
1 0.0 ROOM T -1 201, 325
  
1 0.0 QTY T -1 201, 349
  
1 0.0 CONT_QTY T -1 201, 373
  
1 0.0 LOC_TRANS LT_TRTARIFF T -1 201, 397
  
1 0.0 LOC_TRANS LT_TRVALUE T -1 201, 421
  
1 0.0 LOC_TRANS LT_TAXINV I -1 371, 109
$SELECT    S:OTHER_ISSUES_DEL;I\LT_DOCNO    $CALCULATE  A:CONST;;T\DELSUC  M:  C:UCASE    F:LOC_TRANS;Y;;I\DELIND=LT_DELIND,I\DEBTOR=LT_DEBTOR,I\ROOM=LT_LOCA,I\CONT=LT_PRCONT,I\COMM1=LT_ITEM,I\TYPE=LT_TYPE;LT_TAXINV='$I\LT_DOCNO$';I\LT_DOCNO      I:I\DELIND;=;Y    D:THIS DOCUMENT IS ALREADY DELETED.;ERRORM;I\LT_DOCNO  
1 0.0 DEP_TIME I 0 41, 253
  
1 0.0 TMP99 I 0 101, 529
  
1 0.0 H -1 0, 0
  
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 241, 49
  
1 0.0 LOC_TRANS LT_TRVAT I -1 581, 421
  
1 0.0 RCODE_DESC I -1 461, 457
  
1 0.0 LOC_TRANS LT_TRVAT T -1 521, 421
  
1 0.0 TYPE_DESC T -1 531, 205
  
1 0.0 DEP_DESC T -1 531, 253
  
1 0.0 ITEM_DESC T -1 531, 277
  
1 0.0 CONT_DESC T -1 531, 301
  
1 0.0 ROOM_DESC T -1 531, 325
  
1 0.0 CMD 44 C -1 471, 109
$SELECT  S:LOCATION_TRANS;I\LT_DOCNO
1 0.0 USERID I 0 101, 61
$DEFAULT  A:USERID;;I\USERID  
1 0.0 Work 54 I 0 491, 157
  
1 0.0 SUPPLIER T 0 1, 349
  
1 0.0 T -1 201, 289
  
1 0.0 LOC_TRANS LT_AGENT I 0 1, 373
  
1 0.0 SUPP I -1 371, 253
  
1 0.0 I -1 371, 289
  
1 0.0 LOC_TRANS LT_SECTION I 0 301, 529
  
1 0.0 Work 66 I 0 541, 181
  
1 0.0 Work 1 I 0 411, 577
  
1 0.0 Label 69 T 0 291, 577
  
1 0.0 ISSUES I 0 351, 577
  
1 0.0 ADJUSTMENTS I 0 381, 577
  
1 0.0 LOC_TRANS LT_LOCA I 0 281, 529
  
1 0.0 Work 65 I 0 461, 541
  
1 0.0 Label 62 T 0 351, 541
  
1 0.0 CONSIGNO I 0 391, 541
  
1 0.0 Work 64 I 0 421, 205
  
1 0.0 Work 55 I 0 421, 541
  
1 0.0 Work 56 I 0 441, 541
  
1 0.0 Work 57 I 0 481, 541
  
1 0.0 Work 58 I 0 501, 541
  
1 0.0 Work 59 I 0 521, 541
  
1 0.0 Work 60 I 0 541, 541
  
1 0.0 Work 61 I 0 561, 541
  
1 0.0 ITEM I 0 71, 577
  
1 0.0 SIZE I 0 91, 577
  
1 0.0 CLASS I 0 111, 577
  
1 0.0 CONTMASS I 0 151, 577
  
1 0.0 COUNT I 0 171, 577
  
1 0.0 PROV I 0 191, 577
  
1 0.0 Label 12 T 0 91, 457
  
1 0.0 Label 17 T 0 251, 529
  
1 0.0 Work 15 I 0 511, 109
  
1 0.0 Work 13 I 0 41, 529
  
1 0.0 Work 14 I 0 61, 529
  
1 0.0 Label 18 T 0 1, 529
  
1 0.0 Work 19 I 0 531, 109
  
1 0.0 Work 1 I 0 581, 541
  
1 0.0 Work 1 I 0 561, 109
  
1 0.0 CONS I 0 81, 529
  
1 0.0 CDATE I 0 561, 133
  
1 0.0 Work 1 I 0 61, 109
  
1 0.0 Work 1 I 0 671, 109
  
1 0.0 Label 3 T -1 531, 493
  
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