Routine: ORY44

Package	Total	Call Graph
Kernel	2	$$FMTE^XLFDT MES^XPDUTL
Order Entry Results Reporting	2	($$TERM,INFO)^ORY44B EN^ORY44C
VA Fileman	2	^DIE $$GET1^DIQ
MailMan	1	^XMD

Entry Points

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 ; ORYMSG Array for Bulletin Message ; ORYCNT Counter Variable ; XMvars Set for Bulletin Message ;
FILE(X)	; Get File Number
REMDAT	; Get Removal Data (Name and Termination Date) ; ; LVL Current Level ; RTS( Array of Global Roots ;
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
DATO	; Data (FILE/FIELDS) for pointer removal (OERR)
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 ; ORYTEAM Team IEN for Message ; ORYDAT Data File String Holder ;
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 ;
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 ;
CHECK	; Check users in <FILE> and <FIELD> ; ; FILENUM File # ; FIELDNUM Field # ; LCNT Line Counter ; RTS( Array of Global Roots ;
EXTDAT	; Extract Data ; ; ORLPERR 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 ; ORLPUSRP Pointer Holder ;

External References

Name	Field # of Occurrence
^DIE	DEL+52
$$GET1^DIQ	EXTDAT+30, EXTDAT+31
$$TERM^ORY44B	EXTDAT+32
INFO^ORY44B	CHECK+10
EN^ORY44C	BF+35
$$FMTE^XLFDT	EXTDAT+33
^XMD	BF+31
MES^XPDUTL	DEL+54

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^VA(200 - [#200]	EXTDAT+28, EXTDAT+34

Label References

Name	Line Occurrences
$$FIELD	CHECK+8
$$FILE	CHECK+7
CHECK	BF+13
DEL	EXTDAT+33
EXTDAT	GETDAT+13
GETDAT	REMDAT+6
NEXTDAT	GETDAT+13
REMDAT	REMOVE+11, NEXTDAT+22
REMOVE	CHECK+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CDA	EXTDAT+20~
CNT	NEXTDAT+12~, NEXTDAT+14, NEXTDAT+15, NEXTDAT+17, NEXTDAT+18
DA	REMOVE+9~, GETDAT+12, NEXTDAT+13, NEXTDAT+16~, EXTDAT+23, EXTDAT+26, DEL+29, DEL+32, DEL+33~, DEL+39 , DEL+49
DA(	NEXTDAT+15, NEXTDAT+18, DEL+32, DEL+33, DEL+39
DA(" "	NEXTDAT+14, EXTDAT+35, DEL+39
DA(1	NEXTDAT+19*, EXTDAT+24, DEL+39, DEL+46, DEL+49
DIC	REMOVE+9~, GETDAT+9, GETDAT+11, NEXTDAT+13, NEXTDAT+20~, NEXTDAT+21, EXTDAT+23, EXTDAT+24, EXTDAT+26, DEL+29 , DEL+37, DEL+38~*
DIC("DR"	DEL+45*
DIC("P"	DEL+42*
DIC(0	DEL+43*
DICP	GETDAT+10*, NEXTDAT+13, NEXTDAT+20~, EXTDAT+25, DEL+42
DIE	DEL+35~, DEL+38*
DIFROM	BF+11~
DIK	DEL+35~, DEL+38*
DLAYGO	DEL+35~, DEL+44*
DR	DEL+35~, DEL+45*
DT	BF+12
DTOUT	DEL+35~
DUOUT	DEL+35~
DUZ	BF+16
DUZ(0	DEL+36
FIELDNUM	BF+11~, BF+13, CHECK+8*, CHECK+10, REMOVE+15, REMOVE+16, DEL+54
FILENUM	BF+11~, BF+13, CHECK+7*, CHECK+10, REMOVE+15, REMOVE+16, DEL+49, DEL+54
GBLLOC	EXTDAT+20~, EXTDAT+21*, EXTDAT+22
GL	DEL+35~, DEL+38*, DEL+40, DEL+49
GTOT	BF+11~, BF+12, REMOVE+12
I	DEL+31~, DEL+32, DEL+33
IEN	REMOVE+9~, GETDAT+11*, GETDAT+12, NEXTDAT+20~
IND	REMOVE+9~, REMOVE+10*
LCNT	BF+11~, BF+12, BF+13, CHECK+7, CHECK+8
LDA	EXTDAT+20~, EXTDAT+35*
LN	DEL+31~, DEL+40*, DEL+51, DEL+53
LVL	REMOVE+9~, REMOVE+10, REMDAT+5, GETDAT+9, GETDAT+10, GETDAT+13, NEXTDAT+13, NEXTDAT+20~, NEXTDAT+21*
NODE	EXTDAT+20~, EXTDAT+26*
NODEDAT	EXTDAT+20~, EXTDAT+26*, EXTDAT+27
NODELOC	EXTDAT+20~, EXTDAT+22*, EXTDAT+23, EXTDAT+24, EXTDAT+27
NODESUB	EXTDAT+20~, EXTDAT+22*, EXTDAT+23, EXTDAT+24, EXTDAT+26
NOW	BF+11~, BF+12*
OLDDA	NEXTDAT+12~, NEXTDAT+13, NEXTDAT+19, DEL+32, DEL+33
OLDDA(	NEXTDAT+15, NEXTDAT+18, DEL+32, DEL+33
OLDDA(" "	NEXTDAT+17
OLDDIC	NEXTDAT+12~, NEXTDAT+13, NEXTDAT+21, DEL+35~, DEL+37, DEL+38
OLDDICP	NEXTDAT+12~, NEXTDAT+13*
OLDDUZ	DEL+35~, DEL+36*
OLDLVL	NEXTDAT+12~, NEXTDAT+13*, NEXTDAT+21
ORLPERR	EXTDAT+20~, EXTDAT+30!, EXTDAT+31!
ORLPUSRP	EXTDAT+20~, EXTDAT+29*, EXTDAT+30, EXTDAT+31
ORYCNT	BF+11~, BF+12, BF+18, BF+19, BF+20, BF+21, BF+22, BF+23, BF+24, BF+25 , BF+26, BF+27, BF+28, BF+29, BF+30, REMOVE+14, REMOVE+15, REMOVE+16
ORYDAT	DEL+31~, DEL+49*
ORYMSG	BF+11~
ORYMSG(	BF+18, BF+19, BF+20, BF+21, BF+22, BF+23, BF+24, BF+25, BF+26, BF+27 , BF+28, BF+29, BF+30, REMOVE+15, REMOVE+16*
ORYTEAM	DEL+31~, DEL+46*, DEL+54
RTS	BF+11~, CHECK+9!, CHECK+10, CHECK+11
RTS("DIC"	REMDAT+5, GETDAT+9, GETDAT+10, GETDAT+13, DEL+38, DEL+42
RTS("FIELD"	DEL+29, DEL+45
RTS("FILE"	DEL+29, DEL+44
RTS("LOC"	EXTDAT+21
TAG	BF+11~, FILE+1, FIELD+1
TERM	REMOVE+9~, REMOVE+10, REMOVE+12, EXTDAT+33
TOT	REMOVE+9~, REMOVE+10, REMOVE+12, REMOVE+15, REMOVE+16
UDA	DEL+31~, DEL+39*, DEL+40
USR	BF+11~, REMOVE+13, EXTDAT+28, EXTDAT+34
USRACT	EXTDAT+20~, EXTDAT+32*, EXTDAT+33
USRETD	EXTDAT+20~, EXTDAT+33*
USRITD	EXTDAT+20~, EXTDAT+31*, EXTDAT+33
USRNAME	EXTDAT+20~, EXTDAT+30*, DEL+54
USRP	EXTDAT+20~, EXTDAT+27*, EXTDAT+28, EXTDAT+29, EXTDAT+32, DEL+54
USRSTA	EXTDAT+20~, EXTDAT+32*
VAR	DEL+35~, DEL+45*
X	FILE~, FILE+2, FILE+3, FIELD~, FIELD+2, FIELD+3, DEL+35~
XMDUZ	BF+11~, BF+16*
XMSUB	BF+11~, BF+16*
XMTEXT	BF+11~, BF+17*
XMY	BF+11~
XMY(	BF+16*
Y	DEL+35~

Marked Items

Name	Field # of Occurrence
$T(@TAG+X	FILE+2, FIELD+2

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORY44

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items