Freshmark replication server

freshmark-canonical

Program drill-down

COPY_SCR_MAN

COPY AN EXISTING SCREEN DESIGN. Type DSP, base table ZP_PGMS.

Field inventory

19

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 ZP_PGMS ZP_PROGRAM I -1 161, 133
$SELECT  S:ZP_PGMS_2;I\ZP_PROGRAM
1 0.0 ZP_PGMS ZP_PROGRAM T -1 41, 133
  
1 0.0 Work 2 I -1 161, 313
$SELECT  S:ZP_PGMS_1;I\COPY_TO      $VALIDATE  F:ZP_PGMS;;;I\TMP1=ZP_PROGRAM;ZP_PROGRAM='$I\COPY_TO$'  I:I\TMP1;<>;  U:
1 0.0 CMD 3 C -1 401, 133
$SELECT  S:ZP_PGMS_2;I\ZP_PROGRAM
1 0.0 CMD 4 C -1 401, 313
$SELECT  S:ZP_PGMS_1;I\COPY_TO
1 0.0 Label 5 T -1 41, 313
  
1 0.0 Label 6 T -1 311, 61
  
1 0.0 Label 8 T -1 471, 133
  
1 0.0 Label 10 T -1 381, 217
  
1 0.0 Label 11 T -1 471, 313
  
1 0.0 Work 14 I -1 571, 313
$DEFAULT  A:CONST;FMS;I\TDB
1 0.0 CMD 13 C -1 351, 397
  
1 0.0 Work 7 I -1 571, 133
$DEFAULT  A:CONST;DEV;I\FDB
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