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 |  Local Variables |  All
Print Page as PDF
Routine: ABMEMCRC

Package: Third Party Billing

Routine: ABMEMCRC


Information

ABMEMCRC ; IHS/SD/SDR - 3PB recreate batch of ICD9 bills

Source Information

Source file <ABMEMCRC.m>

Call Graph

Call Graph Total: 19

Package Total Call Graph
Third Party Billing 13 $$SDT^ABMDUTL  ^ABME8L1  ^ABME8L10  ^ABME8L2  (,PTCHG)^ABME8L3  ^ABME8L5  ^ABME8L6  ^ABME8L7  
^ABME8L8  ^ABMEF21  ($$NSN,MSG)^ABMERUTL  ($$PNUM,$$SBR,SET)^ABMUTLP  EN^ABMVDF  
VA Fileman 5 NOW^%DTC  ^DIC  FILE^DICN  ^DIE  ^DIR  
Kernel 1 ^%ZISC  

Entry Points

Name Comments DBIA/ICR reference
SBR ;new subscriber
RESUBN ;
TODT ;
NEWB ;
; Create a new batch (Make entry in 3P TX STATUS)
BILLCK ;
INSURER
ALOOP ;
WHATDT ;
BLOOP ;
XIT ;
VLOOP ;
CLAIM ;one claim
MSG ;
OUTPUT ;
EP ;
FROMDT ;

External References

Name Field # of Occurrence
NOW^%DTC NEWB+2
^%ZISC XIT+1
$$SDT^ABMDUTL MSG+9
^ABME8L1 CLAIM+10
^ABME8L10 CLAIM+22
^ABME8L2 CLAIM+11
^ABME8L3 SBR+10
PTCHG^ABME8L3 CLAIM+16
^ABME8L5 CLAIM+18
^ABME8L6 CLAIM+19
^ABME8L7 CLAIM+20
^ABME8L8 CLAIM+21
^ABMEF21 OUTPUT+31
$$NSN^ABMERUTL NEWB+15
MSG^ABMERUTL OUTPUT+5
$$PNUM^ABMUTLP CLAIM+17, SBR+9
$$SBR^ABMUTLP OUTPUT+25
SET^ABMUTLP CLAIM+6
EN^ABMVDF INSURER
^DIC INSURER+3
FILE^DICN OUTPUT+15, NEWB+7
^DIE OUTPUT+23, OUTPUT+27, OUTPUT+36, NEWB+14, NEWB+15
^DIR EP+12, WHATDT+4, FROMDT+4, TODT+4, RESUBN+4, MSG+12, MSG+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will create a batch of claims that meet the following criteria:"
  • Line Location: EP+1
Function Call: WRITE
  • Prompt: !?5,"* Bill type is 11* where * is any number"
  • Line Location: EP+2
Function Call: WRITE
  • Prompt: !?5,"* The bill contains ICD Procedure codes"
  • Line Location: EP+3
Function Call: WRITE
  • Prompt: !?5,"* Bill status is NOT cancelled"
  • Line Location: EP+4
Function Call: WRITE
  • Prompt: !?5,"* 837I export mode only"
  • Line Location: EP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EP+6
Function Call: WRITE
  • Prompt: !,"You will be asked the following to complete the selection criteria:"
  • Line Location: EP+7
Function Call: WRITE
  • Prompt: !?5,"* Insurer (multiple entries not allowed)"
  • Line Location: EP+8
Function Call: WRITE
  • Prompt: !?5,"* Date range (either by approval, batch, or visit date)"
  • Line Location: EP+9
Function Call: WRITE
  • Prompt: !?5,"* Resubmission note that will be put on ALL claims"
  • Line Location: EP+10
Function Call: WRITE
  • Prompt: !
  • Line Location: EP+11
Function Call: WRITE
  • Prompt: !!,"TO DATE CAN'T BE AFTER FROM DATE",!
  • Line Location: TODT+8
Function Call: WRITE
  • Prompt: !!,"Bills meeting the following criteria will be recreated in a new batch:"
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !?5,"* Bill type is 11* where * is any number"
  • Line Location: MSG+2
Function Call: WRITE
  • Prompt: !?5,"* The bill contains ICD Procedure codes"
  • Line Location: MSG+3
Function Call: WRITE
  • Prompt: !?5,"* Bill status is NOT cancelled"
  • Line Location: MSG+4
Function Call: WRITE
  • Prompt: !?5,"* 837I export mode only"
  • Line Location: MSG+5
Function Call: WRITE
  • Prompt: !
  • Line Location: MSG+6
Function Call: WRITE
  • Prompt: !?5,"* Active insurer is ",$P($G(^AUTNINS(ABMINS,0)),U)
  • Line Location: MSG+7
Function Call: WRITE
  • Prompt: !?5,"* ",$S(ABMFILE="B":"Batches created",ABMFILE="V":"Visit dates",1:"Bills approved")
  • Line Location: MSG+8
Function Call: WRITE
  • Prompt: " between "_$$SDT^ABMDUTL(ABMFROM)_" and "_$$SDT^ABMDUTL(ABMTO)
  • Line Location: MSG+9
Function Call: WRITE
  • Prompt: !?5,"* With the resubmission note: ",ABMRESUB
  • Line Location: MSG+10
Function Call: WRITE
  • Prompt: !
  • Line Location: MSG+11
Function Call: WRITE
  • Prompt: !,"ENTRY CREATED IN 3P TX STATUS FILE."
  • Line Location: NEWB+17
Function Call: WRITE
  • Prompt: !,"Submission # ",ABMSUBN
  • Line Location: CLAIM+8
Function Call: WRITE
  • Prompt: !,"Writing bills to file.",!
  • Line Location: CLAIM+9
Function Call: WRITE
  • Prompt: "."
  • Line Location: CLAIM+23
Function Call: WRITE
  • Prompt: !!,"Finished.",!!
  • Line Location: XIT+2
Routine Call
  • DIE
  • Line Location:
    • OUTPUT+23
    • OUTPUT+27
    • OUTPUT+36
    • NEWB+14
    • NEWB+15
Routine Call
  • DIC
  • Line Location:
    • INSURER+3
Routine Call
  • DIR
  • Line Location:
    • EP+12
    • WHATDT+4
    • FROMDT+4
    • TODT+4
    • RESUBN+4
    • MSG+12
    • MSG+18

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ABMDTXST - [#9002274.6] Classic Fileman Calls
^AUTNINS - [#9999999.18] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( ALOOP+4, ALOOP+6, VLOOP+4, VLOOP+6, BILLCK+1, BILLCK+2, BILLCK+3, BILLCK+4, BILLCK+5, OUTPUT+19
, OUTPUT+20, CLAIM+5
^ABMDTXST - [#9002274.6] BLOOP+4, BLOOP+6, BLOOP+7, BLOOP+9, OUTPUT+7*, SBR+6, SBR+7
^AUTNINS - [#9999999.18] MSG+7, OUTPUT+2, CLAIM+3

Label References

Name Line Occurrences
ALOOP MSG+14
BILLCK ALOOP+7, BLOOP+10, VLOOP+7
BLOOP MSG+15
FROMDT TODT+6, TODT+8, RESUBN+5
INSURER WHATDT+5
NEWB OUTPUT+4
OUTPUT MSG+17
SBR CLAIM+14
VLOOP MSG+16
XIT MSG+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % NEWB+3
ABMAPOK OUTPUT+8*, OUTPUT+29!
ABMAPRV OUTPUT+19*, OUTPUT+20*, OUTPUT+21, OUTPUT+22, OUTPUT+24!
>> ABMASBR CLAIM+13, SBR+1, SBR+2, SBR+6, SBR+7, SBR+11
ABMB ALOOP+1!, BLOOP+1!, VLOOP+1!, XIT+3!
ABMB( BILLCK+7*
ABMB(21 OUTPUT+10
>> ABMB0 CLAIM+12
ABMBDFN ALOOP+5*, ALOOP+6*, BLOOP+8*, BLOOP+9*, VLOOP+5*, VLOOP+6*, BILLCK+1, BILLCK+2, BILLCK+3, BILLCK+4
, BILLCK+5, BILLCK+7, CLAIM+4, XIT+3!
>> ABMBILL CLAIM+17, SBR+9
>> ABMCHILD SBR+3*, SBR+8*
>> ABMDA OUTPUT+9*, OUTPUT+10*, OUTPUT+11, OUTPUT+19, OUTPUT+20, OUTPUT+25
ABMDT ALOOP+2*, ALOOP+4*, ALOOP+6, BLOOP+2*, BLOOP+4*, BLOOP+6, VLOOP+2*, VLOOP+4*, VLOOP+6, XIT+3!
>> ABMEXP OUTPUT+3*
ABMEXPM BILLCK+5*, BILLCK+6, BILLCK+7, XIT+3!
ABMFILE WHATDT+6*, MSG+8, MSG+14, MSG+15, MSG+16, XIT+4!
ABMFROM FROMDT+7*, TODT+8, MSG+9, ALOOP+2, BLOOP+2, VLOOP+2, XIT+3!
ABMINS INSURER+5*, MSG+7, BILLCK+3, OUTPUT+1, CLAIM+2, CLAIM+3, XIT+4!
ABMINS("IEN" OUTPUT+1*, OUTPUT+2, NEWB+13
>> ABMITYP OUTPUT+2*, NEWB+13
>> ABMNPDFN CLAIM+12*, CLAIM+15
>> ABMOPDFN CLAIM+15, SBR+12*
>> ABMOSBR CLAIM+7, CLAIM+13, SBR+11*
ABMP CLAIM+1!
ABMP("BDFN" CLAIM+4*, CLAIM+5, CLAIM+6
ABMP("INS" CLAIM+2*
ABMP("ITYPE" CLAIM+3*
ABMP("PDFN" SBR+12
ABMP("PNUM" CLAIM+17*, SBR+9*
ABMP("XMIT" OUTPUT+34, NEWB+10*
>> ABMPXMIT SBR+6, SBR+7
ABMRESUB RESUBN+6*, MSG+10, XIT+4!
ABMSBR OUTPUT+25*, OUTPUT+26, OUTPUT+28!
>> ABMSFILE SBR+1*
>> ABMSIEN SBR+2*
>> ABMSUBN CLAIM+8
ABMTIEN BLOOP+5*, BLOOP+6*, BLOOP+7, BLOOP+9, XIT+3!
ABMTO TODT+7*, TODT+8, MSG+9, ALOOP+3*, ALOOP+4, BLOOP+3*, BLOOP+4, VLOOP+3*, VLOOP+4, XIT+3!
>> DA OUTPUT+17*, OUTPUT+34*, NEWB+12*, NEWB+16
>> DA(1 OUTPUT+7, NEWB+16*
DD OUTPUT+15!, NEWB+7!
>> DIC INSURER+1*, OUTPUT+12*, NEWB+4*, NEWB+11
>> DIC(0 INSURER+2*, OUTPUT+13*, NEWB+5*
>> DIE OUTPUT+18*, OUTPUT+33*, NEWB+11*
>> DINUM OUTPUT+14*
DIR EP+12!, WHATDT+1!, FROMDT+1!, TODT+1!, RESUBN+1!, MSG+12!, MSG+18!
DIR("A" EP+12*, WHATDT+2*, FROMDT+2*, TODT+2*, RESUBN+2*, MSG+12*, MSG+18*
DIR(0 EP+12*, WHATDT+3*, FROMDT+3*, TODT+3*, RESUBN+3*, MSG+12*, MSG+18*
>> DIROUT WHATDT+5, FROMDT+6, TODT+6, RESUBN+5
>> DIRUT WHATDT+5, FROMDT+6, TODT+6, RESUBN+5
DLAYGO NEWB+6*, NEWB+8!
DO OUTPUT+15!, NEWB+7!
>> DR OUTPUT+22*, OUTPUT+26*, OUTPUT+35*, NEWB+13*, NEWB+15*
>> DTOUT WHATDT+5, FROMDT+6, TODT+6, RESUBN+5
>> DUOUT WHATDT+5, FROMDT+6, TODT+6, RESUBN+5
DUZ NEWB+13
DUZ(2 ALOOP+4, ALOOP+6, BLOOP+4, BLOOP+6, BLOOP+7, BLOOP+9, VLOOP+4, VLOOP+6, BILLCK+1, BILLCK+2
, BILLCK+3, BILLCK+4, BILLCK+5, OUTPUT+7, OUTPUT+19, OUTPUT+20, CLAIM+5, SBR+6, SBR+7
I SBR+4~, SBR+5*, SBR+6*, SBR+7
>> POP OUTPUT+32
U MSG+7, BLOOP+7, BILLCK+1, BILLCK+2, BILLCK+3, BILLCK+5, OUTPUT+2, OUTPUT+20, CLAIM+3, CLAIM+12
>> X OUTPUT+11*, OUTPUT+14, NEWB+3*
>> Y INSURER+4, INSURER+5, WHATDT+6, FROMDT+5, FROMDT+7, TODT+5, TODT+7, RESUBN+6, MSG+13, OUTPUT+5
, OUTPUT+16, OUTPUT+17, NEWB+9, NEWB+10, NEWB+12
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All