Routine: AGGUL1

Package	Total	Call Graph
VA Fileman	7	^%DT ^DIC FIELD^DID FILE^DIE $$IENS^DILF $$FMTE^DILIBF $$GET1^DIQ
IHS Patient Registration	3	LOADCAT^AGCAT EP^AGINS $$ISACTIVE^AGINSUPD
Kernel	3	($$DEFDIR,$$DEL,$$PWD,CLOSE,OPEN)^%ZISH $$FMTE^XLFDT $$STRIP^XLFSTR
Patient Registration GUI	1	($$FMTE,$$TKO)^AGGUL1

Package	Total	Caller Graph
Patient Registration GUI	38	AGGALTRG AGGARVAL AGGCMTCH AGGDCTRG AGGDCUPD AGGEDCHK AGGINSUR AGGMCTRG AGGMLUPD AGGPALTR AGGPOLCY AGGPOTH AGGPS1P1 AGGPTADD AGGPTDMG AGGPTLKP AGGPTNAM AGGPTPVI AGGPTPVT AGGPTSSN AGGPTTRG AGGPTUPD AGGRFCE AGGRPRT AGGRPTDP AGGUL1 AGGUL2 AGGUPMCD AGGUPMCR AGGUPPVT AGGUTB AGGWCHC AGGWDEF AGGWDISP AGGWOTH AGGWTBLK AGGWTRIG AGGWVAL

Entry Points

Name	Comments	DBIA/ICR reference
FMTE(Y)	;EP - Convert Fileman Date/Time to 'MMM DD,CCYY HH:MM:SS' format.
DATE(DATE)	;EP - Convert standard date/time to a FileMan date/time
MREC(DFN)	;EP - Status of Medical Record
TKO(STR,VAL)	;EP - Take off ending character
STRIP(STR,VAL)	;EP - Remove one or more trailing characters in a string.
EML(DFN)	; EP - Update PREVIOUS EMAIL ADDRESSES
SENS(DFN)	;EP - Is patient sensitive flag
TMPFL(MODE,UID,DFN)	;EP - Open to 'R'ead, Open to 'W'rite, 'C'lose or 'D'elete ; temporary file designed for use when converting report text to RPC ; data strings. Note that UID and DFN are components of the file name.
CHS(DFN,PAIR)	;EP - CHS Eligibility
ALT(DFN)	;EP - Alternate Resources
FMTMDY(DATE)	;EP - Convert fileman date to MM/DD/YYYY format
AOB(DFN)	;EP - Assign of Benefits
CTRL(X)	;EP - Strip out control characters
TRIB(DFN)	; EP - Get list of other tribes
TRIM(STR,VAL)	;EP - Remove one or more leading characters in a string.
HRNL(DFN,LOC)	;PEP - Patient's Health Record Number ; Input ; DFN - Patient's internal entry number ; LOC - Facility internal entry number (so does not depend on DUZ(2)
CTY(DFN)	;EP - Combines city,state and zip
ADR(PATDFN,FORCE)	; EP - Update PREVIOUS MAIL ADDRESSES ; Copied and modified from AGUTILS
PTR(FIL,FLD,VVAL,VPEC)	;EP - Find alternate value for a pointer
STC(FIL,FLD,VAL)	; EP - Find a value for a set of codes code ; Input Parameters ; FIL = FileMan File Number ; FLD = FileMan Field Number ; VAL = Code Value
ROI(DFN)	;EP - Release of Information
HRN(DFN)	;EP - Patient Health Record Number

Name	Field # of Occurrence
^%DT	DATE+11
$$DEFDIR^%ZISH	TMPFL+19
$$DEL^%ZISH	TMPFL+24
$$PWD^%ZISH	TMPFL+20
CLOSE^%ZISH	TMPFL+15
OPEN^%ZISH	TMPFL+28
LOADCAT^AGCAT	ALT+6
$$FMTE^AGGUL1	AOB+5, ROI+5
$$TKO^AGGUL1	TRIB+7
EP^AGINS	ALT+5
$$ISACTIVE^AGINSUPD	ALT+11
^DIC	ADR+10, EML+6
FIELD^DID	PTR+13
FILE^DIE	ADR+38, EML+12
$$IENS^DILF	ADR+26, EML+10, TRIB+5
$$FMTE^DILIBF	FMTE+11
$$GET1^DIQ	PTR+19, PTR+20, ADR+16, ADR+17, ADR+18, ADR+19, ADR+20, ADR+22, ADR+23, EML+9 , TRIB+6
$$FMTE^XLFDT	FMTMDY+8
$$STRIP^XLFSTR	PTR+16

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

Name	Line Occurrences (* Changed, ! Killed)
^AUPNELM - [#9000030]	CHS+4, CHS+5
^AUPNPAT - [#9000001]	HRN+17, HRN+18, HRNL+8, HRNL+9, CHS+3, MREC+2, AOB+3, ROI+3, ADR+4, TRIB+4
^AUTTDIS - [#9999999.02]	MREC+4
^DD(	STC+7
^DGSL(38.1 - [#38.1]	SENS+4
^DIC(5 - [#5]	CTY+6, ADR+21
^DPT - [#2]	CTY+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DATE+6~, DATE+11*
ADATA	CTY+1~, CTY+2*, CTY+3, CTY+5, CTY+7, CTY+8
ADDREC	ADR+5~, ADR+12, ADR+26, EML+1~, EML+8, EML+10
AGCAT	ALT+1~
AGCITY	ADR+15~, ADR+19*, ADR+35
AGEMAIL	EML+1~, EML+9*, EML+11
AGGUAR	ALT+1~
AGGUPD	EML+1~
AGGUPD(	ADR+29, ADR+30, ADR+31, ADR+34, ADR+35, ADR+36, EML+11*
AGHPHONE	ADR+15~, ADR+23*, ADR+36
AGINS	ALT+1~
AGINS(	ALT+9, ALT+10
AGINSN1	ALT+1~
AGINSNN	ALT+3~
AGSEL	ALT+1~
AGSTATE	ADR+15~, ADR+20, ADR+21, ADR+35
AGSTR1	ADR+15~, ADR+16*, ADR+34
AGSTR2	ADR+15~, ADR+17*, ADR+34
AGSTR3	ADR+15~, ADR+18*, ADR+34
AGZIP	ADR+15~, ADR+22*, ADR+35
AOPCOINS	ALT+1~
ARR1	PTR+8~
AZIP	CTY+1~, CTY+7*, CTY+9
C0	CHS+1~, CHS+2, CHS+3, CHS+4, CHS+5
COINS	ALT+4~
DA	ADR+5~, ADR+25!, ADR+26, EML+1~, EML+10, TRIB+1~, TRIB+3, TRIB+4, TRIB+5
DA(1	ADR+6, ADR+7, ADR+26, ADR+27, EML+2, EML+3, EML+10, TRIB+3*
DATE	DATE~, DATE+7, DATE+8, DATE+9, DATE+10, DATE+11, FMTMDY~, FMTMDY+8, AOB+1~, AOB+2 , AOB+3, AOB+4, AOB+5, ROI+1~, ROI+2, ROI+3*, ROI+4, ROI+5
DATEINEF	ALT+2~
DATM	FMTE+10~, FMTE+11, FMTE+12, FMTE+13
DFN	TMPFL~, TMPFL+21, HRN~, HRN+14, HRN+17, HRN+18, HRNL~, HRNL+6, HRNL+8, HRNL+9 , SENS~, SENS+4, CTY~, CTY+2, CHS~, CHS+3, ALT~, MREC~, MREC+2, AOB~ , AOB+3, ROI~, ROI+3, EML~, EML+2, EML+9, EML+10, TRIB~, TRIB+3, TRIB+4
DIC	ADR+5~, ADR+7, ADR+25!, EML+1~, EML+3
DIC(0	ADR+8, EML+4
DIE	ADR+5~, ADR+25!, ADR+27*, EML+1~
DIR	ADR+25!
DR	ADR+5~, ADR+25!, EML+1~
DT	ADR+9, EML+5
DUZ(2	HRN+13, HRN+17, HRN+18, MREC+2
EFF	ALT+4~, ALT+10*, ALT+11
END	ALT+4~, ALT+10*, ALT+11
ENTDAT	ALT+4~
ERROR	EML+1~
FIL	PTR~, PTR+13, PTR+19, STC~, STC+7
FIXLIST	ALT+2~
FLAG	SENS+3~, SENS+4, SENS+5, SENS+6
FLD	PTR~, PTR+13, PTR+19, STC~, STC+7
FORCE	ADR~, ADR+2*, ADR+4, ADR+28, ADR+33
GRPNUMB	ALT+4~
HRN	HRN+16~, HRN+17, HRN+18, HRN+19, HRNL+7~, HRNL+8, HRNL+9, HRNL+10
HSFN	TMPFL+11~, TMPFL+21*, TMPFL+24, TMPFL+28
HSPATH	TMPFL+11~, TMPFL+19, TMPFL+20, TMPFL+24, TMPFL+28
>> I	STC+9*
IENS	ADR+26, ADR+29, ADR+30, ADR+31, ADR+34, ADR+35, ADR+36, EML+10, EML+11, TRIB+1~ , TRIB+5*, TRIB+6
INSGEND	ALT+2~
ISACTIVE	ALT+1~, ALT+7, ALT+11, ALT+12, ALT+13
LOC	HRNL~, HRNL+5, HRNL+8, HRNL+9
LV	TKO+14~, TKO+15*, TKO+16
LZIP	CTY+1~, CTY+8*, CTY+9
MAX	ALT+3~
MEDCARE	ALT+2~
MODE	TMPFL~, TMPFL+15, TMPFL+18, TMPFL+24, TMPFL+27, TMPFL+28
>> N	ALT+8, ALT+9, ALT+10
NEWSEQR	ALT+2~
PAIR	CHS~, CHS+4
PATDFN	ADR~, ADR+4, ADR+6, ADR+16, ADR+17, ADR+18, ADR+19, ADR+20, ADR+22, ADR+23 , ADR+26
PHREC	ALT+2~
PLANNAME	ALT+3~
PLANPTR	ALT+3~
POLH	ALT+2~
POP	TMPFL+11~, TMPFL+12, TMPFL+24, TMPFL+29
RAILROAD	ALT+2~
REC	ALT+3~
RELPOLHO	ALT+3~
RESULT	CTY+1~, CTY+3, CTY+4, CTY+6, CTY+9, CTY+10, CHS+1~, CHS+2, CHS+3, CHS+4 , CHS+5, CHS+6, ALT+1~, ALT+12, ALT+13, ALT+14, MREC+1~, AOB+1~, ROI+1~, TRIB+1~ , TRIB+2, TRIB+6, TRIB+7, TRIB+8*, TRIB+9
SPECSUB	ALT+3~
STN	CTY+1~, CTY+5*, CTY+6
STR	TKO~, TKO+11, TKO+16, TKO+18, STRIP~, STRIP+11, STRIP+12, STRIP+14, STRIP+15, TRIM~ , TRIM+10, TRIM+11, TRIM+13*, TRIM+14
TRUEPOLH	ALT+3~
U	PTR+15, STC+7, HRN+17, HRN+18, HRNL+8, HRNL+9, CTY+3, CTY+5, CTY+6, CTY+7 , CTY+8, CHS+4, CHS+5, ALT+10, MREC+2, MREC+4
UID	TMPFL~, TMPFL+21
VAL	TKO~, TKO+12, TKO+15, TKO+16, STRIP~, STRIP+12, STRIP+14, TRIM~, TRIM+11, TRIM+13 , STC~, STC+10, MREC+1~, MREC+2*, MREC+3, MREC+4
VALUE	STC+6~, STC+10*, STC+12
VEDATA	PTR+8~, PTR+14, STC+6~, STC+7, STC+9
VEHDTA	PTR+8~, PTR+14*, PTR+15
VEPAR	PTR+17!
VEPAR("POINTER"	PTR+14
VEQFL	STC+6~, STC+7, STC+9, STC+10
VEVL	STC+6~, STC+9*, STC+10
VFILN	PTR+8~, PTR+15, PTR+16, PTR+20
VPEC	PTR~, PTR+9*, PTR+20
VVAL	PTR~, PTR+11, PTR+19
VVALUE	PTR+8~, PTR+20*, PTR+28
VVVAL	PTR+8~, PTR+19*, PTR+20
X	DATE+6~, DATE+11, CTRL~, CTRL+1, CTRL+2, ADR+9, EML+5
Y	FMTE~, FMTE+11, DATE+6~, DATE+12, DATE+14, CTRL+1, ADR+11, ADR+12, EML+7, EML+8

Customize PDF page

Package: Patient Registration GUI

Routine: AGGUL1

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 38

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Local Variables

Legend: