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: FBAACO

Package: Fee Basis

Routine: FBAACO


Information

FBAACO ;AISC/GRR - ENTER MEDICAL PAYMENT ;9/25/2014

Source Information

Source file <FBAACO.m>

Call Graph

Call Graph

Call Graph Total: 19

Package Total Call Graph
Fee Basis 16 ^FBAACO0  (DISPINV,GETINDT,GETINV,GETVEN,GETVEN1,SVCPR)^FBAACO1  (,FILE)^FBAACO2  (DEL,DOEDIT,OUT,SETO,WARN)^FBAACO3  (CHK,CHK2)^FBAACO4  (FILEV,GETSVDT)^FBAACO5  ($$ANES,ASKTIME,ASKZIP)^FBAAFS  CPTM^FBAALU  
($$IPAC,$$IPACINV,1)^FBAAMP  SITEP^FBAAUTL  (GETAUTH,GETAUTHK,GETVET)^FBAAUTL1  $$CPT^FBAAUTL4  $$ENTROUTP^FBUTL136  ($$ASKPAN,$$FPPSC)^FBUTL5  $$UCFA^FBUTL7  $$UOKPAY^FBUTL9  
VA FileMan 3 ^DIC  FILE^DICN  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Fee Basis 9 FBAA ENTER PAYMENT  FBAACO1  FBAACO2  FBAAETA  FBAAMP  FBAARP  FBCHCO  FBPST35A  
FBUCPAY  
Integrated Billing 1 IBFBNP1  

Entry Points

Name Comments DBIA/ICR reference
EN583 ;driver for opt payments (entry point for uc)
1
SVDT
CPT
CHKE ;determines what action to take on duplicate services entered
SVPR
Q ;exit point for outpatient payment routines
  • ICR #5082
    • Status: Active
    • Usage: Controlled Subscription
    AUTHQ
    SITE ;set up site variables
  • ICR #5082
    • Status: Active
    • Usage: Controlled Subscription
    BT ;select batch
    PAT ;set up patient in patient file
    MM ;check for money management of entire invoice
    ; fb*3.5*116
    OUT
    MMPPT ;money management/prompt pay type for multiple payment entry
    ; input
    ; FBAAPTC = payment type code, "R" when patient reimbursement
    ; FBV = vendor being paid (ien)
    ; when called from FBAAMP additional variables will be available
    ; FBCNTRA = contract ien from authorization
    ; FBVEN = vendor from authorization
    ; FB583 = defined when unauthorized claim
    ; output
    ; FBAAMM = prompt payment, =1 to ask
    ; FBAAMM1 = prompt payment type for line
    ; FBAAOUT = (optional), = 1 to quit
    ; FBCNTRP = contract for line item (ien)

    External References

    Name Field # of Occurrence
    ^DIC BT+1
    FILE^DICN PAT+2
    ^DIR CHKE+2, CHKE+4, MMPPT+33, MMPPT+43
    ^FBAACO0 1+7
    DISPINV^FBAACO1 SVDT+1
    GETINDT^FBAACO1 1+13
    GETINV^FBAACO1 1+12
    GETVEN^FBAACO1 1+8
    GETVEN1^FBAACO1 1+8
    SVCPR^FBAACO1 SVPR+2
    ^FBAACO2 CHKE+5
    FILE^FBAACO2 SVPR+3
    DEL^FBAACO3 SVDT+3, CPT+1, CHKE+3
    DOEDIT^FBAACO3 CHKE+4
    OUT^FBAACO3 SVPR+4
    SETO^FBAACO3 SVDT+1
    WARN^FBAACO3 SVPR+4
    CHK^FBAACO4 1+11
    CHK2^FBAACO4 CPT+2
    FILEV^FBAACO5 1+9
    GETSVDT^FBAACO5 SVDT
    $$ANES^FBAAFS SVPR+1
    ASKTIME^FBAAFS SVPR+1
    ASKZIP^FBAAFS SVDT+2
    CPTM^FBAALU CPT+1
    $$IPAC^FBAAMP 1+17
    $$IPACINV^FBAAMP 1+18
    1^FBAAMP 1+29
    SITEP^FBAAUTL SITE+1
    GETAUTH^FBAAUTL1 1+1
    GETAUTHK^FBAAUTL1 AUTHQ+1
    GETVET^FBAAUTL1 1+1
    $$CPT^FBAAUTL4 SVPR+1
    $$ENTROUTP^FBUTL136 1+26
    $$ASKPAN^FBUTL5 1+21
    $$FPPSC^FBUTL5 1+24
    $$UCFA^FBUTL7 MMPPT+18
    $$UOKPAY^FBUTL9 1+2

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!
    • Line Location: 1+0
    Function Call: WRITE
    • Prompt: !!,"You cannot process a payment associated with authorization ",DFN,"-",FTP
    • Line Location: 1+3
    Function Call: WRITE
    • Prompt: !,"due to separation of duties."
    • Line Location: 1+4
    Function Call: WRITE
    • Prompt: !!
    • Line Location: 1+9
    Function Call: WRITE
    • Prompt: !,"FPPS CLAIM ID: ",$S(FBFPPSC="":"N/A",1:FBFPPSC)
    • Line Location: 1+23
    Function Call: WRITE
    • Prompt: !!
    • Line Location: SVDT+0
    Function Call: WRITE
    • Prompt: !!,"Invoice: "_FBAAIN_" Totals $ "_$J(FBINTOT,1,2)
    • Condition for execution: FBINTOT>0
    • Line Location: SVDT+0
    Function Call: WRITE
    • Prompt: !
    • Line Location: SVDT+2
    Function Call: WRITE
    • Prompt: !
    • Line Location: CPT+0
    Function Call: WRITE
    • Prompt: !!,*7,"Service selected for that date already in system."
    • Line Location: CHKE+1
    Function Call: WRITE
    • Prompt: !!,*7,"You must use the 'EDIT PAYMENT' option to edit the service previously",!,"entered for that date."
    • Line Location: CHKE+3
    Function Call: WRITE
    • Prompt: !!
    • Line Location: BT+1
    Function Call: WRITE
    • Prompt: !!,"This Batch already has the maximum number of Payments!"
    • Line Location: BT+3
    Function Call: WRITE
    • Prompt: !,"All lines items on this invoice will be considered as contracted services"
    • Line Location: MMPPT+19
    Function Call: WRITE
    • Prompt: !,"under Contract ",$P($G(^FBAA(161.43,FBCNTRA,0)),U)," from the authorization."
    • Line Location: MMPPT+20
    Function Call: WRITE
    • Prompt: !,"The answer to the following will apply to all payments entered via this option."
    • Line Location: MMPPT+25
    Routine Call
    • DIC
    • Line Location:
      • BT+1
    Routine Call
    • DIR
    • Line Location:
      • CHKE+2
      • CHKE+4
      • MMPPT+33
      • MMPPT+43

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^FBAA(161.7 - [#161.7] Classic Fileman Calls
    ^FBAAC - [#162] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^FB583 - [#162.7] 1+23
    ^FBAA(161.4 - [#161.4] SITE+5
    ^FBAA(161.43 - [#161.43] MMPPT+20
    ^FBAA(161.7 - [#161.7] BT+2, BT+4
    ^FBAAC - [#162] PAT+2

    Label References

    Name Line Occurrences
    1 1+1, 1+2, 1+8, 1+9, 1+12, 1+13, 1+17, 1+18, 1+21, 1+24
    , 1+27, SVDT, CHKE+4, SVPR+3, SVPR+5
    BT EN583+2, BT+2, BT+3
    CPT CHKE+5, SVPR+1, SVPR+2, SVPR+4
    EN583 1+1, SVPR+4
    MM 1+29
    MMPPT MM+2
    OUT 1+13, 1+17, 1+18, 1+21, 1+24, 1+27
    PAT 1+8
    Q EN583+2, 1, 1+8, 1+9, 1+12, 1+13, 1+17, 1+18, 1+21, 1+24
    , 1+27, 1+29, SVDT, CHKE+2, CHKE+4, SVPR+3
    SITE EN583+2, 1
    SVDT SVDT+3, CPT+1, CHKE+3, CHKE+4
    SVPR CPT+2, CHKE+2

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %DT Q+4!
    A Q+1!
    A1 Q+3!
    A2 Q+3!
    B1 Q+3!
    B2 Q+3!
    BO Q+1!, BT+4*
    CNT AUTHQ!
    DA 1+11*!, Q+1!, BT+2*, BT+4, PAT+2!
    DAT Q+3!
    DD PAT+2!
    DFN 1+1, 1+2, 1+3, 1+9, 1+26, SVDT, CPT+1, Q+1!, AUTHQ!, PAT+2
    DI Q+1!
    DIC Q+1!, AUTHQ!, BT+1*!, PAT+2*!
    DIC("S" BT+1*
    DIC("W" BT+1*
    DIC(0 BT+1*, PAT+2*
    DIE Q+3!
    DINUM PAT+2*!
    DIR CHKE+2!, CHKE+4!, MMPPT+33!, MMPPT+43!
    DIR("?" MMPPT+29*, MMPPT+30*, MMPPT+31*, MMPPT+32*, MMPPT+40*, MMPPT+41*
    DIR("A" CHKE+2*, CHKE+4*, MMPPT+27*, MMPPT+39*
    DIR("B" CHKE+2*, CHKE+4*, MMPPT+28*
    DIR("S" MMPPT+42*
    DIR(0 CHKE+2*, CHKE+4*, MMPPT+26*, MMPPT+38*
    DIRUT CHKE+2, CHKE+4, Q+3!, MMPPT+33
    DLAYGO Q+1!, PAT+2*!
    DO PAT+2!
    DQ Q+1!
    DR Q+1!
    >> DTOUT MMPPT+43
    >> DUOUT MMPPT+43
    E Q+1!
    FB583 1+1, 1+6, 1+8, 1+9, 1+12, 1+13, 1+17, 1+18, 1+21, 1+23
    , 1+24, 1+27, SVDT, CHKE+4, SVPR+3, Q+2!, MMPPT+15, MMPPT+18
    FB7078 1+6*, Q+3!, AUTHQ!, BT+4*
    FBAAAMT Q+4!
    FBAAAS Q+4!
    FBAABDT Q+1!, AUTHQ!
    FBAABE Q+1!, BT+2*
    FBAACK1 1+11!, Q+3!
    FBAACP SVDT!, SVPR+1, Q+1!, OUT!
    FBAACPI Q+1!
    FBAACPT Q+3!
    FBAADT SVDT!, SVDT+2, CPT+1, Q+2!, OUT!
    FBAAEDT Q+3!, AUTHQ!
    FBAAID 1!, 1+12!, 1+13, Q+1!
    FBAAIN SVDT, Q+1!, OUT
    FBAAMM 1!, Q+4!, MMPPT+14*, MMPPT+21*, MMPPT+34*
    FBAAMM1 Q+4!, MMPPT+14*, MMPPT+21*, MMPPT+34*, MMPPT+35
    FBAAMPI SVPR+4, Q+1!, SITE+5*, BT+3
    FBAAOPA Q+1!
    FBAAOUT EN583+1!, EN583+2, 1!, 1+1!, 1+5!, 1+8, 1+9, 1+11!, 1+12, 1+13
    , 1+17*, 1+18*, 1+21*, 1+24*, 1+27*, 1+29, SVDT!, SVDT+3, CPT!, CHKE+1!
    , CHKE+4, SVPR!, SVPR+1, SVPR+2, SVPR+3, Q+3!, AUTHQ!, BT+1*, MMPPT+33*, MMPPT+43*
    FBAAPD Q+3!
    FBAAPN Q+1!
    FBAAPTC 1+7, Q+1!, SITE+4*, MMPPT+15
    FBAASC Q+4!
    FBAAVID 1!, 1+12!, 1+13, 1+26, Q+4!
    FBADJ Q+5!
    FBADJD Q+5!
    FBADJL Q+5!
    FBAMFS Q+4!
    FBAMTPD SVPR+3*, Q+3!
    FBAOT Q+4!
    FBAR 1+1!, Q+3!
    FBASSOC SVDT, Q+1!, AUTHQ!
    FBAUT Q+2!, AUTHQ!
    >> FBCHCO 1+6, 1+12, 1+13, 1+17, 1+18, 1+21, 1+24, 1+27, SVDT, SITE+2
    FBCNP Q+4!
    >> FBCNTRA MMPPT+18, MMPPT+20, MMPPT+22
    FBCNTRP Q+5!, MMPPT+14*, MMPPT+22*, MMPPT+44*
    FBCONT Q+1!
    FBCOUNTY Q+3!
    FBCSID 1+21*!, Q+5!
    FBD1 Q+2!
    FBDA Q+3!
    FBDEL Q+2!
    FBDEN CHKE+5, Q+1!
    FBDL 1!, 1+1!, CHKE+4, SVPR+3, Q+1!
    FBDMRA 1+1!, Q+3!
    FBDODINV 1+16*, 1+18, Q+5!
    FBDT Q+4!
    FBDX Q+1!
    FBFDC Q+3!
    FBFPPSC 1+23*, 1+24*!, 1+26, 1+27!, Q+5!
    FBFPPSL Q+5!
    FBFSAMT AUTHQ!
    FBFSUSD AUTHQ!
    FBFY Q+1!
    FBGOT CPT+1, Q+1!
    FBHCFA Q+4!
    FBI Q+3!
    FBIA 1+17*, 1+18, Q+5!
    FBIN Q+3!
    FBINTOT 1*, SVDT, Q+2!, OUT
    FBJ CPT+2, CHKE+3, Q+3!
    FBK Q+4!
    FBLOC Q+2!
    FBLOCK Q+1!
    FBMAX Q+4!
    FBMOD AUTHQ!
    FBMODA AUTHQ!
    FBMP 1+29, Q+4!
    FBMST Q+3!
    FBPARCD Q+2!
    FBPOP EN583+1!, EN583+2, 1, Q+3!, SITE+1
    FBPOV Q+1!, AUTHQ!
    FBPROG Q+3!, AUTHQ!, SITE+1, SITE+2*, SITE+3*
    FBPSA Q+1!, AUTHQ!
    FBPT Q+1!, AUTHQ!
    FBRR Q+3!
    FBRRMK Q+5!
    FBRRMKD Q+5!
    FBRRMKL Q+5!
    FBSDI Q+1!
    FBSI Q+4!
    FBSITE Q+2!
    FBSITE(0 SITE+1
    FBSITE(1 SITE+3
    FBSP Q+2!
    FBSSN Q+2!
    FBST Q+3!
    FBT Q+2!
    FBTIME SVPR+1, AUTHQ!
    FBTOV Q+2!
    FBTP AUTHQ!
    FBTPD Q+2!
    FBTST Q+4!
    FBTT Q+2!, AUTHQ!
    FBTTYPE Q+3!
    FBTV Q+3!
    FBTYPE Q+2!, AUTHQ!
    FBUCI135 1+26*, 1+27, Q+5!
    FBUNITS Q+5!
    FBV 1+9, 1+17, 1+26, SVDT, SVDT+2, CHKE+3, Q+1!, MMPPT+18
    FBVEN Q+2!, AUTHQ!, MMPPT+18
    FBX SVDT!, Q+1!, OUT!
    FBXX Q+3!
    FBZBN Q+1!
    FBZBS Q+1!
    FBZIP SVDT+3, AUTHQ!
    FBZX Q+4!
    FEEO Q+2!
    FTP 1+1, 1+2, 1+3, Q+2!
    FY Q+2!
    G Q+2!
    H Q+2!
    HOLDY SVDT!, Q+4!
    HY Q+3!
    I Q+1!
    J Q+2!
    K Q+2!
    L Q+2!
    MAJN Q+2!
    NO Q+2!
    PI Q+2!, AUTHQ!
    PTYPE Q+3!
    Q Q+2!
    R Q+2!
    S Q+3!
    SUB Q+2!
    SUBN Q+2!
    T Q+2!
    TA Q+2!, AUTHQ!
    TP Q+2!
    U 1+23, MMPPT+20
    UL Q+2!
    V Q+3!
    VAL Q+3!
    VAPA Q+4!
    W Q+2!
    X 1+11!, Q+3!, BT+1, PAT+2*
    X1 Q+2!
    Y 1+11!, CHKE+2, CHKE+4, Q+1!, BT+2, MMPPT+34, MMPPT+44
    Y(0 BT+2*, BT+3, BT+4
    Z Q+2!
    Z0 Q+2!
    Z1 SVPR+4, Q+2!, BT+4*
    Z2 Q+2!
    ZS Q+3!
    ZZ Q+2!
    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