Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BMEMED4

Package: IHS Medicaid Eligibility Download

Routine: BMEMED4


Information

BMEMED4 ; IHS/PHXAO/TMJ - Add Non Auto Eligibles to Medicaid File ;

Source Information

Source file <BMEMED4.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 5 ^DIC  FILE^DICN  ^DIE  EN^DIQ  ^DIR  
IHS Medicaid Eligibility Download 2 $$HRCN^BMEMED  (NEW,STILLACT,UPDATES)^BMEMSTR  
IHS VA Utilities 1 ^XBFMK  

Entry Points

Name Comments DBIA/ICR reference
A ; -- driver
DISP ; -- display all information to the user
END ; -- cleanup
LOOK ; -- ask patient to check for eligibility do lookup
MED ; -- add eligiblity date(s)/data
UPD ; -- update ssn and medicaid eligible
DIQ2 ; -- display all information to the user
SAME() ; -- ask user if patient's are the same
INS ;GET ARIZONA MEDICAID INTERNAL NUMBER FROM THE INSURER FILE-PHX AREA
MERGE() ; -- merge
NEW ; -- create new entry in medicaid eligible
PCHK ; -- look up patient in patient file
ST() ; -- state
UP0 ; -- update 0th node - Patient Demographics Only

External References

Name Field # of Occurrence
$$HRCN^BMEMED DIQ2+3
NEW^BMEMSTR NEW+10
STILLACT^BMEMSTR MED+15
UPDATES^BMEMSTR MED+10, MED+14
^DIC LOOK+3, PCHK+2, INS+1
FILE^DICN NEW+9
^DIE MED+9, MED+14, UP0+6
EN^DIQ DISP+2
^DIR SAME+2, MERGE+2
^XBFMK NEW+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BMEMED4+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: LOOK+1
Function Call: WRITE
  • Prompt: @IOF,!,"Medicaid Eligibility Roster Data",!
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !!,"RPMS patient file entry",!
  • Line Location: DIQ2+1
Function Call: WRITE
  • Prompt: !,$P(BMEREC,U),?32,$P(BMEREC,U,2),?34,$P(BMEREC,U,9)
  • Line Location: DIQ2+2
Function Call: WRITE
  • Prompt: ?46,"HRCN: ",$$HRCN^BMEMED
  • Line Location: DIQ2+3
Function Call: WRITE
  • Prompt: !,"DOB: ",Y
  • Line Location: DIQ2+3
Function Call: WRITE
  • Prompt: ?20,$P(BMEREC,U,4)," ",$$ST
  • Line Location: DIQ2+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: SAME+1
Function Call: WRITE
  • Prompt: !
  • Line Location: MERGE+1
Function Call: WRITE
  • Prompt: !,"I am updating the Medicaid Eligibility File now. "
  • Line Location: UPD+7
Function Call: WRITE
  • Prompt: !!,*7,"ERROR IN INSURER FILE..."
  • Line Location: INS+3
Routine Call
  • DIE
  • Line Location:
    • MED+9
    • MED+14
    • UP0+6
Routine Call
  • DIC
  • Line Location:
    • LOOK+3
    • PCHK+2
    • INS+1
Routine Call
  • DIR
  • Line Location:
    • SAME+2
    • MERGE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^AUPNMCD - [#9000004] Classic Fileman Calls
^BMETMED - [#90332] 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, UP0+2*, UP0+3*, UP0+4*
^AUPNMCD("B" MED+1, NEW+3, UP0+1
^BMETMED - [#90332] UPD+1
^DD("DD" DIQ2+3
^DIC(5 - [#5] ST+1
^DPT - [#2] DIQ2+2, DIQ2+4

Label References

Name Line Occurrences
$$MERGE A+4
$$SAME A+4
$$ST DIQ2+4
A A+2, A+5
DIQ2 A+3
DISP A+2, A+3
END A+1, INS+3
INS UPD+4
LOOK A+1
MED UPD+8
NEW UPD+8
PCHK A+2
UP0 UPD+8
UPD A+4

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BMECOVTP UPD+5*, END+1!, MED+8, MED+13
BMEIEN A+1, LOOK+3*, DISP+2, UPD+1, END+1!, MED+1*, MED+3, MED+4, MED+6, MED+7
, MED+9, MED+12, MED+14, NEW+9*, UP0+1*, UP0+2, UP0+3, UP0+4, UP0+5
>> BMEINS INS+2*, NEW+5, UP0+2
>> BMELEBD MED+4*, MED+5, MED+11, MED+12
>> BMELEED MED+12*, MED+13, MED+14
>> BMEMDOB UPD+6*, NEW+6, UP0+5
BMEMEBD UPD+5*, END+1!, MED+6, MED+8, MED+9, MED+13, MED+14
BMEMEED UPD+5*, END+1!
>> BMEMRATE UPD+7*, NEW+6, UP0+5
>> BMENAME UPD+5*, NEW+5, UP0+5
>> BMENEW MED+10, MED+14, NEW+2*, NEW+11*
>> BMENUM UPD+5*, NEW+5, UP0+3
BMEREC DIQ2+2~*, DIQ2+3, DIQ2+4*, ST+1, UPD+1*, UPD+5, UPD+6, UPD+7
>> BMESEX UPD+7*, NEW+6
DA DISP+2*!, END+1!, MED+9*!, MED+14*!, UP0+5*, UP0+6!
DA(1 MED+9*, MED+14*
DD NEW+8!
DFN A+2, DIQ2+2, DIQ2+4, PCHK+2*, END+1!, MED+1, NEW+3, NEW+4, UP0+1
DIADD NEW+1!
DIC LOOK+1!*, LOOK+3!, DISP+2!*, PCHK+1!*, PCHK+2!, INS+1*, NEW+4*, NEW+9!
DIC("A" LOOK+2*, PCHK+2*
DIC("DR" NEW+5*, NEW+6*
DIC(0 LOOK+1*, PCHK+1*, INS+1*, NEW+4*
DIE MED+9*!, MED+14*!, UP0+5*, UP0+6!
DINUM NEW+1!
DIR SAME+1~, MERGE+1~
DIR("A" SAME+1*, MERGE+1*
DIR("B" SAME+2*, MERGE+2*
DIR(0 SAME+1*, MERGE+1*
>> DIRUT SAME+2, MERGE+2
DO NEW+8!
DR DISP+2!, MED+8*, MED+9!, MED+13*, MED+14!, UP0+5*, UP0+6!
DT NEW+6, UP0+5
E END+1!
IO(0 INS+3
IOF BMEMED4+10, DISP+1
N END+1!
SSN UPD+1*, END+1!
U DIQ2+2, DIQ2+3, DIQ2+4, ST+1, UPD+1, UPD+5, UPD+6, UPD+7, MED+3, MED+4
, MED+6, MED+7, MED+12, UP0+2, UP0+3, UP0+4
X SAME+1~, MERGE+1~, PCHK+1~, END+1!, INS+1*, NEW+4~*
Y LOOK+3, DIQ2+3*, SAME+1~, SAME+2, MERGE+1~, MERGE+2, PCHK+1~, PCHK+2, END+1!, INS+2
, NEW+4~, NEW+9
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All