Routine: PXQMAIN2

Name	Field # of Occurrence
^%ZISC	PAT9P+46, LOC9L+32, CLOSE+1
WAIT^DICD	PAT9P+16, LOC9L+14
^DIR	MENU+5
$$LCFLE^PXQUTL	LOC9L+6
$$PTFLE^PXQUTL	PAT9P+8
$$RE^PXQUTL	PAT9P+4, PAT9P+5, PAT9P+6, PAT9P+7, PAT9P+10, PAT9P+11, PAT9P+12, PAT9P+13, PAT9P+21, PAT9P+23 , PAT9P+24, PAT9P+25, PAT9P+26, PAT9P+29, PAT9P+31, PAT9P+32, PAT9P+37, PAT9P+38, PAT9P+39, PAT9P+43 , LOC9L+5, LOC9L+8, LOC9L+9, LOC9L+10, LOC9L+11, LOC9L+17, LOC9L+19, LOC9L+20, LOC9L+23, LOC9L+25 , LOC9L+26, LOC9L+29
READ^PXQUTL	PAT9P+44, LOC9L+30
ZIS^PXQZIS	PAT+4, LOC+4
$$SITE^VASITE	PAT9P+30, PAT9P+35

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ERROR ") Line Location: PAT9P+4
Function Call: WRITE	Prompt: $$RE^PXQUTL(" NO CROSS-REFERENCE IN FILE#2 ON SSN FIELD FOR UPDATING FILE#9000001") Line Location: PAT9P+5
Function Call: WRITE	Prompt: $$RE^PXQUTL(" CROSS-REFERENCE COMES WITH PATIENT/IHS SUBSET PACKAGE"),$$RE^PXQUTL(" ") Line Location: PAT9P+6
Function Call: WRITE	Prompt: $$RE^PXQUTL("Compare of #2 and # 9000001 Patient files"),$$RE^PXQUTL(" ") Line Location: PAT9P+7
Function Call: WRITE	Prompt: $$RE^PXQUTL(" "_PAT2),$$RE^PXQUTL(" "_PAT9) Line Location: PAT9P+10
Function Call: WRITE	Prompt: $$RE^PXQUTL(" Zero Nodes MATCH") Line Location: PAT9P+11
Function Call: WRITE	Prompt: $$RE^PXQUTL(" Zero Nodes DO NOT Match") Line Location: PAT9P+12
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: PAT9P+13
Function Call: WRITE	Prompt: $$RE^PXQUTL("Patients in file #2 but not in #9000001"),$$RE^PXQUTL(" DFN NAME SSN") Line Location: PAT9P+21
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: PAT9P+24
Function Call: WRITE	Prompt: $$RE^PXQUTL("There are more that 100 of these so I'll quit with 100") Line Location: PAT9P+25
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: PAT9P+26
Function Call: WRITE	Prompt: $$RE^PXQUTL("Patients in file #9000001 but not in #2"),$$RE^PXQUTL(" DFN NAME SSN") Line Location: PAT9P+29
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: PAT9P+32
Function Call: WRITE	Prompt: $$RE^PXQUTL("SSN'S in #2 not equal to #9000001"),$$RE^PXQUTL(" DFN NAME #2 #9000001") Line Location: PAT9P+37
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: PAT9P+39
Function Call: WRITE	Prompt: $$RE^PXQUTL("PATIENT file #2 and PATIENT/IHS file #9000001 are in sync.") Line Location: PAT9P+43
Function Call: WRITE	Prompt: $$RE^PXQUTL("Compare of #4 and # 9999999.06 location files"),$$RE^PXQUTL(" ") Line Location: LOC9L+5
Function Call: WRITE	Prompt: $$RE^PXQUTL(" "_LOC4),$$RE^PXQUTL(" "_LOC9) Line Location: LOC9L+8
Function Call: WRITE	Prompt: $$RE^PXQUTL(" Zero Nodes MATCH") Line Location: LOC9L+9
Function Call: WRITE	Prompt: $$RE^PXQUTL(" Zero Nodes DO NOT Match") Line Location: LOC9L+10
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: LOC9L+11
Function Call: WRITE	Prompt: $$RE^PXQUTL("Locations in file #4 but not in #9999999.06"),$$RE^PXQUTL(" IEN NAME") Line Location: LOC9L+17
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: LOC9L+20
Function Call: WRITE	Prompt: $$RE^PXQUTL("Locations in file #9999999.06 but not in #4"),$$RE^PXQUTL(" IEN NAME") Line Location: LOC9L+23
Function Call: WRITE	Prompt: $$RE^PXQUTL(" ") Line Location: LOC9L+26
Function Call: WRITE	Prompt: $$RE^PXQUTL("INSTITUTION file #4 and LOCATION file #9999999.06 are in sync.") Line Location: LOC9L+29
Routine Call	DIR Line Location: MENU+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("XY"	PAT+6, LOC+6
^AUPNPAT - [#9000001]	PAT9P+19, PAT9P+28, PAT9P+30, PAT9P+34, PAT9P+35
^AUPNPAT(0	PAT9P+9
^AUTTLOC - [#9999999.06]	LOC9L+16, LOC9L+22
^AUTTLOC(0	LOC9L+7
^DD(2	PAT9P+4, PAT9P+5, PAT9P+6
^DIC(4 - [#4]	LOC9L+7, LOC9L+16, LOC9L+18, LOC9L+22
^DPT - [#2]	PAT9P+19, PAT9P+22, PAT9P+28, PAT9P+34, PAT9P+35
^DPT(0	PAT9P+9

Name	Line Occurrences
CLOSE	MENU+5, MENU+9, PAT9P+47, LOC9L+33
EXIT	PAT+4, LOC+4
LOC	MENU+7
MENU	MENU+6, MENU+7
PAT	MENU+6

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DIR("A"	MENU+3*, MENU+8!
>> DIR(0	MENU+4*, MENU+8!
DX	PAT+6~, LOC+6~
DY	PAT+6~, LOC+6~
FLAG1	PAT9P+1~, PAT9P+21*, PAT9P+43, LOC9L+1~
FLAG2	PAT9P+1~, PAT9P+29*, LOC9L+1~
FLAG3	PAT9P+1~, PAT9P+37*, LOC9L+1~
FLAG4	PAT9P+2~, LOC9L+2~, LOC9L+17*, LOC9L+29
FLAG5	PAT9P+2~, LOC9L+2~, LOC9L+23*
I	PAT9P+1~, PAT9P+19, PAT9P+22, PAT9P+23, PAT9P+28, PAT9P+30, PAT9P+31, PAT9P+34, PAT9P+35, PAT9P+38 , LOC9L+1~, LOC9L+16, LOC9L+18, LOC9L+19, LOC9L+22*, LOC9L+25
IOST	PAT9P+16, LOC9L+14
LOC	PAT9P+1~, LOC9L+1~, LOC9L+6*, LOC9L+9, LOC9L+10, LOC9L+28
LOC4	PAT9P+2~, LOC9L+2~, LOC9L+7*, LOC9L+8
LOC9	MENU+2~, LOC9L+7*, LOC9L+8
NAME	MENU+2~, PAT9P+22, PAT9P+23, PAT9P+30, PAT9P+31, PAT9P+35, PAT9P+38, LOC9L+18, LOC9L+19, LOC9L+24* , LOC9L+25
OPTION	PAT+3, LOC+3, CLOSE+2!, EXIT+1!
PAT	PAT9P+1~, PAT9P+8*, PAT9P+11, PAT9P+12, PAT9P+42, LOC9L+1~
PAT2	PAT9P+1~, PAT9P+2~, PAT9P+9*, PAT9P+10, LOC9L+1~, LOC9L+2~
PAT9	MENU+2~, PAT9P+9*, PAT9P+10
POP	MENU+2~, PAT+4, LOC+4
PXQCNT	PAT9P+17~, PAT9P+18, PAT9P+19, PAT9P+20, PAT9P+25
PXQLIMIT	PAT9P+17~, PAT9P+18*, PAT9P+19, PAT9P+25
PXQRECI	PAT9P+1~, PAT9P+3, LOC9L+1~, LOC9L+3
SSN	PAT9P+1~, PAT9P+22, PAT9P+23, PAT9P+35, PAT9P+36, PAT9P+38, LOC9L+1~
SSN1	PAT9P+1~, PAT9P+30, PAT9P+31, PAT9P+35, PAT9P+36, PAT9P+38, LOC9L+1~
Y	MENU+2~, MENU+5, MENU+6, MENU+7
>> ZTSK	PAT9P+47, LOC9L+33

Customize PDF page

Package: PCE Patient Care Encounter

Routine: PXQMAIN2

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: