GMRCYP9 ; SLC/PKS-KR Remove Terminated Users ; [2/18/00 3:17pm]
Source file <GMRCYP9.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BF | ; Remove Entries for all Terminated Users (By File)
; ; FILENUM File # ; FIELDNUM Field # ; LCNT Line Counter ; RTS( Array of Global Roots ; GTOT Grand Total Terminated Users ; GMRCMSG Array for Bulletin Message ; GMRCCNT Counter Variable ; XMvars Set for Bulletin Message ; |
|
CHECK | ; Check users in <FILE> and <FIELD>
; ; FILENUM File # ; FIELDNUM Field # ; LCNT Line Counter ; RTS( Array of Global Roots ; |
|
FILE(X) | ; Get File Number
|
|
FIELD(X) | ; Get Field Number
|
|
REMOVE | ; Remove Terminated User
; ; DA Current DA Array ; DIC Current Global Root ; LVL Current Level ; IND Indentation (for write statements) ; TERM Terminated Entries Found in File ; TOT Total Terminated Entries Found |
|
REMDAT | ; Get Removal Data (Name and Termination Date)
; ; LVL Current Level ; RTS( Array of Global Roots ; |
|
GETDAT | ; Get Data
; ; DA Current DA Array ; DIC Current Global Root ; DICP Current Global Specifier ; LVL Current Level ; IEN Current Internal Entry Number ; RTS( Array of Global Roots ; |
|
NEXTDAT | ; Next Data (for subfiles)
; ; DA Current DA Array ; DIC Current Global Root ; DICP Current Global Specifier ; LVL Current Level ; IEN Current Internal Entry Number ; OLDDA Previous DA Array ; OLDDIC Previous Global Root ; OLDLVL Previous Level ; CNT Counter ; |
|
EXTDAT | ; Extract Data
; ; GMRCERR Error Message Array ; CDA DA Counter ; LDA Last DA ; NODE Fully Specified Global Node ; NODEDAT Data Stored at Global Node ; NODESUB Node Subscript # ; NODELOC Node Location ($PIECE # of Node) ; GBLLOC Global Subscript Location (#;#) ; DIC Fully Specified Global Root ; DICP Global Specifier ; USRP Pointer to New Person File ; USRNAME User's Name ; USRITD Internal form of User's Termination Date ; USRETD External form of User's Termination Date ; USRSTA User Status ; USRACT User Action ; GMRCUSRP Pointer Holder ; |
|
DEL | ; Delete Entry
; ; DIC Current Global Root ; OLDDIC Former DIC (Global Root) ; DIC(0) Lookup Parameters ; DIC("P") Subfile Specifiers ; DIC("DR") Data Field String ; OLDDA Former DA Array ; DA Current DA Array ; ; DIE Global Root ; DIK Global Root ; DR Data Field String ; DTOUT Timeout Flag ; DUOUT Up-Arrow Out Flag ; DLAYGO "Learn As You Go" Flag ; OLDDUZ Former User ; DUZ Current User ; DUZ(0) Current User Access ; GL Fileman Global Location ; UDA Uppermost DA ; LN Node to Lock ; VAR Field Value ; X Input Data ; Y Output Data ; I Counter ; |
|
DATC | ; Data (FILE/FIELDS) for pointer removal (Consults)
|
|
POST | ; Further post-install action for patch GMRC*3*9.
|
|
RBLDIXS | ; Rebuild indices for ^GMR(123.5 file.
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |