Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Call Graph | Entry Points | External References | Interaction Calls | Global Variables Directly Accessed | Label References | Local Variables | All

Print Page as PDF

Routine: XBPATC

Package: IHS VA Utilities

Routine: XBPATC

Information

XBPATC ; IHS/ADC/GTH - CHECK PATIENT GLOBALS ; [ 02/07/97 3:02 PM ]

Source Information

Source file <XBPATC.m>

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
IHS VA Utilities	1	$$DIR^XBDIR

Entry Points

Name	Comments	DBIA/ICR reference
PRT2	;PRINT FOR ENTRIES IN 3RD PARTY FILES BUT NOT IN AUPNPAT
PRT3	;PRINT FOR ENTRIES IN MEDICAID GLOBAL BUT NOT IN AUPNPAT OR POINTER NOT VALID
PRT1	;PRINT FOR ENTRIES IN DPT NOT IN AUPNPAT
ST	;
PRT	;PRINT FOR ENTRIES IN AUPNPAT NOT IN DPT
EXIT	;
LOOP5	;
LOOP3	;
LOOP2	;
LOOP1	;
LOOP	;
LOOP4	;

External References

Name	Field # of Occurrence
$$DIR^XBDIR	ST+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"I WILL $O THRU THE PATIENT GLOBALS LOOKING FOR UNEQUAL DFN" Line Location: ST+1
Function Call: WRITE	Prompt: !,"AS UNEQUAL DFN ARE FOUND THE DFN WILL BE DISPLAYED" Line Location: ST+2
Function Call: WRITE	Prompt: !,"YOU SHOULD USE A SLAVE PRINTER FOR THIS RUN, AS THE SCREEN WILL SCROLL AND YOU WILL LOSE NEEDED INFORMATION",! Line Location: ST+3
Function Call: WRITE	Prompt: !,"LOOPING THROUGH THE IHS PATIENT GLOBAL",! Line Location: ST+6
Function Call: WRITE	Prompt: !,"LOOPING THROUGH THE VA PATIENT GLOBAL",! Line Location: LOOP1+1
Function Call: WRITE	Prompt: !,"LOOPING THROUGH THE MEDICARE GLOBAL",! Line Location: LOOP2+1
Function Call: WRITE	Prompt: !,"LOOPING THROUGH THE MEDICAID GLOBAL",! Line Location: LOOP3+1
Function Call: WRITE	Prompt: "D" Line Location: LOOP3+5
Function Call: WRITE	Prompt: !,"LOOPING THROUGH THE RAILROAD GLOBAL",! Line Location: LOOP4+1
Function Call: WRITE	Prompt: !,"LOOPING THROUGH THE PRIVATE INSURANCE GLOBAL",! Line Location: LOOP5+1
Function Call: WRITE	Prompt: !!,"E N D O F R U N " Line Location: EXIT+1
Function Call: WRITE	Prompt: !,"NUMBER OF DFN NOT IN DPT=",CNT Line Location: EXIT+2
Function Call: WRITE	Prompt: !,"NUMBER OF DFN NOT IN AUPNPAT=",CNT1 Line Location: EXIT+3
Function Call: WRITE	Prompt: !,"NUMBER OF 3RD PARTY DFN's NOT IN AUPNPAT=",CNT2 Line Location: EXIT+4
Function Call: WRITE	Prompt: !,"NUMBER OF MEDICAID RECORDES WITH BAD DFN=",CNT3 Line Location: EXIT+5
Function Call: WRITE	Prompt: !!,"ENTRY IN AUPNPAT NOT IN DPT, DFN=",DFN Line Location: PRT+1
Function Call: WRITE	Prompt: !!,"ENTRY IN DPT NOT IN AUPNPAT, DFN=",DFN Line Location: PRT1+1
Function Call: WRITE	Prompt: !!,"ENTRY IN 3RD PARTY FILE NOT IN AUPNPAT, DFN=",DFN Line Location: PRT2+1
Function Call: WRITE	Prompt: !!,"ENTRY IN MEDICAID GLOBAL BUT DFN INVALID, DA=",DA,! Line Location: PRT3+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNMCD - [#9000004]	LOOP3+3, LOOP3+4
^AUPNMCR - [#9000003]	LOOP2+3
^AUPNPAT - [#9000001]	LOOP+2, LOOP1+3, LOOP2+3, LOOP3+7, LOOP4+3, LOOP5+3
^AUPNPRVT - [#9000006]	LOOP5+3
^AUPNRRE - [#9000005]	LOOP4+3
^DPT - [#2]	LOOP+2, LOOP1+3

Label References

Name	Line Occurrences
PRT	LOOP+2
PRT1	LOOP1+3
PRT2	LOOP2+3, LOOP3+7, LOOP4+3, LOOP5+3
PRT3	LOOP3+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AZHDNUM	EXIT+6!
CNT	ST+5, EXIT+2, EXIT+6!, PRT+2
CNT1	ST+5, EXIT+3, EXIT+6!, PRT1+2
CNT2	ST+5, EXIT+4, EXIT+6!, PRT2+2
CNT3	ST+5, EXIT+5, EXIT+6!, PRT3+2
>> DA	LOOP3+2, LOOP3+3, LOOP3+4, PRT3+1
>> DFN	LOOP+1, LOOP+2, LOOP1+2, LOOP1+3, LOOP2+2, LOOP2+3, LOOP3+2, LOOP3+4, LOOP3+6, LOOP3+7 , LOOP4+2, LOOP4+3, LOOP5+2, LOOP5+3, PRT+1, PRT1+1, PRT2+1
U	ST+5*, LOOP3+4

Info | Source | Call Graph | Entry Points | External References | Interaction Calls | Global Variables Directly Accessed | Label References | Local Variables | All