Freshmark replication server

freshmark-canonical

Program drill-down

TROLLEY_MESSAGE_MAN

TROLLEY MESSAGE MAINTENANCE. Type MDL, base table TROLLEY_MAST.

Field inventory

23

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 Label 3 T -1 291, 25
  
1 0.0 Label 4 T -1 261, 49
  
1 0.0 Label 5 T -1 1, 25
  
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    'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE  C:MCASE;;T\MARKET        A:VAR;I\MARKET;I\TM_MARKET      $AFTER_READ  A:VAR;I\MARKET;I\TM_MARKET
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 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 Label 12 T -1 151, 157
  
1 0.0 Label 13 T -1 151, 205
  
1 0.0 Label 14 T -1 151, 253
  
1 0.0 TROLLEY_MAST TM_TROLLEYNO I -1 341, 157
$SELECT  S:TROLLEY_NO;I\TM_TROLLEYNO;I\MARKET    $VALIDATE  M:  C:UCASE    A:ZEROFILL;I\TM_TROLLEYNO,4,I\TM_TROLLEYNO    F:TROLLEY_MAST;Y;TM_TROLLEYNO;;;I\TM_TROLLEYNO        $BEFORE_DELETE  'NOT ALLOWING A USER TO DELETE AN EMPTY FIELDS    I:I\TM_TROLLEYNO;=;  D:YOU CANNOT DELETE THIS FIELD IS EMPTY;ERRORM;I\TM_TROLLE
1 0.0 TROLLEY_MAST TM_MSG I -1 341, 205
$VALIDATE  M:    C:UCASE
1 0.0 TROLLEY_MAST TM_ALTMSG I -1 341, 253
$VALIDATE  C:UCASE
1 0.0 TROLLEY_MAST TM_MARKET I 0 451, 157
  
1 0.0 CMD 1 C -1 401, 157
$SELECT  S:TROLLEY_NO;I\TM_TROLLEYNO;I\MARKET
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