Routine: BME834

Information

BME834 ; IHS/PHXAO/TMJ - ACTUAL UPDATES OF RECORDS - 834 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	^BME8340 (NEW,STILLACT,UPDATES)^BMEMSTR
IHS VA Utilities	1	^XBFMK
Kernel	1	$$NOW^XLFDT

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
IHS Medicaid Eligibility Download	1	BMEMLOAD

Entry Points

Name	Comments	DBIA/ICR reference
A	; -- BEGIN $O THRU BMEHOLD(GLOBAL CREATED BY ROUTINE BME____GIS GLOBAL
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 ^BMEHOLD( -created by Routine BMEGMED
EED()	; -- eligibility end date (No Longer Available in the 834 Transaction)
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	EBD+5, ERD+4, DOB+3
C^%DTC	EHIS+1
^BME8340	A+16, A+26, A+27, A+28, A+29
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+11, 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+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
^BMEHOLD - [#90330]	A+1, A+2, A+24
^BMEHOLD(0	START+7*
^DPT - [#2]	A+18, A+20
^DPT("SSN"	A+16

Label References

Name	Line Occurrences
$$DOB	A+19
$$EBD	A+23
$$ERD	A+24
END	INS+9
END2	INS+3
LOG	INS+8
MED	A+30
MEDNAME	A+17
MEDNUM	A+15
NEW	A+30
START	INS+5
UP0	A+30

Naked Globals

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BMEBTIME	BEGIN+11*, END+12!, LOG+5
BMECNT	END+11!
BMECOVTP	A+24*, MED+8, MED+15, END+11!
BMEETIME	INS+6*, INS+7, END+12!, LOG+6
>> BMEFILE	INS+7*, LOG+7
BMEFNAM	A+8, A+12, A+13, END+11!
BMEGTOT	BEGIN+10, A+14, END+1*, END+12!, LOG+6
BMEIEN	MED+1, 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, A+24, END+11!
>> BMEINS	INS+2*, NEW+4, UP0+2
BMEKIDCT	BEGIN+7, A+26, 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+6, A+19, A+28, END+11!, DOB+1, DOB+2*, DOB+3
BMEMEBD	A+9, A+23, MED+6, MED+8, MED+9, MED+13, MED+15, MED+16, END+11!, EBD+1* , EBD+3, EBD+4*, EBD+5
>> BMEMEDNA	MEDNAME+5*, MEDNAME+6, MEDNAME+7
>> BMEMEDNU	MEDNUM+5*, MEDNUM+6, MEDNUM+7
>> BMEMERD	A+24, ERD+1, ERD+2, ERD+3*, ERD+4
BMEMFULN	A+13*, 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+14, A+26, END+12!
>> BMEMLNAM	A+5, A+11, A+13, A+27
>> BMEMMDD	EBD+3, EBD+4, ERD+2, ERD+3, DOB+1*, DOB+2
BMEMNEW	BEGIN+4, NEW+8, END+12!, LOG+7
BMEMNUM	A+4*, A+16~, A+26~, A+27~, A+28~, A+29~, NEW+4, UP0+3, END+11!, MEDNUM+3 , MEDNUM+7
BMEMRATE	A+14, A+22, A+26, NEW+5, UP0+5, END+11!
BMEMSEX	A+7*, A+29, END+11!
BMEMSSN	A+3*, A+16~, A+26~, A+27~, A+28~, A+29~
BMEMUPDT	BEGIN+5, MED+10, MED+16*, END+12!, LOG+7
BMENAMCK	A+27, END+11!, MEDNAME+2, MEDNAME+7
BMENOCT	BEGIN+9, A+14, A+25, MED+10, MED+16, NEW+9, END+12!
>> BMENUMCK	A+16, MEDNUM+2, MEDNUM+7
BMEREC	A+2*, A+3, A+4, A+5, A+6, A+7, A+8, A+9, A+16~, A+22 , A+26~, A+27~, A+28~, A+29~, END+11!, EBD+1, ERD+1
>> BMESDOB	A+18*, A+28
>> BMESFULN	A+20*, A+21
>> BMESLNAM	A+21*, A+27
>> BMESSEX	A+20*, A+29, NEW+5
>> BMESSNCK	A+14, A+27, A+28, A+29
BMESSNCT	BEGIN+6, A+27, A+28, A+29, END+12!, LOG+6
BMETOTCT	BEGIN+8, A+31, END+12!, LOG+6
>> BMEYYYY	EBD+3, EBD+4, 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+16, A+18, A+20, 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+3, A+4, A+5, A+6, A+7, A+8, A+9, A+18, A+20, A+22 , A+24, MED+3, MED+4, MED+6, MED+7, MED+12, MED+13, MED+14, UP0+2, UP0+3 , UP0+4, EBD+1, ERD+1, MEDNAME+5, MEDNUM+5, MEDNUM+7
X	INS+1, NEW+3, EBD+3~, EBD+5, EHIS+1~, ERD+2~, ERD+4, DOB+1~, DOB+3, LOG+5
X1	EHIS+1~*
X2	EHIS+1~*
Y	INS+2, NEW+7, EBD+3~, EBD+5, ERD+2~, ERD+4, DOB+1~, DOB+3, LOG+8

Customize PDF page

Package: IHS Medicaid Eligibility Download

Routine: BME834

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: