Routine: RORP022

Package	Total	Call Graph
VA FileMan	4	(,$$FIND1)^DIC FILE^DICN (,UPDATE)^DIE LOCK^DILF
Clinical Case Registries	2	^RORP022A $$SRLIEN^RORUTL02
Kernel	2	BMES^XPDUTL OWNSKEY^XUSRB
DRG Grouper	1	$$CODEABA^ICDEX

Entry Points

Name	Comments	DBIA/ICR reference
PRE	; ; CHECK FOR ROR VA IRM KEY, ABORT IF USER DOES NOT POSSESS
POST	;
NEWRULE(NAME,EXPR,FILE,DESC)	;

External References

Name	Field # of Occurrence
^DIC	POST+20, POST+28
$$FIND1^DIC	POST+34, POST+68, POST+72
FILE^DICN	NEWRULE+3
^DIE	POST+11, NEWRULE+8
UPDATE^DIE	POST+38, POST+76
LOCK^DILF	POST+11, NEWRULE+6
$$CODEABA^ICDEX	POST+31
^RORP022A	POST+17
$$SRLIEN^RORUTL02	POST+70, NEWRULE+2
BMES^XPDUTL	PRE+3, PRE+7, PRE+8, PRE+9, PRE+10, POST+6, POST+14, POST+24, POST+41, POST+62 , POST+80
OWNSKEY^XUSRB	PRE+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ROR(798.1 - [#798.1]	Classic Fileman Calls
798.13	FIND1^DIC
^ROR(798.2 - [#798.2]	Classic Fileman Calls
^ROR(798.5 - [#798.5]	Classic Fileman Calls
798.51	FIND1^DIC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ROR(798.1 - [#798.1]	POST+25, POST+27, POST+63, POST+64
^ROR(798.2 - [#798.2]	POST+7, POST+8, POST+11, POST+42, POST+43, NEWRULE+9
^TMP("ROR-ICD10"	POST+15!, POST+21, POST+25, POST+30, POST+78!

Label References

Name	Line Occurrences
NEWRULE	POST+59

Naked Globals

Name	Field # of Occurrence
^(0	POST+8, POST+43

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	POST+1~, POST+3~, POST+10, POST+79!, NEWRULE+7, NEWRULE+10!
DESC	NEWRULE~, NEWRULE+7
DIC	POST+1~, POST+19~, POST+20, POST+28, NEWRULE+1~, NEWRULE+3*, NEWRULE+4!
DIC(0	POST+20, POST+28, NEWRULE+3*
DIE	POST+3~, POST+10!, POST+79!, NEWRULE+7!, NEWRULE+10!
DR	POST+3~, POST+10, POST+79!, NEWRULE+7, NEWRULE+10!
DUZ	PRE+4
EXPR	NEWRULE~, NEWRULE+7
FILE	NEWRULE~, NEWRULE+7
NAME	NEWRULE~, NEWRULE+2, NEWRULE+3
ROR	POST+3~, POST+7, POST+8, POST+10, POST+11, POST+25, POST+27, POST+30, POST+42, POST+43 , POST+63, POST+64
ROR1	POST+3~, POST+66*, POST+68, POST+69
ROR10	POST+3~, POST+21*
RORCT	POST+3~, POST+25, POST+26, POST+33
RORDATA	POST+2~, POST+36!, POST+74!
RORDATA(1	POST+37, POST+75
RORDXS	POST+2~, POST+30*, POST+31
ROREG	POST+3~, POST+16, POST+20, POST+21
ROREXISTICDIEN	POST+2~, POST+34*, POST+35
ROREXISTIEN	POST+2~, POST+72*, POST+73
RORICDIEN	POST+2~, POST+31*, POST+32, POST+34, POST+37
RORIEN	NEWRULE+1~, NEWRULE+2, NEWRULE+3, NEWRULE+5, NEWRULE+6, NEWRULE+7, NEWRULE+9
RORKEYOK	PRE+2~, PRE+4
RORKEYOK(0	PRE+5
RORREGIEN	POST+2~, POST+28, POST+29, POST+34, POST+37, POST+64, POST+68, POST+72, POST+75
RORREGNAME	POST+2~, POST+27, POST+28, POST+29, POST+64, POST+65, POST+68, POST+69
RORRULEDESC	POST+1~, POST+45, POST+48, POST+52, POST+56, POST+59
RORRULEEXPR	POST+1~, POST+49, POST+53, POST+57*, POST+59
RORRULEFILE	POST+1~, POST+8, POST+43, POST+47, POST+51, POST+55, POST+59
RORRULEIEN	POST+1~, POST+70*, POST+71
RORRULENAME	POST+1~, POST+8, POST+9, POST+43, POST+44, POST+45, POST+59, POST+69, POST+70, POST+72 , POST+75
RORX	POST+3~, POST+17*
RORY	POST+3~, POST+17*, POST+18, POST+20, POST+21
RORZ	POST+3~, POST+21*
U	POST+8, POST+18, POST+20, POST+21, POST+27, POST+43, POST+64, NEWRULE+3
X	POST+1~, POST+19~, POST+20, POST+28, NEWRULE+1~, NEWRULE+3*, NEWRULE+4!
>> XPDABORT	PRE+6*
Y	POST+1~, POST+19~, POST+20, POST+28, NEWRULE+1~, NEWRULE+3, NEWRULE+4!

Marked Items

Name	Field # of Occurrence
$T(ICD10+RORX^RORP022A	POST+17

Customize PDF page

Package: Clinical Case Registries

Routine: RORP022

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items