Freshmark replication server

freshmark-canonical

Program drill-down

TROLLEY_ISSUES

TROLLEY ISSUES. Type MAN, base table TROLLEY_MAST.

Field inventory

83

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 Work 2 I -1 361, 325
  
1 0.0 Work 1 I 0 461, 457
  
1 0.0 Work 1 I 0 1, 421
  
1 0.0 Work 2 I 0 31, 421
  
1 0.0 TOT_TRQTY I 0 91, 481
  
1 0.0 TOT_ISQTY I 0 61, 481
  
1 0.0 Work 2 I 0 571, 517
  
1 0.0 TROLLEY_MAST TM_MARKET I 0 651, 205
  
1 0.0 Work 5 I -1 361, 181
  
1 0.0 Work 1 I 0 1, 517
  
1 0.0 BUYERNO I -1 361, 109
$SELECT  S:DEBTOR_CODE;I\BUYERNO    $CALCULATE  'FROM RYAN    A:CONST;;W\TEMP6  M:  C:UCASE  'U:GET_BUYER;;I\BUYERNO    'CHECK IF SALES HAVE BEEN PROHIBITED  F:CLIENT_MAST;;;I\TMP=CM_PROHIBIT_SALES,I\PROHIBIT_AGENT_SALES=CM_PROHIBIT_AGENT_SALES;CM_CODE='$I\MARKET$';  I:I\TMP;=;Y  D:SALES ARE CURRENTLY PROHIBITED;ERRORM
1 0.0 HIRED_QTY I -1 361, 289
$VALIDATE    M:    I:I\HIRED_QTY;>;I\AVAILQTY  D:ERROR - HIRED QUANTITY CANNOT BE GREATER THAN QUANTITY AVAILABLE;ERRORM;I\HIRED_QTY    'CALCULATE DEPOSIT AMOUNT  A:MULT;I\HIRED_QTY;I\DEP_AMT;I\TM_DDEPOSIT;;#0.00  A:VAR;I\DEP_AMT;I\DEP_AMT;;#0.00    A:MULT;I\HIRED_QTY;I\ISSUE_AMT;I\TM_DRENTAL;;#0.00  A:VAR;I\ISSUE_AMT;
1 0.0 TROLLEY_MAST TM_DDEPOSIT I -1 361, 217
$VALIDATE    M:    I:I\TM_DDEPOSIT;=;0.00  D:ERROR - DAILY DEPOSIT CANNOT BE ZERO;ERRORM;I\TM_DDEPOSIT
1 0.0 TROLLEY_MAST TM_DRENTAL I -1 361, 253
$VALIDATE    M:  I:I\TM_DRENTAL;=;0.00  D:ERROR - DAILY RENTAL CANNOT BE ZERO;ERRORM;I\TM_DRENTAL    
1 0.0 DEP_AMT I -1 361, 361
    
1 0.0 DATE1 I -1 361, 397
  
1 0.0 Work 3 I 0 241, 517
  
1 0.0 TIME1 I -1 361, 433
$BEFORE_WRITE    'IF IT'S A CASH BUYER THEN CALL FUNCTION TO CALCULATE CHANGE LIKE CASH PAYMENTS  I:I\CM_UPD_BUYER_ACC;=;1  DO(UPD)  I:I\ACCTYPE;=;CA   DO(CA)    U:CASHPOINT_SALES;ZV_GEN;I\CODEFLD,I\USER,I\BUYERNO    E:$GBLROOT$LEGEND\PROJ_FMS\BIN\MAINMENU.EXE P CASH_PAYMENTS_MAN_TR $I\CASHPOINT$ $I\USER$ $I\BUYERNO$ $
1 0.0 Work 3 I 0 461, 481
  
1 0.0 Work 1 I -1 511, 517
  
1 0.0 Work 9 I 0 41, 517
  
1 0.0 Work 10 I 0 121, 517
  
1 0.0 Work 11 I 0 81, 517
  
1 0.0 Work 2 I 0 201, 517
  
1 0.0 Work 4 I 0 281, 517
  
1 0.0 Work 5 I 0 321, 517
  
1 0.0 Work 6 I 0 361, 517
  
1 0.0 Work 7 I 0 401, 517
  
1 0.0 Work 1 I 0 441, 517
  
1 0.0 Work 1 I 0 481, 517
  
1 0.0 Work 2 I 0 621, 517
  
1 0.0 Work 1 I 0 531, 517
  
1 0.0 Work 2 I 0 1, 481
  
1 0.0 Work 3 I 0 551, 517
  
1 0.0 Work 1 I 0 31, 481
  
1 0.0 Work 1 I 0 561, 481
  
1 0.0 Work 14 I 0 1, 265
  
1 0.0 Work 15 I 0 101, 361
  
1 0.0 Work 18 I 0 561, 385
  
1 0.0 Work 1 I 0 561, 361
  
1 0.0 Work 16 I 0 561, 409
  
1 0.0 Work 3 I 0 61, 421
  
1 0.0 Work 4 I 0 1, 397
  
1 0.0 Work 5 I 0 1, 289
  
1 0.0 Work 6 I 0 31, 397
  
1 0.0 Work 7 I 0 61, 397
  
1 0.0 Work 8 I 0 1, 361
  
1 0.0 Work 9 I 0 1, 325
  
1 0.0 Work 10 I 0 561, 457
  
1 0.0 Work 11 I 0 91, 421
  
1 0.0 Work 12 I 0 81, 397
  
1 0.0 Work 13 I 0 561, 433
  
1 0.0 Label 3 T -1 291, 25
  
1 0.0 Label 4 T -1 331, 49
  
1 0.0 Label 5 T -1 1, 25
  
1 0.0 Label 8 T -1 621, 49
  
1 0.0 Label 9 T -1 621, 25
  
1 0.0 Label 10 T -1 671, 25
  
1 0.0 Label 11 T -1 671, 49
  
1 0.0 T -1 221, 145
  
1 0.0 Label 13 T -1 501, 145
  
1 0.0 Label 8 T -1 221, 289
  
1 0.0 Label 15 T -1 221, 217
  
1 0.0 Label 16 T -1 221, 253
  
1 0.0 Label 17 T -1 221, 361
  
1 0.0 Label 18 T -1 221, 397
  
1 0.0 Label 7 T -1 221, 181
  
1 0.0 Label 26 T -1 221, 433
  
1 0.0 Label 1 T -1 221, 325
  
1 0.0 Label 2 T -1 221, 109
  
1 0.0 Label 4 T -1 501, 109
  
1 0.0 Work 1 I 0 161, 517
  
1 0.0 TROLLEY_MAST TM_TROLLEYNO I -1 361, 145
$SELECT  S:TROLLEY_NO4;I\TM_TROLLEYNO;I\MARKET    $CALCULATE  A:CONST;;I\HIRED_QTY,I\DEP_AMT    M:  C:UCASE  A:ZEROFILL;I\TM_TROLLEYNO,4,I\TM_TROLLEYNO    F:TROLLEY_MAST;Y;TM_TROLLEYNO;I\FIRST_TIME=TM_INITIALQTY,I\TOT_INCR=TM_TOT_INCRQTY,I\VATCODE_DEP=TM_VATCD_DEP,I\TOT_DECR=TM_TOT_DECRQTY,I\TOT_TRQTY=TM_TOT_RETURNQTY,
1 0.0 DEFAULT I 0 141, 37
'DISPLAYING TIME  $DEFAULT  A:DATE;DD MMM YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000      
1 0.0 MARKET I 0 111, 37
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET    'LOAD MARKET  NAME  'F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME,I\CM_UPD_BUYER_ACC=CM_UPD_BUYER_ACC,I\CM_TROLLEY_RETURN=CM_TROLLEY_RETURN  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME,I\CM_UPD_BUYER_ACC=CM_UPD_BUYER_ACC,I\CM_TROLLEY_RETURN=CM_TROLLEY_RETURN,I\RFID=CM_USE_RFID,I\P
1 0.0 CMD 1 C -1 461, 145
$SELECT  S:TROLLEY_NO4;I\TM_TROLLEYNO;I\MARKET
1 0.0 CMD 3 C -1 461, 109
$SELECT  S:DEBTOR_CODE;I\BUYERNO
1 0.0 H -1 0, 0
  
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