Routine: RORP031

Package	Total	Call Graph
VA FileMan	7	BLD^DIALOG ^DIC (FILE,UPDATE)^DIE ^DIK CLEAN^DILF $$GET1^DIQ ^DIR
Clinical Case Registries	5	DBS^RORERR $$MSG^RORERR20 ^RORSET02 XTMPHDR^RORUTL01 $$REGIEN^RORUTL02
Kernel	4	(RTN,STAT)^%ZTLOAD ($$FMADD,$$FMTE,$$NOW)^XLFDT (BMES,MES)^XPDUTL OWNSKEY^XUSRB

Entry Points

Name	Comments	DBIA/ICR reference
ENV	; Environment check
PRE	; Patch pre-install ; CHECK FOR ROR VA IRM KEY, ABORT IF USER DOES NOT POSSESS
POST	; Patch post-install
NEWREG	; List of new registries to initialize
UPDPROC	; Adds ICD dx/procedure codes and CPT codes to the new registries in ROR ICD file ; Delete if already there
ADD7985(RORFDA,RORIEN,RORREG)	; Adds procedures to the entries in the files
ICDPROC	; Registry name^PTF ICD Procedure codes, separated by commas^PTF CPT codes, separated by commas^ ICD DIAGNOSIS codes
POSQ3(DIR)	;
UPDLIST
LISTITEM	; Entries to add to file 799.1 text^group^code
POSQ4(DIR)	;
POSQ5(DIR)	;
UPDPANEL	; --- Add new Age Range panel #21 to all reports following the Birth Sex panel #23
UP799P1	; --- Rename 'HIV WB' entry of the VA HIV Registry in the ROR LIST ITEM file (#799.1) to 'HIV Confirm'
GENDRG	; --- Delete entry in ROR GENERIC DRUG with unresolved pointers ; clean up 799.51 if pointers are bad

External References

Name	Field # of Occurrence
RTN^%ZTLOAD	PRE+17
STAT^%ZTLOAD	PRE+19
BLD^DIALOG	POSQ3+3, POSQ4+6
^DIC	UPDPROC+3, GENDRG+4
FILE^DIE	UP799P1+3
UPDATE^DIE	POST+38, ADD7985+2, UPDLIST+12, UPDPANEL+10
^DIK	UPDPROC+4, GENDRG+6
CLEAN^DILF	POST+55, UPDPROC+26
$$GET1^DIQ	PRE+38, UPDPANEL+4, UP799P1+3
^DIR	PRE+42
DBS^RORERR	POST+42, ADD7985+6, UPDPANEL+13
$$MSG^RORERR20	PRE+23
^RORSET02	POST+51
XTMPHDR^RORUTL01	PRE+33
$$REGIEN^RORUTL02	PRE+35, POST+25, UPDLIST+3
$$FMADD^XLFDT	POSQ5+4
$$FMTE^XLFDT	POSQ5+9
$$NOW^XLFDT	POSQ5+4
BMES^XPDUTL	PRE+3, PRE+7, PRE+8, PRE+9, PRE+10, PRE+15, PRE+23, PRE+24, PRE+43, POST+4 , POST+6, POST+8, POST+10, POST+13, POST+15, POST+17, POST+19, POST+21, POST+53, POST+56 , UPDPANEL+6, GENDRG+7
MES^XPDUTL	PRE+29, POST+31, POST+50, ADD7985+14, UPDLIST+22, UPDPANEL+21
OWNSKEY^XUSRB	PRE+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PRE+42
Function Call: WRITE	Prompt: ! Line Location: PRE+42
Routine Call	DIALOG Line Location: POSQ3+3 POSQ4+6
Routine Call	DIC Line Location: UPDPROC+3 GENDRG+4
Routine Call	DIE Line Location: UP799P1+3
Routine Call	DIE Line Location: POST+38 ADD7985+2 UPDLIST+12 UPDPANEL+10
Routine Call	DIR Line Location: PRE+42

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ROR(798.1 - [#798.1]	GET1^DIQ
^ROR(798.5 - [#798.5]	Classic Fileman Calls
^ROR(799.1 - [#799.1]	GET1^DIQ
^ROR(799.34 - [#799.34]	GET1^DIQ
^ROR(799.51 - [#799.51]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ROR(798.1 - [#798.1]	UPDPROC+9
^ROR(799.1 - [#799.1]	UPDLIST+6, UP799P1+2
^ROR(799.34 - [#799.34]	UPDPANEL+2, UPDPANEL+16
^XTMP("ROR_NO_INIT"	PRE+32!, PRE+43!, PRE+44*, POST+27, POST+52!

Label References

Name	Line Occurrences
ADD7985	UPDPROC+9, UPDPROC+12, UPDPROC+25
GENDRG	POST+11
UP799P1	POST+7
UPDLIST	POST+18
UPDPANEL	POST+7
UPDPROC	POST+14

Naked Globals

Name	Field # of Occurrence
^(	UP799P1+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CT	POST+1~, POST+22~, POST+48, POST+49, UPDPROC+2~, UPDPROC+11, UPDPROC+17, UPDPROC+20, UPDPROC+23, ADD7985+4~ , ADD7985+12, ADD7985+13, UPDLIST+1~, UPDLIST+20, UPDLIST+21, UPDPANEL+1~, UPDPANEL+19, UPDPANEL+20
DA	UPDPROC+2~, UPDPROC+4, GENDRG+3~, GENDRG+6
DIC	UPDPROC+3, GENDRG+3~, GENDRG+4
DIC(0	UPDPROC+3, GENDRG+4
DIERR	POST+22~, POST+39, ADD7985+1~, ADD7985+3, UPDLIST+1~, UPDLIST+7!, UPDLIST+13, UPDPANEL+1~, UPDPANEL+11
DIK	UPDPROC+2~, UPDPROC+4, GENDRG+3~, GENDRG+6
DIR	PRE+31~, PRE+42!, POSQ3~, POSQ3+1!, POSQ3+2, POSQ4~, POSQ4+1!, POSQ4+2, POSQ5~, POSQ5+1
DIR("A"	PRE+40, PRE+41, POSQ4+3*
DIR("B"	PRE+41, POSQ5+9
DIR(0	PRE+40, POSQ4+5, POSQ5+8*
DUZ	PRE+4
FDA	UP799P1+1~
FDA(	UP799P1+3*
I1	UPDPROC+2~, UPDPROC+17, UPDPROC+20, UPDPROC+23*
NODE	UP799P1+1~, UP799P1+2*
P1	UPDPANEL+1~, UPDPANEL+8*, UPDPANEL+9
P2	UPDPANEL+1~, UPDPANEL+8*, UPDPANEL+9
RC	PRE+13~, PRE+16, PRE+18, PRE+21, PRE+23
REGIEN	PRE+31~, PRE+35, PRE+36, PRE+38, PRE+40, PRE+44, POST+1~, POST+25, POST+26, POST+27 , POST+28, POST+35, POST+36, POST+37, POST+42, POST+45, UPDLIST+1~, UPDLIST+3*, UPDLIST+4, UPDLIST+6 , UPDLIST+10, UPDLIST+15
RORBUF	PRE+13~
RORBUF(	PRE+18
RORDA	UP799P1+1~, UP799P1+2*, UP799P1+3
RORDATA	UPDPROC+2~, UPDPROC+5, UPDPROC+6, UPDPROC+15, UPDPROC+16, UPDPROC+18, UPDPROC+19, UPDPROC+21, UPDPROC+22, UPDLIST+1~ , UPDLIST+5, UPDLIST+6, UPDLIST+8, UPDLIST+9, UPDLIST+11, UPDLIST+17, UPDPANEL+1~, UPDPANEL+4*, UPDPANEL+5, UPDPANEL+8
ROREDT	POSQ5+2~, POSQ5+4, POSQ5+6, POSQ5+8, POSQ5+9
RORERR	POST+22~, POST+31, POST+32!, POST+34!, POST+40!, POST+41, POST+43, POST+44!, POST+50, ADD7985+4~ , ADD7985+5, ADD7985+7, ADD7985+8!, ADD7985+14, UPDLIST+1~, UPDLIST+7!, UPDLIST+14!, UPDLIST+22, UPDPANEL+1~, UPDPANEL+12! , UPDPANEL+14, UPDPANEL+15!, UPDPANEL+21
RORERR(	POST+48, POST+49, ADD7985+12, ADD7985+13, UPDLIST+20, UPDLIST+21, UPDPANEL+19, UPDPANEL+20
RORERR(1	POST+28, POST+45, ADD7985+9, UPDLIST+15, UPDPANEL+16*
RORERR(2	POST+29, POST+46, ADD7985+10, UPDLIST+16, UPDPANEL+17*
RORERR(3	POST+30, POST+47, ADD7985+11, UPDLIST+17, UPDPANEL+18*
RORERR(4	UPDLIST+18*
RORERR(5	UPDLIST+19*
RORFDA	POST+34!, UPDPROC+2~, UPDPROC+9, UPDPROC+25, ADD7985~, UPDLIST+1~, UPDLIST+7!, UPDPANEL+1~, UPDPANEL+7!
RORFDA(	POST+35, POST+36, POST+37, UPDPROC+17, UPDPROC+20, UPDPROC+23, UPDLIST+8, UPDLIST+9, UPDLIST+10, UPDLIST+11 , UPDPANEL+9*
RORFDA1	UPDPROC+2~, UPDPROC+10!, UPDPROC+12, UPDPROC+14!
RORFDA1(	UPDPROC+11*
RORI	PRE+31~, PRE+34, POST+1~, POST+24, UPDPROC+2~, UPDPROC+3, UPDPROC+5, UPDLIST+1~, UPDLIST+2*
RORI1	UPDLIST+1~, UPDLIST+5*
RORIEN	UPDPROC+2~, UPDPROC+9, UPDPROC+11, UPDPROC+12, UPDPROC+14!, UPDPROC+17, UPDPROC+20, UPDPROC+23, UPDPROC+25, ADD7985~
RORIEN(	UPDPROC+13
RORIEN(0	UPDPROC+13
RORKEYOK	PRE+2~, PRE+4
RORKEYOK(0	PRE+5
RORKIDS	POST+22~, POST+23*
RORMES	PRE+13~, PRE+22!, PRE+29
RORMES(1	PRE+25*
RORMES(2	PRE+26*
RORMES(3	PRE+27*
RORMES(4	PRE+28*
RORMSG	POST+34!, POST+41, POST+43, ADD7985+1~, ADD7985+5, ADD7985+7, UPDLIST+1~, UPDLIST+7!, UPDPANEL+1~, UPDPANEL+7! , UPDPANEL+14*
RORMSG("DIERR"	POST+48, ADD7985+12, UPDLIST+20, UPDPANEL+19
RORPARM	POST+2~
RORPARM("DEVELOPER"	PRE+30, POST+3
RORPROC	UPDPROC+2~, UPDPROC+16, UPDPROC+17, UPDPROC+19, UPDPROC+20, UPDPROC+22*, UPDPROC+23
RORREG	PRE+31~, PRE+34, PRE+35, PRE+40, POST+1~, POST+24, POST+25, POST+28, POST+45, UPDPROC+2~ , UPDPROC+6, UPDPROC+7, UPDPROC+11, UPDPROC+12, UPDPROC+25, ADD7985~, ADD7985+6, ADD7985+9, UPDLIST+1~, UPDLIST+2 , UPDLIST+3, UPDLIST+15
RORRPT	UPDPANEL+1~, UPDPANEL+2*, UPDPANEL+4, UPDPANEL+6, UPDPANEL+9, UPDPANEL+13, UPDPANEL+16
U	PRE+34, POST+24, UPDPROC+6, UPDPROC+9, UPDPROC+15, UPDPROC+16, UPDPROC+18, UPDPROC+19, UPDPROC+21, UPDPROC+22 , UPDLIST+2, UPDLIST+6, UPDLIST+8, UPDLIST+9, UPDLIST+11, POSQ5+8, UPDPANEL+16, GENDRG+5
X	PRE+31~, UPDPROC+2~, UPDPROC+3, UPDPROC+17, UPDPROC+20, UPDPROC+23, UPDPANEL+1~, GENDRG+3~, GENDRG+4*
>> XPDABORT	PRE+6, PRE+21, PRE+34, PRE+43*
>> XPDNM	PRE+23
>> XPDNOQUE	ENV+1*
>> XPDQUES("POSQ2"	POSQ3+1, POSQ4+1
Y	PRE+31~, PRE+43, PRE+44, UPDPROC+2~, UPDPROC+3, UPDPROC+4, UPDPANEL+1~, GENDRG+3~, GENDRG+6
Y(0	GENDRG+5
Z	PRE+31~, PRE+38, PRE+39, POST+1~, POST+48, UPDPROC+2~, UPDPROC+13, UPDPROC+14, ADD7985+4~, ADD7985+12 , UPDLIST+1~, UPDLIST+20, UPDPANEL+1~, UPDPANEL+19
ZTSK	PRE+13~, PRE+18*, PRE+25
ZTSK(1	PRE+18

Marked Items

Name	Field # of Occurrence
$T(@(5)	PRE+34, POST+24, UPDLIST+2, UPDLIST+5
$T(ICDPROC+RORI	UPDPROC+5

Customize PDF page

Package: Clinical Case Registries

Routine: RORP031

Information

Source Information

Call Graph

Call Graph Total: 16

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items