Freshmark replication server

freshmark-canonical

Program drill-down

ZZUSER_MAN

USER MAINTENANCE. Type MAN, base table ZU_USER.

Field inventory

83

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 Label 7 T -1 231, 187
  
1 0.0 CMD 6 C -1 191, 211
$SELECT  S:AGENT_MAST;I\ZU_AGENT    
1 0.0 CMD 5 C -1 191, 187
  
1 0.0 ZU_USER ZU_EMAIL T -1 11, 427
  
1 0.0 Label 3 T -1 11, 187
  
1 0.0 Label 4 T -1 11, 211
  
1 0.0 Label 8 T -1 231, 211
  
1 0.0 ZU_USER ZU_LEVEL T 0 71, 547
  
1 0.0 ZU_USER ZU_LEVEL I 0 241, 547
$AFTER_READ  A:CONST;5;I\ZU_LEVEL  
1 0.0 ZU_USER ZU_SECURITY_LEVEL I 0 241, 523
$AFTER_READ  A:CONST;5;I\ZU_SECURITY_LEVEL
1 0.0 ZU_USER ZU_SECURITY_LEVEL T 0 71, 523
  
1 0.0 ZU_USER ZU_WEB_PASSWORD I 0 11, 523
  
1 0.0 DESC T -1 491, 151
  
1 0.0 CMD 2 C -1 451, 151
  
1 0.0 EDIT C -1 661, 331
$SELECT  I:I\ZU_USERID;<>;  E:$GBLROOT$WINDOWS\NOTEPAD.EXE $GBLROOT$LEGEND\PROJ_FMS\INI\$I\ZU_USERID$\FMS.INI  
1 0.0 ZU_USER ZU_USER_LANG T -1 301, 151
  
1 0.0 ZU_USER ZU_USER_LANG I -1 401, 151
$SELECT  S:ZZ_LANG;I\ZU_USER_LANG    $VALIDATE  I:I\ZU_USER_LANG;<>;  F:ZZ_LANGUAGE;Y;ZZ_KEY;T\DESC=ZZ_DESC;ZZ_TYPE = 'LNG'    'CHANGE TEXT CASE TO UPPER CASE  C:UCASE
1 0.0 Label 1 T -1 561, 247
  
1 0.0 Label 2 T -1 311, 283
  
1 0.0 ZU_USER ZU_LOCAL_IP5 I -1 411, 319
  
1 0.0 Label 3 T -1 561, 283
  
1 0.0 ZU_USER ZU_LOCAL_IP4 I -1 661, 283
  
1 0.0 Label 4 T -1 311, 319
  
1 0.0 ZU_USER ZU_LOCAL_IP3 I -1 411, 283
  
1 0.0 ZU_USER ZU_LOCAL_IP T -1 311, 247
  
1 0.0 ZU_USER ZU_LOCAL_IP2 I -1 661, 247
  
1 0.0 ZU_USER ZU_LOCAL_IP I -1 411, 247
  
1 0.0 ZU_USER ZU_PW_EXPIRY T -1 361, 391
X
1 0.0 Label 1 T -1 361, 355
  
1 0.0 ZU_USER ZU_PASSWORD T 0 581, 391
X
1 0.0 Work 1 I 0 461, 97
  
1 0.0 ZU_USER ZU_BLOCKED I 0 291, 523
  
1 0.0 Label 1 T -1 361, 67
  
1 0.0 ZU_USER ZU_GUID I 0 681, 199
  
1 0.0 RESET_WEB_PW I -1 541, 355
$DEFAULT  A:CONST;N;I\RESET_WEB_PW    $VALIDATE  C:UCASE  V:Y;N;    $BEFORE_WRITE  I:I\RESET_WEB_PW;=;Y  A:CMD5;DEFAULT;I\ZU_WEB_PASSWORD    
1 0.0 TERMID I -1 431, 67
  
1 0.0 Work 2 I 0 681, 163
  
1 0.0 Label 2 T -1 11, 391
X
1 0.0 Label 1 T 0 491, 127
X
1 0.0 ZU_USER ZU_SHORTCUT T -1 11, 451
X
1 0.0 ZU_USER ZU_STATUS T -1 231, 391
X
1 0.0 ZU_USER ZU_ZC T -1 11, 247
X
1 0.0 Label 9 T -1 11, 271
X
1 0.0 CMD 8 C -1 251, 247
$SELECT  S:ZC_SEC_GROUP;I\ZU_ZC  $VALIDATE  C:UCASE  F:  M:
1 0.0 Work 1 I 0 171, 61
  
1 0.0 Label 4 T 0 569, 64
  
1 0.0 Work 3 I 0 681, 127
  
1 0.0 ZU_USER ZU_NAME T -1 11, 127
X
1 0.0 ZU_USER ZU_NAME I -1 151, 127
'CHANGE TEXT CASE TO UPPER CASE  $VALIDATE  C:UCASE
1 0.0 ZU_USER ZU_INITIALS T -1 11, 151
X
1 0.0 ZU_USER ZU_INITIALS I -1 151, 151
'CHANGE TEXT CASE TO UPPER CASE  $VALIDATE  C:UCASE
1 0.0 ZU_USER ZU_SURNAME T -1 11, 103
X
1 0.0 ZU_USER ZU_SURNAME I -1 151, 103
'CHANGE TEXT CASE TO UPPER CASE  $VALIDATE  C:UCASE    
1 0.0 ZU_USER ZU_PRINTER_TYPE I -1 541, 187
$VALIDATE  C:UCASE    I:I\ZU_PRINTER_TYPE;=;  A:CONST;C;I\ZU_PRINTER_TYPE    V:C;E
1 0.0 ZU_USER ZU_USERID T -1 11, 61
X
1 0.0 ZU_USER ZU_USERID I -1 152, 66
$SELECT  S:ZU_USER    'CHANGE TEXT CASE TO UPPER CASE  $VALIDATE  M:  C:UCASE    A:DATE;DD MMM YYYY;I\MODIFIED    $AFTER_READ  A:VAR;I\ZU_SURNAME;W\ZU_SURNAME  I:W\ZU_SURNAME;=;    DO      A:CONST;;I\RESET_PW    DOEND  I:W\ZU_SURNAME;<>;    DO      A:CONST;;I\RESET_PW    DOEND    'ADDED BY JD 20140602 - TO DEFAULT A VA
1 0.0 CMD 7 C -1 311, 67
$SELECT  S:ZU_USER;I\ZU_USERID
1 0.0 H -1 1, 31
X
1 0.0 ZU_USER ZU_MARKET I -1 151, 187
$DEFAULT  A:ORG  F:CLIENT_MAST;;;T\MARKET=CM_NAME;CM_CODE='$I\ZU_MARKET$'  A:CONST;N;I\ZU_BLOCKED  U:MENU_GROUP;LOOKUP  'CHANGE TEXT CASE TO UPPER CASE  $VALIDATE  C:UCASE      $CALCULATE  F:CLIENT_MAST;Y;;T\MARKET=CM_NAME;CM_CODE='$I\ZU_MARKET$'      $AFTER_READ  I:I\ZU_MARKET;=;  A:ORG  F:CLIENT_MAST;;;T\MARKET=CM_NA
1 0.0 ZU_USER ZU_AGENT I -1 151, 211
$SELECT  S:AGENT_MAST_MKT;I\ZU_AGENT;I\ZU_MARKET    'CHANGE TEXT CASE TO UPPER CASE  $VALIDATE  C:UCASE    $CALCULATE  I:I\ZU_AGENT;<>;  F:AGENT_MAST;Y;AM_CODE;T\AGENT=AM_NAME;AM_MARKET='$I\ZU_MARKET$';I\ZU_AGENT    I:I\ZU_AGENT;=;  A:CONST;;T\AGENT    $AFTER_READ  F:AGENT_MAST;;AM_CODE;T\AGENT=AM_NAME;AM_MARKET='$I\ZU
1 0.0 Label 1 T 0 569, 88
  
1 0.0 ZU_USER ZU_DATE_MODIFIED I 0 681, 91
  
1 0.0 ZU_USER ZU_PRINTER_TYPE T -1 451, 187
  
1 0.0 Label 2 T -1 571, 187
  
1 0.0 ZU_USER ZU_DATE_CREATED I 0 681, 67
  
1 0.0 Work 1 I 0 400, 481
$DEFAULT    A:DATE;YYYY/MM/DD;I\DATE
1 1.0 ZU_USER ZU_EMAIL I -1 151, 427
  
1 1.0 ZU_USER ZU_PW_EXPIRY I -1 541, 391
X
1 1.0 ZU_USER ZU_PASSWORD I 0 671, 391
$BEFORE_WRITE  I:I\RESET_PW;=;Y    DO      A:CONST;DEFAULT;I\ZU_PASSWORD    DOEND  $AFTER_WRITE  I:I\RESET_PW;=;Y    DO      D:PASSWORD HAS BEEN SET TO DEFAULT!    DOEND
1 1.0 Work 3 I -1 151, 391
$VALIDATE  C:UCASE  V:Y;  $AFTER_WRITE  I:I\RESET_PW;=;"Y"    A:SETPW;I\ZU_USERID;I\ZU_PASSWORD
1 1.0 ZU_USER ZU_SHORTCUT I -1 11, 475
$SELECT  S:ZU_MENU
1 1.0 ZU_USER ZU_STATUS I -1 291, 391
$VALIDATE  C:UCASE  V:;D;T;A;S
1 1.0 ZU_USER ZU_ZC I -1 151, 247
$SELECT  S:ZC_SEC_GROUP;I\ZU_ZC  '$VALIDATE  'F:ZC_SEC_GROUP;Y;ZC_KEY;T\ZU_ZC_DESC=ZC_DESC  '$AFTER_READ  'F:ZC_SEC_GROUP;;ZC_KEY;T\ZU_ZC_DESC=ZC_DESC    'CHANGE TEXT CASE TO UPPER CASE  $VALIDATE  A:CONST;;I\MENU_FLAG  C:UCASE  U:DEV_CHK  I:I\PARM;<>;DEV  DO(P)  I:I\MENU_FLAG;=;Y  ''D:YOU ARE NOT ALLOWED TO ENTER DEV 
10 0.0 ZX_EXIT Z 0 1, 31
X
10 0.0 ZX_UPDATE Z 0 1, 31
$UPDATE  U:ZZCREATE_USER;INI;I\ZU_USERID  'U:USER_CHANGES;GET_CHANGES    '$AFTER_WRITE  'U:PWD_STAT_UPD;USER_CHANGE  
10 0.0 ZX_DELETE Z 0 1, 31
X
10 0.0 zzExit Z 0 1, 31
X
10 0.0 zzPrint Z 0 1, 31
X
10 0.0 ZX_PRINT Z 0 1, 31
X
10 0.0 ZX_SELECT Z 0 1, 31
X
10 0.0 zzUpdate Z 0 1, 31
X
10 0.0 zzDelete Z 0 1, 31
X
10 0.0 zzSelect Z 0 1, 31
X