Routine: AGAPIS

Package	Total	Call Graph
IHS Patient Registration	2	(GETGUAR,GETMCD,GETMCRAB,GETMCRD,GETPRVT,GETRRAB,GETRRD,GETTPL,WCOMP)^AGAPIS1 $$INSTYP^AGUTL
VA Fileman	2	FIELD^DID GETS^DIQ

Package	Total	Caller Graph
IHS Changes To ADT	1	BDGF2

Entry Points

Name	Comments	DBIA/ICR reference
GETELIG(AGGXY,AGGIEN,AGGDOS,AGGFLAG,AGGCAT,AGGBMX)	;PEP - API ENTRY FOR ACTIVE INSURANCE COVERAGE
BMXSET(CATPRIOR,AGGXY)	;
GETCODES()	;
SPECIAL(STR)	;CHANGE SPECIAL CHARS TO NULL
TYPE(TYPE)	;SET FIELDTYPE TO T(TEXT),N(UMERIC),I(NTEGER) OR D(ATE)
GETINS(AGGELIG,CATPRIOR)	;
BMXHDR(HDR)	;
CLEAN	;
DELOBSOL(CATPRIOR)	;
UPPER(STR)	;EP - CHANGE LOWER TO UPPER

External References

Name	Field # of Occurrence
GETGUAR^AGAPIS1	GETINS+32
GETMCD^AGAPIS1	GETINS+28
GETMCRAB^AGAPIS1	GETINS+27
GETMCRD^AGAPIS1	GETINS+30, GETINS+31
GETPRVT^AGAPIS1	GETINS+36
GETRRAB^AGAPIS1	GETINS+26
GETRRD^AGAPIS1	GETINS+29
GETTPL^AGAPIS1	GETINS+33
WCOMP^AGAPIS1	GETINS+34
$$INSTYP^AGUTL	GETINS+23
FIELD^DID	DELOBSOL+13
GETS^DIQ	GETELIG+25

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DO NOT CALL FROM ROOT!" Line Location: AGAPIS+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNICP - [#9000035]	GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNICP("EFF"	GETELIG+17, GETELIG+19, GETELIG+22
^AUPNPAT - [#9000001]	GETELIG+2
^DD(9000035	GETCODES+1
^DPT - [#2]	GETELIG+2

Label References

Name	Line Occurrences
$$GETCODES	GETELIG+12
$$UPPER	GETELIG+10, GETELIG+11
BMXHDR	GETELIG+35
BMXSET	GETELIG+36
CLEAN	GETELIG+33, GETELIG+38
DELOBSOL	GETELIG+31
GETINS	GETELIG+30

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGCDSTR	CLEAN+2!, GETCODES+1*, GETCODES+3
AGCODES	CLEAN+1!, CLEAN+2!, GETCODES+2, GETCODES+3, GETCODES+5
AGGBMX	GETELIG~, GETELIG+6, GETELIG+8*, GETELIG+33
AGGCAT	GETELIG~, GETELIG+3, GETELIG+4, GETELIG+5, GETELIG+10, GETELIG+12, GETELIG+18
AGGDATA	GETELIG+1~, GETELIG+23!, GETELIG+27, GETINS+18!, GETINS+37!, CLEAN+1!
AGGDOS	GETELIG~, GETELIG+9*, GETELIG+19
AGGELIG	GETINS~
AGGELIG(9000035	GETINS+3, GETINS+4, GETINS+5, GETINS+6, GETINS+7, GETINS+8
AGGERR	GETELIG+23!, GETELIG+26, GETINS+18!, GETINS+37!
AGGFIELD	CLEAN+4!
AGGFIELD("LABEL"	DELOBSOL+14
AGGFILE	CLEAN+1!
AGGFLAG	GETELIG~, GETELIG+11, GETELIG+13, CLEAN+1!
AGGHDR	CLEAN+1!
AGGIEN	GETELIG~, GETELIG+2, GETELIG+6, GETELIG+7, GETELIG+17, GETELIG+19, GETELIG+22
AGGINS	CLEAN+3!
AGGPOLH	CLEAN+3!
AGGRET	GETELIG+1~, CLEAN+1!, BMXSET+1~, BMXSET+2, BMXSET+18, BMXSET+20
AGGRETMP	GETELIG+1~, GETELIG+14, GETELIG+27, GETELIG+30, CLEAN+2!
AGGXY	GETELIG~, GETELIG+2, GETELIG+6, GETELIG+7!, GETELIG+33, GETELIG+36, GETELIG+37, BMXSET~, BMXSET+20*
AGGZERO	CLEAN+1!
AGZERO	GETCODES+1*, GETCODES+4!
CAT	GETELIG+16, GETELIG+17, GETELIG+18, GETELIG+19, GETELIG+22, CLEAN+2!
CATEGORY	GETINS+7, GETINS+9, GETINS+12, GETINS+13, GETINS+15, GETINS+17, GETINS+20, GETINS+24, GETINS+25, CLEAN+2! , BMXSET+3, BMXSET+4, BMXSET+6, BMXSET+8, BMXSET+10, BMXSET+12, BMXSET+14, BMXSET+15, BMXSET+16, BMXSET+17 , BMXSET+18, DELOBSOL+1, DELOBSOL+2*, DELOBSOL+4, DELOBSOL+6, DELOBSOL+8, DELOBSOL+10, DELOBSOL+12, DELOBSOL+14
CATPRIOR	GETELIG+1~, GETELIG+29!, GETELIG+30, GETELIG+31, GETELIG+33, GETELIG+36, GETINS~, GETINS+26, GETINS+27, GETINS+28 , GETINS+29, GETINS+30, GETINS+31, GETINS+32, GETINS+33, GETINS+34, GETINS+36, BMXSET~, DELOBSOL~
CATPRIOR(	GETINS+9*, GETINS+13, GETINS+15, GETINS+17, GETINS+20, GETINS+24, GETINS+25, BMXSET+4, BMXSET+6, BMXSET+8 , BMXSET+10, BMXSET+12, BMXSET+14, BMXSET+15, BMXSET+16, BMXSET+17, DELOBSOL+2, DELOBSOL+4, DELOBSOL+6, DELOBSOL+8 , DELOBSOL+10, DELOBSOL+12, DELOBSOL+14!
COVTYPE	GETINS+8, GETINS+9, GETINS+25, GETINS+26, GETINS+27, GETINS+29, GETINS+30, GETINS+31, CLEAN+2!
DATA	CLEAN+3!, BMXSET+15, BMXSET+16, BMXSET+17*, BMXSET+18
DT	GETELIG+9
EFFDT	GETELIG+19*, GETELIG+20, GETELIG+22, CLEAN+2!
FDAIENS	CLEAN+3!, BMXSET+11, BMXSET+12, BMXSET+14, BMXSET+15, BMXSET+16, BMXSET+17, BMXSET+18, DELOBSOL+9, DELOBSOL+10 , DELOBSOL+12, DELOBSOL+14
>> FIELD	BMXSET+13, BMXSET+14, BMXSET+15, BMXSET+16, BMXSET+17, BMXSET+18, DELOBSOL+11, DELOBSOL+12, DELOBSOL+13, DELOBSOL+14
FIELDS	CLEAN+3!
FIELDTYP	CLEAN+1!
FILENO	CLEAN+3!, BMXSET+9, BMXSET+10, BMXSET+12, BMXSET+14, BMXSET+15, BMXSET+16, BMXSET+17, BMXSET+18, DELOBSOL+7* , DELOBSOL+8*, DELOBSOL+10, DELOBSOL+12, DELOBSOL+13, DELOBSOL+14
FLD	GETELIG+1~
HDR	GETELIG+35, GETELIG+37, CLEAN+4!, BMXHDR~, BMXHDR+1, BMXHDR+2, BMXHDR+3, BMXHDR+4, BMXHDR+5, BMXHDR+6 , BMXHDR+7*, BMXHDR+8
INSPTR	GETINS+5, GETINS+9, GETINS+16, GETINS+17, GETINS+20, GETINS+23, GETINS+24, GETINS+25, GETINS+26, GETINS+27 , GETINS+28, GETINS+29, GETINS+30, CLEAN+2!, BMXSET+7, BMXSET+8, BMXSET+10, BMXSET+12, BMXSET+14, BMXSET+15 , BMXSET+16, BMXSET+17, BMXSET+18, DELOBSOL+5, DELOBSOL+6*, DELOBSOL+8, DELOBSOL+10, DELOBSOL+12, DELOBSOL+14
INSTYPE	GETINS+21, GETINS+23, GETINS+31, GETINS+32, GETINS+33, GETINS+34, CLEAN+2!
PATIEN	GETELIG+1~
PIECE	GETCODES+3*, GETCODES+4!
POLHPTR	CLEAN+2!
PRIORITY	GETINS+6, GETINS+9, GETINS+14, GETINS+15, GETINS+17, GETINS+20, GETINS+24, GETINS+25, CLEAN+3!, BMXSET+5 , BMXSET+6, BMXSET+8, BMXSET+10, BMXSET+12, BMXSET+14, BMXSET+15, BMXSET+16, BMXSET+17, BMXSET+18, DELOBSOL+3 , DELOBSOL+4*, DELOBSOL+6, DELOBSOL+8, DELOBSOL+10, DELOBSOL+12, DELOBSOL+14
RECORD	GETELIG+1~, GETELIG+21, GETELIG+22, GETELIG+25, GETINS+1, GETINS+3, GETINS+4, GETINS+5, GETINS+6, GETINS+7 , GETINS+8, CLEAN+2!
RECPTR	GETINS+4, GETINS+9, GETINS+24, CLEAN+3!
SBRECPTR	CLEAN+3!
STR	UPPER~, UPPER+1, SPECIAL~, SPECIAL+1
TPRECPTR	CLEAN+3!
TYPE	TYPE~, TYPE+1, TYPE+2, TYPE+3
U	GETELIG+4, GETELIG+5, GETELIG+18, BMXHDR+1, BMXHDR+2, BMXHDR+3, BMXHDR+4, BMXHDR+5, BMXHDR+6, BMXSET+18 , GETCODES+1, GETCODES+2, GETCODES+3
X	CLEAN+4!
Y	CLEAN+4!

Customize PDF page

Package: IHS Patient Registration

Routine: AGAPIS

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: