Routine: AGAGERP1

Package	Total	Call Graph
IHS Patient Registration	3	GETPATN^AGAGERP3 (FINDMCD,FINDMCR,FINDPVT,FINDRRE)^AGINS $$INSTYP^AGUTL
IHS Patient	1	$$AGE^AUPNPAT
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
IHS Patient Registration	2	AGAGERP AGAGERP3

Name	Comments	DBIA/ICR reference
GETMEDD	; Get Medicaid Patients
GETWRKC	; Get Workmen's Comp Patients
GETAGE	; Loop through AGE X-ref to get initial list of patients
ELGDTCH2(AGFR,AGTO,FOUND)	;Check Patient Eligibility Dates Against Report parameter
GETINSR	; Get all patients for a specific insurance company
GETLOC	; Check Location
GETDT	; Check Visit Date Rang
GETES	; Get Eligibility Status records
GETAR	; Get Alternate Resource records
PTACTIVE(DFN)	;EP - SEE IF PATIENT IS ACTIVE IN AT LEAST ONE FACILTY
GETMEDR	; Get Medicare Patients
GETNOAR	;Get patients without Alternate Resources
GETDATA	; Extracting Records based on the Selection Criteria
ELGDTCH(AGFR,AGTO,FOUND)	;Check Patient Eligibility Dates Against Report parameters
GETCHIP	; Get CHIP (Childrens Medicaid)
GETPRVT	; Get Private Insurance Patients and Prvt plut Workman's comp

Name	Field # of Occurrence
GETPATN^AGAGERP3	GETDATA+3
FINDMCD^AGINS	GETNOAR+10
FINDMCR^AGINS	GETNOAR+9
FINDPVT^AGINS	GETNOAR+12
FINDRRE^AGINS	GETNOAR+11
$$INSTYP^AGUTL	GETPRVT+11, GETMEDD+11, GETCHIP+13, GETCHIP+30
$$AGE^AUPNPAT	GETAGE+10, GETAGE+21, GETCHIP+7
$$GET1^DIQ	GETLOC+10, GETLOC+25, GETDT+10, GETDT+11, GETDT+27, GETDT+28, GETDT+29, GETAGE+19, GETAGE+22, GETES+12 , GETES+22, GETES+24, GETES+30, GETES+32, GETPRVT+6, GETPRVT+18, GETPRVT+30, GETINSR+8, GETINSR+19, GETMEDR+6 , GETMEDR+16, GETMEDR+30, GETMEDD+6, GETMEDD+22, GETMEDD+32, GETWRKC+6, GETWRKC+16, GETCHIP+6, GETCHIP+20, GETCHIP+25 , GETCHIP+41, GETNOAR+6, GETNOAR+14

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GETDATA+1

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^AUPNPAT - [#9000001]	GET1^DIQ
^AUPNVSIT - [#9000010]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUPNMCD - [#9000004]	GETMEDD+9, GETMEDD+26, GETMEDD+27, GETCHIP+28, GETCHIP+33, GETCHIP+34, GETCHIP+35
^AUPNMCD("B"	GETMEDD+4, GETMEDD+8, GETCHIP+23, GETCHIP+27
^AUPNMCR - [#9000003]	GETMEDR+10, GETMEDR+11, GETMEDR+25
^AUPNMCR("B"	GETMEDR+4, GETMEDR+8
^AUPNPAT - [#9000001]	GETLOC+11, GETLOC+12, GETLOC+13, GETLOC+20, GETLOC+22, GETLOC+23, GETPRVT+4, GETCHIP+4, GETNOAR+4, PTACTIVE+4 , PTACTIVE+5
^AUPNPAT("AD"	GETES+21, GETES+28, GETES+29
^AUPNPRVT - [#9000006]	GETPRVT+8, GETPRVT+10, GETPRVT+13, GETPRVT+14, GETINSR+11, GETINSR+13, GETINSR+14, GETMEDD+14, GETMEDD+15, GETMEDD+16 , GETCHIP+10, GETCHIP+11, GETCHIP+14, GETCHIP+15
^AUPNPRVT("I"	GETINSR+6, GETINSR+10
^AUPNRRE - [#9000005]	GETMEDR+24, GETMEDR+25
^AUPNRRE("B"	GETMEDR+19, GETMEDR+22
^AUPNVSIT("B"	GETDT+7, GETDT+9, GETDT+24, GETDT+26
^AUPNWC - [#9000042]	GETPRVT+20, GETPRVT+22, GETPRVT+24, GETPRVT+25, GETPRVT+26, GETWRKC+4, GETWRKC+8, GETWRKC+10, GETWRKC+11, GETWRKC+14
^DPT - [#2]	GETAGE+18
^TMP("AGAGERP"	GETLOC+4, GETLOC+7, GETLOC+9, GETLOC+11!, GETLOC+14!, GETLOC+17, GETLOC+19, GETLOC+26, GETDT+3, GETDT+14 , GETDT+16, GETDT+17!, GETDT+20, GETDT+21, GETDT+31, GETAGE+4, GETAGE+7, GETAGE+9, GETAGE+11!, GETAGE+14 , GETAGE+17, GETAGE+22, GETES+4, GETES+9, GETES+11, GETES+13!, GETES+14!, GETES+16, GETES+18, GETES+25 , GETES+33, GETPRVT+3, GETPRVT+19, GETPRVT+31, GETINSR+5, GETINSR+20, GETMEDR+3, GETMEDR+17, GETMEDR+31, GETMEDD+3 , GETMEDD+23, GETMEDD+33, GETWRKC+3, GETWRKC+17, GETCHIP+3, GETCHIP+21, GETCHIP+42, GETNOAR+3, GETNOAR+15*
^TMP2("AGAGERP"	GETDT+12*, GETDT+17, GETDT+18!

Name	Line Occurrences
$$PTACTIVE	GETLOC+21, GETDT+30, GETAGE+20, GETES+23, GETES+31, GETPRVT+5, GETINSR+7, GETMEDR+5, GETMEDR+20, GETMEDD+5 , GETWRKC+5, GETCHIP+5, GETCHIP+24, GETNOAR+5
ELGDTCH	GETPRVT+15, GETPRVT+27, GETINSR+16, GETMEDR+13, GETMEDR+27, GETMEDD+19, GETMEDD+29, GETWRKC+12, GETCHIP+17, GETCHIP+38
ELGDTCH2	GETPRVT+16, GETPRVT+28, GETINSR+17, GETMEDR+14, GETMEDR+28, GETMEDD+20, GETMEDD+30, GETWRKC+13, GETCHIP+18, GETCHIP+39
GETAGE	GETDATA+5
GETAR	GETDATA+2
GETCHIP	GETAR+8
GETDT	GETDATA+7
GETES	GETDATA+4
GETINSR	GETAR+6
GETLOC	GETDATA+6
GETMEDD	GETAR+4
GETMEDR	GETAR+3
GETPRVT	GETAR+5
GETWRKC	GETAR+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTIVE	PTACTIVE+1~, PTACTIVE+2, PTACTIVE+4, PTACTIVE+5, PTACTIVE+6
ADATE	GETDT+1~, GETDT+6, GETDT+7, GETDT+9, GETDT+23, GETDT+24, GETDT+26
AGE	GETAGE+1~, GETAGE+10, GETAGE+11, GETAGE+15~, GETAGE+21, GETAGE+22, GETCHIP+1~, GETCHIP+7*, GETCHIP+8
AGFR	ELGDTCH~, ELGDTCH+4, ELGDTCH+5, ELGDTCH2~, ELGDTCH2+4, ELGDTCH2+5
AGINS	GETNOAR+7!, GETNOAR+13
AGINSN1	GETNOAR+7!
AGINSNN	GETNOAR+7!
AGTO	ELGDTCH~, ELGDTCH+3, ELGDTCH+5, ELGDTCH2~, ELGDTCH2+3, ELGDTCH2+5
AR1	GETAR+1~, GETAR+2*, GETAR+3, GETAR+4, GETAR+5, GETAR+6, GETAR+7, GETAR+8, GETPRVT+12, GETPRVT+20
AR2	GETAR+1~, GETAR+2*
CHFR	GETMEDD+15, GETMEDD+19, GETMEDD+20, GETCHIP+1~, GETCHIP+14, GETCHIP+17, GETCHIP+18, GETCHIP+34*, GETCHIP+38, GETCHIP+39
CHTO	GETMEDD+16, GETMEDD+17, GETMEDD+19, GETMEDD+20, GETCHIP+1~, GETCHIP+15, GETCHIP+16, GETCHIP+17, GETCHIP+18, GETCHIP+35* , GETCHIP+36*, GETCHIP+38, GETCHIP+39
DFN	PTACTIVE~, PTACTIVE+4, PTACTIVE+5
DT	GETAGE+10, GETAGE+21, GETCHIP+7, ELGDTCH2+2
DUZ(2	PTACTIVE+5
ELGFR	GETPRVT+1~, GETINSR+1~, GETCHIP+1~, ELGDTCH+1~, ELGDTCH+2, ELGDTCH+5, ELGDTCH2+1~, ELGDTCH2+2, ELGDTCH2+5
ELGTO	GETPRVT+1~, GETINSR+1~, GETCHIP+1~, ELGDTCH+1~, ELGDTCH+2, ELGDTCH+5, ELGDTCH2+1~, ELGDTCH2+2, ELGDTCH2+5
ES	GETES+1~, GETES+2, GETES+6~, GETES+7, GETES+13, GETES+14, GETES+19, GETES+21, GETES+26
ES1	GETES+6~, GETES+12, GETES+13, GETES+14, GETES+17~, GETES+27, GETES+28*, GETES+29
>> EXCL("Age Ran	ge" , GETDATA+5, GETAGE+2
>> EXCL("Alterna	te Resource" , GETAR+2
>> EXCL("Elig Da	te Range" , GETPRVT+15, GETPRVT+16, GETPRVT+27, GETPRVT+28, GETINSR+16, GETINSR+17, GETMEDR+13, GETMEDR+14, GETMEDR+27 , GETMEDR+28, GETMEDD+19, GETMEDD+20, GETMEDD+29, GETMEDD+30, GETWRKC+12, GETWRKC+13, GETCHIP+17, GETCHIP+18, GETCHIP+38 , GETCHIP+39, ELGDTCH+2
>> EXCL("Eligibi	lity Status" , GETDATA+4, GETES+2, GETES+7
>> EXCL("Location"	GETDATA+6, GETLOC+2
>> EXCL("Specifi	c Insurer" , GETINSR+3, c Patient" , GETDATA+2, GETDATA+3
>> EXCL("Visit D	ate Range" , GETDATA+7, GETDT+4, GETDT+22
FAC	PTACTIVE+1~, PTACTIVE+3, PTACTIVE+4, PTACTIVE+5
FOUND	GETDT+1~, GETINSR+1~, GETINSR+12, GETINSR+16, GETINSR+17, GETINSR+18, GETMEDR+1~, GETMEDR+9, GETMEDR+13, GETMEDR+14 , GETMEDR+15, GETMEDR+23, GETMEDR+27, GETMEDR+28, GETMEDR+29, GETMEDD+1~, GETMEDD+18, GETMEDD+19, GETMEDD+20, GETMEDD+21 , GETMEDD+25, GETMEDD+29, GETMEDD+30, GETMEDD+31, GETWRKC+1~, GETWRKC+9, GETWRKC+12, GETWRKC+13, GETWRKC+15, GETCHIP+1~ , GETCHIP+12, GETCHIP+17, GETCHIP+18, GETCHIP+19, GETCHIP+37, GETCHIP+38, GETCHIP+39, GETCHIP+40, GETNOAR+1~, ELGDTCH~ , ELGDTCH+5, ELGDTCH2~, ELGDTCH2+5
FOUND1	GETPRVT+1~, GETPRVT+9*, GETPRVT+15, GETPRVT+16, GETPRVT+17
FOUND2	GETPRVT+1~, GETPRVT+23*, GETPRVT+27, GETPRVT+28, GETPRVT+29
FROM	GETNOAR+1~
INS	GETCHIP+1~, GETCHIP+9, GETCHIP+10, GETCHIP+11, GETCHIP+14, GETCHIP+15
INSCO	GETPRVT+1~, GETPRVT+10, GETPRVT+11, GETPRVT+19, GETPRVT+26, GETPRVT+31, GETINSR+1~, GETINSR+11, GETINSR+20, GETWRKC+1~ , GETWRKC+14, GETWRKC+17
INSNO	GETCHIP+1~, GETCHIP+11*, GETCHIP+13, GETCHIP+21
INSR	GETINSR+1~, GETINSR+3*, GETINSR+6, GETINSR+10
INSTYP	GETPRVT+1~, GETPRVT+11*, GETPRVT+12, GETCHIP+1~
MAX	GETNOAR+7!
MCDIEN	GETMEDD+1~, GETMEDD+13, GETMEDD+14, GETMEDD+15, GETMEDD+16, GETCHIP+1~, GETCHIP+32, GETCHIP+33, GETCHIP+34, GETCHIP+35
MCDNUM	GETMEDD+1~, GETMEDD+7, GETMEDD+8, GETMEDD+9, GETMEDD+23, GETMEDD+26, GETMEDD+27, GETMEDD+33, GETCHIP+1~, GETCHIP+26* , GETCHIP+27*, GETCHIP+28, GETCHIP+33, GETCHIP+34, GETCHIP+35, GETCHIP+42, GETNOAR+1~
MCDPLAN	GETMEDD+1~, GETMEDD+9, GETMEDD+10, GETMEDD+11, GETMEDD+24, GETCHIP+1~, GETCHIP+28, GETCHIP+29, GETCHIP+30
MCDPTYP	GETMEDD+11, GETMEDD+12, GETCHIP+1~, GETCHIP+30, GETCHIP+31
MCRNUM	GETMEDR+1~, GETMEDR+7, GETMEDR+8, GETMEDR+10, GETMEDR+11, GETMEDR+17, GETMEDR+21, GETMEDR+22, GETMEDR+24, GETMEDR+25 , GETMEDR+31, GETNOAR+1~
MRFROM	GETMEDR+1~, GETMEDR+11, GETMEDR+13, GETMEDR+14, GETMEDR+25, GETMEDR+27, GETMEDR+28, GETMEDD+1~, GETMEDD+27*, GETMEDD+29 , GETMEDD+30
MRIEN	GETMEDR+1~, GETMEDR+9, GETMEDR+10, GETMEDR+11, GETMEDR+23, GETMEDR+24, GETMEDR+25, GETMEDD+1~, GETMEDD+25, GETMEDD+26 , GETMEDD+27, GETNOAR+1~
MRTO	GETMEDR+1~, GETMEDR+11, GETMEDR+12, GETMEDR+13, GETMEDR+14, GETMEDR+25, GETMEDR+26, GETMEDR+27, GETMEDR+28, GETMEDD+1~ , GETMEDD+27, GETMEDD+28, GETMEDD+29, GETMEDD+30
NODE	GETLOC+1~, GETLOC+13, GETLOC+14, GETLOC+23, GETLOC+24
PATNAM	GETLOC+1~, GETLOC+5, GETLOC+7, GETLOC+9, GETLOC+11, GETLOC+14, GETLOC+25, GETLOC+26, GETDT+1~, GETDT+10 , GETDT+12, GETDT+13, GETDT+14, GETDT+16, GETDT+17, GETDT+27, GETDT+31, GETAGE+1~, GETAGE+5, GETAGE+7* , GETAGE+9, GETAGE+11, GETES+6~, GETES+8, GETES+9, GETES+11, GETES+13, GETES+14, GETES+17~, GETES+24* , GETES+25, GETES+32, GETES+33, GETPRVT+1~, GETPRVT+18, GETPRVT+19, GETPRVT+30, GETPRVT+31, GETINSR+1~, GETINSR+19 , GETINSR+20, GETMEDR+1~, GETMEDR+16, GETMEDR+17, GETMEDR+30, GETMEDR+31, GETMEDD+1~, GETMEDD+22, GETMEDD+23, GETMEDD+32 , GETMEDD+33, GETWRKC+1~, GETWRKC+16, GETWRKC+17, GETCHIP+1~, GETCHIP+20, GETCHIP+21, GETCHIP+41, GETCHIP+42, GETNOAR+1~ , GETNOAR+14, GETNOAR+15
PATNUM	GETLOC+1~, GETLOC+8, GETLOC+9, GETLOC+10, GETLOC+11, GETLOC+12, GETLOC+13, GETLOC+14, GETLOC+18, GETLOC+20 , GETLOC+21, GETLOC+22, GETLOC+23, GETLOC+25, GETLOC+26, GETDT+1~, GETDT+11, GETDT+12, GETDT+15, GETDT+16* , GETDT+17, GETDT+28, GETDT+29, GETDT+30, GETDT+31, GETAGE+1~, GETAGE+8, GETAGE+9, GETAGE+10, GETAGE+11 , GETAGE+15~, GETAGE+16, GETAGE+18, GETAGE+19, GETAGE+20, GETAGE+21, GETAGE+22, GETES+6~, GETES+10, GETES+11* , GETES+12, GETES+13, GETES+14, GETES+17~, GETES+20, GETES+21, GETES+22, GETES+23, GETES+24, GETES+25 , GETES+27, GETES+29, GETES+30, GETES+31, GETES+32, GETES+33, GETPRVT+1~, GETPRVT+2, GETPRVT+4, GETPRVT+5 , GETPRVT+6, GETPRVT+8, GETPRVT+10, GETPRVT+13, GETPRVT+14, GETPRVT+18, GETPRVT+19, GETPRVT+20, GETPRVT+22, GETPRVT+24 , GETPRVT+25, GETPRVT+26, GETPRVT+30, GETPRVT+31, GETINSR+1~, GETINSR+4, GETINSR+6, GETINSR+7, GETINSR+8, GETINSR+10 , GETINSR+11, GETINSR+13, GETINSR+14, GETINSR+19, GETINSR+20, GETMEDR+1~, GETMEDR+2, GETMEDR+4, GETMEDR+5, GETMEDR+6 , GETMEDR+8, GETMEDR+16, GETMEDR+17, GETMEDR+18, GETMEDR+19, GETMEDR+20, GETMEDR+22, GETMEDR+30, GETMEDR+31, GETMEDD+1~ , GETMEDD+2, GETMEDD+4, GETMEDD+5, GETMEDD+6, GETMEDD+8, GETMEDD+14, GETMEDD+15, GETMEDD+16, GETMEDD+22, GETMEDD+23 , GETMEDD+32, GETMEDD+33, GETWRKC+1~, GETWRKC+2, GETWRKC+4, GETWRKC+5, GETWRKC+6, GETWRKC+8, GETWRKC+10, GETWRKC+11 , GETWRKC+14, GETWRKC+16, GETWRKC+17, GETCHIP+1~, GETCHIP+2, GETCHIP+4, GETCHIP+5, GETCHIP+6, GETCHIP+7, GETCHIP+10 , GETCHIP+11, GETCHIP+14, GETCHIP+15, GETCHIP+20, GETCHIP+21, GETCHIP+22, GETCHIP+23, GETCHIP+24, GETCHIP+25, GETCHIP+27 , GETCHIP+41, GETCHIP+42, GETNOAR+1~, GETNOAR+2, GETNOAR+4, GETNOAR+5, GETNOAR+6, GETNOAR+9, GETNOAR+10, GETNOAR+11 , GETNOAR+12, GETNOAR+14, GETNOAR+15
PRFR	GETPRVT+1~, GETPRVT+13, GETPRVT+15, GETPRVT+16, GETINSR+1~, GETINSR+13, GETINSR+16, GETINSR+17
PRTO	GETPRVT+1~, GETPRVT+14, GETPRVT+15, GETPRVT+16, GETINSR+1~, GETINSR+14, GETINSR+15*, GETINSR+16, GETINSR+17
QFLG	GETLOC+1~, GETLOC+3, GETLOC+6, GETLOC+16, GETDT+1~, GETDT+2, GETDT+5, GETDT+19, GETAGE+1~, GETAGE+3* , GETAGE+6, GETAGE+13, GETES+1~, GETES+3, GETES+5, GETES+15, GETPRVT+1~, GETINSR+1~, GETINSR+2, GETMEDR+1~ , GETMEDD+1~, GETWRKC+1~, GETCHIP+1~, GETNOAR+1~
RBEG	GETDT+1~, GETDT+4, GETDT+6, GETDT+22, GETDT+23
REC	GETAGE+15~
RECINS	GETPRVT+1~, GETPRVT+7, GETPRVT+8, GETPRVT+10, GETPRVT+13, GETPRVT+14, GETINSR+1~, GETINSR+9, GETINSR+10, GETINSR+11 , GETINSR+13, GETINSR+14, GETNOAR+1~
REND	GETDT+1~, GETDT+4, GETDT+7, GETDT+22, GETDT+24
SEL	GETNOAR+1~, GETNOAR+8*
TO	GETNOAR+1~
U	GETLOC+14, GETLOC+24, GETAR+2, GETDT+22, GETPRVT+10, GETPRVT+13, GETPRVT+14, GETPRVT+24, GETPRVT+25, GETPRVT+26 , GETINSR+3, GETINSR+11, GETINSR+13, GETINSR+14, GETMEDR+11, GETMEDR+25, GETMEDD+9, GETMEDD+15, GETMEDD+16, GETMEDD+27 , GETWRKC+10, GETWRKC+11, GETWRKC+14, GETCHIP+11, GETCHIP+14, GETCHIP+15, GETCHIP+28, GETCHIP+34, GETCHIP+35, ELGDTCH+2 , PTACTIVE+5
VAL	GETLOC+1~, GETLOC+2, GETLOC+11, GETLOC+12, GETLOC+13, GETLOC+22, GETLOC+23, GETAGE+1~, GETAGE+2, GETAGE+11 , GETAGE+22
VDT	GETDT+1~
VIEN	GETDT+1~, GETDT+8, GETDT+9, GETDT+10, GETDT+11, GETDT+25, GETDT+26, GETDT+27, GETDT+28
WCFROM	GETPRVT+1~, GETPRVT+24, GETPRVT+27, GETPRVT+28, GETWRKC+1~, GETWRKC+10, GETWRKC+12, GETWRKC+13
WCIEN	GETPRVT+1~, GETPRVT+21, GETPRVT+22, GETPRVT+24, GETPRVT+25, GETPRVT+26, GETWRKC+1~
WCTO	GETPRVT+1~, GETPRVT+25, GETPRVT+27, GETPRVT+28, GETWRKC+1~, GETWRKC+11, GETWRKC+12, GETWRKC+13
WRKNUM	GETWRKC+1~, GETWRKC+7, GETWRKC+8, GETWRKC+10, GETWRKC+11, GETWRKC+14

Customize PDF page

Package: IHS Patient Registration

Routine: AGAGERP1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: