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 |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABMDREL

Package: Third Party Billing

Routine: ABMDREL


Information

ABMDREL ; IHS/ASDST/DMJ - List holders of medicare a, b, medicaid or priv ins ;

Source Information

Source file <ABMDREL.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 (,DD)^%DT  ^DIC  
Third Party Billing 1 ^ABMDRDBQ  

Entry Points

Name Comments DBIA/ICR reference
QUIT
F ;
AOD ;
GETINFO ;
MCD ;;X;;Medicaid;;MCD;;ACTIVE MEDICAID ENROLLEES
START
PI ;;X;;Private Insurance;;PI;;ACTIVE PRIVATE INSURANCE ENROLLEES
MCRB ;;B;;Medicare Part B;;MCRA;;ACTIVE MEDICARE PART B ENROLLEES
MCRA ;;A;;Medicare Part A;;MCRA;;ACTIVE MEDICARE PART A ENROLLEES

External References

Name Field # of Occurrence
^%DT AOD+1
DD^%DT AOD+3
^ABMDRDBQ AOD+6
^DIC F+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",!
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),"REPORT TYPE MISSING!! NOTIFY PROGRAMMER",!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!,"This option will print a list of Patients who are registered at",!,"the facility that you select who are currently enrolled in ",ABMD("INF"),".",!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,"You will be asked to enter an 'As of' date to be used in determining",!,"those patients who are 'actively' enrolled.",!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !,"The report will be sorted alphabetically by Patient Name.",!
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !
  • Line Location: AOD+1
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"REPORT INFORMATION MISSING!! NOTIFY PROGRAMMER!",!!
  • Line Location: GETINFO+1
Routine Call
  • DIC
  • Line Location:
    • F+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUTTLOC - [#9999999.06] Classic Fileman Calls

Label References

Name Line Occurrences
F AOD+2
GETINFO START+2
QUIT START+2, F+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT AOD+1*
>> %DT("A" AOD+1*
ABMD QUIT!
ABMD("$J" AOD+4*
ABMD("ACE" AOD+3*
ABMD("ACEY" AOD+3*
ABMD("INF" START+3, GETINFO+2*
ABMD("INFO" GETINFO+2*
ABMD("PROC" GETINFO+2*
ABMD("Q" START+2, GETINFO+1*
ABMD("SU" F+2*
ABMD("TITL" GETINFO+2*
ABMD("VAL" GETINFO+2*
ABMDRPT START+1, QUIT!
>> ABMQ("NS" AOD+5*
>> ABMQ("RC" AOD+5*
>> ABMQ("RP" AOD+5*
>> ABMQ("RX" AOD+5*
DA F+1!
DIC F+1*!
DIC("A" F+1*
DIC(0 F+1*
DUZ AOD+4
DUZ(2 START
>> Y F+1, F+2, AOD+2, AOD+3

Marked Items

Name Field # of Occurrence
$T(@(1) GETINFO+1, GETINFO+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  Marked Items |  All