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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ABMDRSEL

Package: Third Party Billing

Routine: ABMDRSEL


Information

ABMDRSEL ; IHS/ASDST/DMJ - Selective Report Parameters ;

Source Information

Source file <ABMDRSEL.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 C^%DTC  ^DIC  ^DIR  
Third Party Billing 1 (PTYP,RFOR,RTYP)^ABMDRSL2  

Caller Graph

Caller Graph Total: 17

Package Total Caller Graph
Third Party Billing 17 ABMDBRUN  ABMDCCL  ABMDFPRT  ABMDICST  ABMDRAGE  ABMDRAL  ABMDRAPP  ABMDRBR  
ABMDRDX  ABMDRPR  ABMDRPT  ABMDRPX  ABMDRST  ABMDRSU  ABMDRXC  ABMESTAT  
ABMRDNYD  

Entry Points

Name Comments DBIA/ICR reference
VTYP ;SELECT VISIT TYPES
PARM ;
; Choose additional exclusion parameters
INS ;
REASON ; select reasons (for cancelled and pending claim reports)
XIT2 ;
XIT ;
CLIN ;SELECT CLINICS
LOOP ;
; Display current exclusion parameters

External References

Name Field # of Occurrence
C^%DTC ABMDRSEL+31, ABMDRSEL+35
PTYP^ABMDRSL2 PARM+17
RFOR^ABMDRSL2 PARM+16
RTYP^ABMDRSL2 PARM+19
^DIC CLIN+7, VTYP+7, REASON+7
^DIR PARM+12, INS+5, XIT+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,"EXCLUSION PARAMETERS Currently in Effect for RESTRICTING the EXPORT to:",!?3,"======================================================================="
  • Line Location: LOOP+3
Function Call: WRITE
  • Prompt: !?3,"- Visit Location.....: ",$P(^DIC(4,ABMY("LOC"),0),U)
  • Line Location: LOOP+4
Function Call: WRITE
  • Prompt: !?3,"- Billing Entity.....: ",$P(^AUTNINS(ABMY("INS"),0),U)
  • Line Location: LOOP+5
Function Call: WRITE
  • Prompt: !?3,"- Billing Entity.....: ",$P(^DPT(ABMY("PAT"),0),U)
  • Line Location: LOOP+6
Function Call: WRITE
  • Prompt: !?3,"- Billing Entity.....: ",ABMY("TYP","NM")
  • Line Location: LOOP+7
Function Call: WRITE
  • Prompt: " to: "
  • Line Location: LOOP+14
Function Call: WRITE
  • Prompt: !?3,"- Status Updater.....: ",$P($G(^VA(200,$G(ABMY("STATUS UPDATER")),0)),U)
  • Line Location: LOOP+15
Function Call: WRITE
  • Prompt: !?3,"- Approving Official.: ",$P(^VA(200,ABMY("APPR"),0),U)
  • Line Location: LOOP+16
Function Call: WRITE
  • Prompt: !?3,"- Cancelling Official.: ",$P(^VA(200,ABMY("CANC"),0),U)
  • Line Location: LOOP+17
Function Call: WRITE
  • Prompt: !?3,"- Closing Official.: ",$P(^VA(200,ABMY("CLOS"),0),U)
  • Line Location: LOOP+18
Function Call: WRITE
  • Prompt: !?3,"- Claim Status.......: ",ABM("STA","NM")
  • Line Location: LOOP+19
Function Call: WRITE
  • Prompt: !?3,"- Provider...........: ",$P(^VA(200,ABMY("PRV"),0),U)
  • Line Location: LOOP+20
Function Call: WRITE
  • Prompt: !?3,"- Eligibility Status.: ",ABMY("PTYP","NM")
  • Line Location: LOOP+21
Function Call: WRITE
  • Prompt: !?3,"- Diagnosis Code from: ",ABMY("DX",1)," to: ",ABMY("DX",2)," (",$S($D(ABMY("DX","ALL")):"Check All Diagnosis",1:"Primary Diagnosis Only"),")"
  • Line Location: LOOP+22
Function Call: WRITE
  • Prompt: !?3,"- Diagnosis (ICD-9) Code from: ",ABM("DX",1)," to: ",ABM("DX",2)," (",$S($D(ABMY("DX","ALL")):"Check All Diagnosis",1:"Primary Diagnosis Only"),")"
  • Line Location: LOOP+23
Function Call: WRITE
  • Prompt: !?3,"- Diagnosis (ICD-10) Code from: ",ABM("DX",3)," to: ",ABM("DX",4)," (",$S($D(ABMY("DX10","ALL")):"Check All Diagnosis",1:"Primary Diagnosis Only"),")"
  • Line Location: LOOP+24
Function Call: WRITE
  • Prompt: !?3,"- CPT Range from.....: ",ABMY("PX",1)," to: ",ABMY("PX",2)
  • Line Location: LOOP+25
Function Call: WRITE
  • Prompt: !?3,"- Report Type........: ",ABM("RTYP","NM")
  • Line Location: LOOP+26
Function Call: WRITE
  • Prompt: !?3,"- Output Type........: ",ABM("RFOR","NM")
  • Line Location: LOOP+27
Function Call: WRITE
  • Prompt: !,?7,"Write file to ",ABM("RPATH")_ABM("RFN")
  • Line Location: LOOP+28
Function Call: WRITE
  • Prompt: !!?5,"You can RESTRICT the REPORT to either a SPECIFIC INSURER or",!?5,"else a TYPE of INSURER (i.e. PRIVATE INSURANCE, MEDICAID...).",!
  • Line Location: INS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: XIT+2
Routine Call
  • DIC
  • Line Location:
    • CLIN+7
    • VTYP+7
    • REASON+7
Routine Call
  • DIR
  • Line Location:
    • PARM+12
    • INS+5
    • XIT+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(40.7 - [#40.7] Classic Fileman Calls
^ABMDVTYP - [#9002274.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTNINS - [#9999999.18] LOOP+5
^DIC(4 - [#4] LOOP+4
^DPT - [#2] LOOP+6
^VA(200 - [#200] LOOP+15, LOOP+16, LOOP+17, LOOP+18, LOOP+20

Label References

Name Line Occurrences
@( PARM+15, PARM+18, INS+7
CLIN XIT+11
LOOP PARM+15, PARM+16, PARM+17, PARM+18, PARM+19, INS+8
REASON XIT+11, XIT+13
VTYP XIT+13
XIT LOOP+2, PARM+14, INS+6
XIT2 XIT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ABM("APPR" ABMDRSEL+17
>> ABM("CANC" ABMDRSEL+18, PARM+4, PARM+15
>> ABM("CLOS" ABMDRSEL+19, PARM+4, PARM+15
>> ABM("DX" LOOP+23, LOOP+24
>> ABM("NODX" PARM+8, PARM+9, PARM+18
>> ABM("NOSTAT" PARM+6
>> ABM("OVER-DUE" ABMDRSEL+20, ABMDRSEL+22, ABMDRSEL+26
>> ABM("REASON" XIT+11, XIT+13, REASON+2
>> ABM("RFN" LOOP+28
>> ABM("RFOR" LOOP+27, LOOP+28, PARM+7, PARM+16
>> ABM("RPATH" LOOP+28
>> ABM("RTYP" LOOP+26, PARM+9, XIT+1
>> ABM("STA" LOOP+19, PARM+4, PARM+15
ABMY ABMDRSEL+14!
ABMY("APPR" ABMDRSEL+17*, LOOP+16
ABMY("CANC" ABMDRSEL+18*, LOOP+17
ABMY("CLIN" CLIN+1!, CLIN+6, CLIN+9*, CLIN+10
ABMY("CLOS" ABMDRSEL+19*, LOOP+18
ABMY("DT" ABMDRSEL+21*, ABMDRSEL+23*, ABMDRSEL+24*, ABMDRSEL+25*, ABMDRSEL+27*, ABMDRSEL+28*, ABMDRSEL+32*, ABMDRSEL+36*, LOOP+8, LOOP+12
, LOOP+14
ABMY("DX" LOOP+23, LOOP+24
ABMY("DX10" LOOP+24
ABMY("I" XIT2+1!
ABMY("INS" LOOP+5
ABMY("LOC" LOOP+4
ABMY("PAT" LOOP+6
ABMY("PRV" LOOP+20
ABMY("PTYP" LOOP+21
ABMY("PX" LOOP+25
ABMY("REASON" REASON+1!, REASON+6, REASON+9*, REASON+10
ABMY("SORT" XIT+10*, XIT+11, XIT+13, CLIN+11!, VTYP+11!, REASON+11!
ABMY("STATUS UPDATER" , LOOP+15
ABMY("TYP" LOOP+7
ABMY("VTYP" VTYP+1!, VTYP+6, VTYP+9*, VTYP+10
ABMY("X" ABMDRSEL+16*, LOOP+14, XIT2+1!
DIC ABMDRSEL+14!, CLIN+2*, CLIN+13!, VTYP+2*, VTYP+13!, REASON+2*, REASON+13!
DIC("A" CLIN+4*, CLIN+6*, VTYP+4*, VTYP+6*, REASON+4*, REASON+6*
DIC(0 CLIN+3*, VTYP+3*, REASON+3*
DIR ABMDRSEL+14!, PARM+2!, PARM+13!, XIT+3!, XIT2+1!
DIR("?" PARM+11*, XIT+7*
DIR("A" PARM+10*, INS+3*, XIT+5*
DIR("B" INS+4*, XIT+6*
DIR(0 PARM+3*, PARM+4*, PARM+6*, PARM+7*, PARM+8*, PARM+9*, INS+2*, XIT+4*
>> DIROUT LOOP+2, PARM+14, INS+8, XIT+1, XIT+9
>> DIRUT PARM+14, INS+6, XIT+9
DT ABMDRSEL+24, ABMDRSEL+25, ABMDRSEL+27, ABMDRSEL+28, ABMDRSEL+29, ABMDRSEL+33
>> DTOUT LOOP+2, INS+8, XIT+1
>> DUOUT LOOP+2, INS+8, XIT+1, CLIN+11, VTYP+11, REASON+11
U ABMDRSEL+15*, LOOP+4, LOOP+5, LOOP+6, LOOP+15, LOOP+16, LOOP+17, LOOP+18, LOOP+20
>> X ABMDRSEL+32, ABMDRSEL+36, LOOP+14*
>> X1 ABMDRSEL+29*, ABMDRSEL+33*
>> X2 ABMDRSEL+30*, ABMDRSEL+34*
>> Y PARM+15, PARM+16, PARM+17, PARM+18, INS+7, XIT+10, CLIN+5, CLIN+8, CLIN+9, VTYP+5
, VTYP+8, VTYP+9, REASON+5, REASON+8, REASON+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All