Routine: BMEMED

Information

BMEMED ; IHS/PHXAO/TMJ - ACTUAL UPDATES OF RECORDS - 560 FILE PROCESS ;

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
VA Fileman	5	^%DT C^%DTC ^DIC FILE^DICN ^DIE
IHS Medicaid Eligibility Download	2	^BMEMED0 (NEW,STILLACT,UPDATES)^BMEMSTR
IHS VA Utilities	1	^XBFMK
Kernel	1	$$NOW^XLFDT

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
IHS Medicaid Eligibility Download	2	BMEMED4 BMEMLOAD

Entry Points

Name	Comments	DBIA/ICR reference
A	; -- BEGIN $O THRU BMEGMED(GLOBAL CREATED BY ROUTINE BMEGMED
MED	; -- add eligiblity date(s)/data
BEGIN	;Establish Date/Time/Count Variables
END2	;Abnormal Termination - Medicaid Insurer missing from Insurer File
END	; -- cleanup
LOG	;Update BME MEDICAL ELIGIBLE DOWNLOAD LOG
HRCN()	;EP; -- IHS health record number
MEDNUM	;Check Med Elig Number against RPMS
INS	;GET ARIZONA MEDICAID INTERNAL NUMBER FROM THE INSURER FILE-PHX AREA
MEDNAME	;Check Med Elig Medicaid Name-If exists for match
START	;BEGIN $O THRU ^BMEGMED( -created by Routine BMEGMED
EED()	; -- eligibility end date
DOB()	;EP - Date of AHCCCS Birth Date Conversion
EHIS()	; -- eligibilities after date/flag
NEW	; -- create new entry in medicaid eligible
EBD()	; -- eligibility beg date
UP0	; -- update 0th node - Patient Demographics Only
ERD()	;EP -- Eligibility Enrollment Dt (Same as Beg Date on Roster)

External References

Name	Field # of Occurrence
^%DT	EED+4, EBD+4, ERD+4, DOB+3
C^%DTC	EHIS+1
^BMEMED0	A+9, A+19, A+20, A+21, A+22
NEW^BMEMSTR	NEW+10
STILLACT^BMEMSTR	MED+17
UPDATES^BMEMSTR	MED+10, MED+16
^DIC	INS+1
FILE^DICN	NEW+7, LOG+8
^DIE	MED+9, MED+16, UP0+6
^XBFMK	NEW+2, NEW+7, LOG+4, LOG+8
$$NOW^XLFDT	BEGIN+12, INS+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNMCD - [#9000004]	Classic Fileman Calls
^BMEMLOG - [#90333]	Classic Fileman Calls
^AUTNINS - [#9999999.18]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNMCD - [#9000004]	MED+2, MED+3, MED+4, MED+6, MED+7, MED+12, MED+13, MED+14, UP0+2, UP0+3 , UP0+4*, MEDNAME+5, MEDNUM+5, MEDNUM+7
^AUPNMCD("AE"	MEDNUM+3
^AUPNMCD("B"	MED+1, NEW+1, UP0+1, MEDNAME+3
^AUPNPAT - [#9000001]	HRCN+1
^BMEGMED(	A+1, A+2
^BMETMED - [#90332]	START+5!
^BMETMED(0	START+7*
^DPT - [#2]	A+11, A+13
^DPT("SSN"	A+9
^TMP($J	START+5!

Label References

Name	Line Occurrences
$$DOB	A+12
$$EBD	A+16
$$EED	A+16
$$ERD	A+17
END	INS+8
END2	INS+3
LOG	INS+7
MED	A+23
MEDNAME	A+10
MEDNUM	A+8
NEW	A+23
START	INS+5
UP0	A+23

Naked Globals

Name	Field # of Occurrence
^(0	A+13, MED+3*, MED+7, MED+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BMEBTIME	BEGIN+12*, END+12!, LOG+5
BMECNT	END+11!
BMECOVTP	A+17*, MED+8, MED+15, END+11!
BMEETIME	INS+6*, END+12!, LOG+6
>> BMEFILE	LOG+7
BMEFNAM	A+2, A+5, A+6, END+11!
BMEGTOT	BEGIN+11, A+7, END+1*, END+12!, LOG+6
BMEIEN	MED+1, MED+2, MED+3, MED+4, MED+6, MED+7, MED+9, MED+12, MED+13, MED+14 , MED+16, NEW+7, UP0+1*, UP0+2, UP0+3, UP0+4, UP0+5, END+11!
BMEIFN	A+1*, A+2, END+11!
>> BMEINS	INS+2*, NEW+4, UP0+2
BMEKIDCT	BEGIN+8, A+19, END+12!, LOG+6
>> BMELEBD	MED+4*, MED+5, MED+11, MED+12
>> BMELEED	MED+12*, MED+13, MED+14, MED+15, MED+16
BMEMDOB	A+2, A+12, A+21, END+11!, DOB+2*, DOB+3
BMEMEBD	A+16, MED+2, MED+6, MED+8, MED+9, MED+13, MED+15, MED+16, END+11!, EBD+3 , EBD+4
>> BMEMEDNA	MEDNAME+5*, MEDNAME+6, MEDNAME+7
>> BMEMEDNU	MEDNUM+5*, MEDNUM+6, MEDNUM+7
BMEMEED	A+16, MED+2, END+11!, EED+3, EED+4
>> BMEMERD	A+17, ERD+3, ERD+4
BMEMFULN	A+6*, NEW+4, UP0+5, END+11!, MEDNAME+7
BMEMIEN	END+11!, MEDNAME+3, MEDNAME+4, MEDNAME+5, MEDNUM+3, MEDNUM+4, MEDNUM+5, MEDNUM+7
BMEMKID	A+7, A+19, END+12!
>> BMEMLNAM	A+2, A+4, A+6, A+20
>> BMEMMDD	EED+2, EED+3, EBD+2, EBD+3, ERD+2, ERD+3, DOB+1, DOB+2
BMEMNEW	BEGIN+5, NEW+8, END+12!, LOG+7
BMEMNUM	A+2*, A+9~, A+19~, A+20~, A+21~, A+22~, NEW+4, UP0+3, END+11!, MEDNUM+3 , MEDNUM+7
BMEMRATE	A+7, A+15, A+19, NEW+5, UP0+5, END+11!
BMEMSEX	A+2*, A+22, END+11!
BMEMSSN	A+2*, A+9~, A+19~, A+20~, A+21~, A+22~
BMEMUPDT	BEGIN+6, MED+10, MED+16*, END+12!, LOG+7
BMENAMCK	A+20, END+11!, MEDNAME+2, MEDNAME+7
BMENOCT	BEGIN+10, A+7, A+18, MED+10, MED+16, NEW+9, END+12!
>> BMENUMCK	A+9, MEDNUM+2, MEDNUM+7
BMEREC	A+2*, A+3, A+9~, A+15, A+17, A+19~, A+20~, A+21~, A+22~, END+11! , EED+2, EBD+2, ERD+2, DOB+1
>> BMESDOB	A+11*, A+21
>> BMESFULN	A+13*, A+14
>> BMESLNAM	A+14*, A+20
>> BMESSEX	A+13*, A+22, NEW+5
>> BMESSNCK	A+7, A+20, A+21, A+22
BMESSNCT	BEGIN+7, A+20, A+21, A+22, END+12!, LOG+6
BMETOTCT	BEGIN+9, A+24, END+12!, LOG+6
>> BMEYYYY	EED+2, EED+3, EBD+2, EBD+3, ERD+2, ERD+3, DOB+1, DOB+2
DA	MED+9!, MED+16!, UP0+5*, UP0+6!
DA(1	MED+9, MED+16
DFN	A+9, A+11, A+13, MED+1, NEW+1, NEW+3, UP0+1, END+11!, HRCN+1, MEDNAME+3 , MEDNUM+7
DIADD	NEW+2!, NEW+7!, LOG+4!, LOG+8!
>> DIC	INS+1, NEW+3, LOG+5*
>> DIC("DR"	NEW+4, NEW+5, LOG+6, LOG+7
>> DIC(0	INS+1, NEW+3, LOG+5*
DIE	MED+9!, MED+16!, UP0+5*, UP0+6!
DINUM	MED+9!, MED+16!, NEW+2!, NEW+7!, LOG+4!, LOG+8!
>> DLAYGO	NEW+3, LOG+5
DR	MED+8, MED+9!, MED+15, MED+16!, UP0+5*, UP0+6!
DT	NEW+5, UP0+5, EHIS+1
DUZ(2	HRCN+1
>> IEN	LOG+8*
MEDNAME	END+11!
U	A+11, A+13, MED+2, MED+3, MED+4, MED+6, MED+7, MED+12, MED+13, MED+14 , UP0+2, UP0+3, UP0+4, MEDNAME+5, MEDNUM+5, MEDNUM+7
X	INS+1, NEW+3, EED+2~, EED+4, EBD+2~, EBD+4, EHIS+1~, ERD+2~, ERD+4, DOB+1~ , DOB+3, LOG+5*
X1	EHIS+1~*
X2	EHIS+1~*
Y	INS+2, NEW+7, EED+2~, EED+4, EBD+2~, EBD+4, ERD+2~, ERD+4, DOB+1~, DOB+3 , LOG+8

Customize PDF page

Package: IHS Medicaid Eligibility Download

Routine: BMEMED

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: