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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: FBAAV01

Package: Fee Basis

Routine: FBAAV01


Information

FBAAV01 ;AISC/GRR - ELECTRONICALLY TRANSMIT FEE DATA CONTINUED ;6/15/2009

Source Information

Source file <FBAAV01.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Fee Basis 4 $$CKVEN^FBAADV  ($$IPACID,$$IPACREQD)^FBAAMP  ($$AUSAMT,$$AUSDT)^FBAAV3  $$VNAME^FBNHEXP  
MailMan 3 XMZ^XMA2  INST^XMA21  ENT1^XMD  
Kernel 1 ($$LJ,$$RJ)^XLFSTR  
Registration 1 ^VATRAN  
VA FileMan 1 FILE^DIE  

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

Package Total Caller Graph
Fee Basis 11 FBAASCB  FBAAV0  FBAAV1  FBAAV2  FBAAV3  FBAAV4  FBAAV5  FBAAV6  
FBAAV8  FBAAVR5  FBPRICE1  

Entry Points

Name Comments DBIA/ICR reference
NEWMSG ;get new message number, reset line counter
  • ICR #5093
    • Status: Active
    • Usage: Controlled Subscription
    XMIT ;send message, increment message counter
  • ICR #5093
    • Status: Active
    • Usage: Controlled Subscription
    ROUT ;set up recipients for message
    INCRM ;increment message counter
    INCRL ;increment line counter
    STORE ;set message string
  • ICR #5093
    • Status: Active
    • Usage: Controlled Subscription
    ADDRESS ;set up recipient array, FBXMFEE( for FEE router, FBXMNVP( for NVP router
  • ICR #5093
    • Status: Active
    • Usage: Controlled Subscription
    ADDQ
    CKB3V
    CKB5V
    CKB9V
    CHKV
    STRING ; called from FBAAV0 to build 'B3' payment record; also called by DSIFPAY5 (FBCS) with DBIA# 5093
  • ICR #5093
    • Status: Active
    • Usage: Controlled Subscription
    PADZ(X,Y) ;call to pad 'X' with leading zeros' to a field length of 'Y'
  • ICR #5093
    • Status: Active
    • Usage: Controlled Subscription
    IPAC(K,L,M,N,FBIA,FBDODINV) ; set IPAC variables if being called from FBCS
    ; K - 162.03 subscript#1 - DFN
    ; L - 162.03 subscript#2 - vendor ien
    ; M - 162.03 subscript#3 - treatment date subfile ien
    ; N - 162.03 subscript#4 - service provided subfile ien
    ; Output:
    ; FBIA - formatted IPAC agreement ID# (pass by reference) - will be 10 characters in length
    ; FBDODINV - formatted DoD invoice# (pass by reference) - will be 22 characters in length
    IPACX ;

    External References

    Name Field # of Occurrence
    FILE^DIE IPAC+24, IPAC+35
    $$CKVEN^FBAADV CHKV
    $$IPACID^FBAAMP IPAC+20
    $$IPACREQD^FBAAMP IPAC+11
    $$AUSAMT^FBAAV3 STRING+18, STRING+19, STRING+51
    $$AUSDT^FBAAV3 STRING+10
    $$VNAME^FBNHEXP CHKV
    ^VATRAN ADDRESS+1
    $$LJ^XLFSTR IPACX+1, IPACX+2
    $$RJ^XLFSTR STRING+15, STRING+16, STRING+32, STRING+36, STRING+37, STRING+38, STRING+41, STRING+42, STRING+43, STRING+47
    , STRING+48, STRING+49, STRING+50, STRING+54
    XMZ^XMA2 NEWMSG+6
    INST^XMA21 ROUT+1, ROUT+2
    ENT1^XMD XMIT+5

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,*7,"VENDOR: ",$$VNAME^FBNHEXP(FB2)," Not approved in Austin yet.",!,"Batch # ",FBAABN," CANNOT BE TRANSMITTED!!!"
    • Line Location: CHKV+0
    Routine Call
    • DIE
    • Line Location:
      • IPAC+24
      • IPAC+35

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^FBAA(161.95 - [#161.95] IPAC+16
    ^FBAA(162.1 - [#162.1] CKB5V
    ^FBAAC - [#162] IPAC+13, IPAC+14
    ^FBAAC("AC" CKB3V
    ^FBAAI - [#162.5] CKB9V
    ^FBAAI("AC" CKB9V
    ^VA(200 - [#200] XMIT+5
    ^XMB(3.9 - [#3.9] XMIT+4*, STORE+1*

    Label References

    Name Line Occurrences
    $$PADZ STRING+2, STRING+57
    ADDQ ADDRESS+1
    CHKV CKB3V, CKB5V, CKB9V
    INCRL STORE+1
    INCRM XMIT+7
    IPAC STRING+24
    IPACX IPAC+11
    NEWMSG NEWMSG+7
    ROUT XMIT+3
    STORE STRING+11, STRING+27, STRING+60

    Naked Globals

    Name Field # of Occurrence
    ^(0 CKB5V, CKB9V

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DT XMIT+4
    DUZ NEWMSG+4, XMIT+5, ROUT+3
    >> FB1 CKB3V*, CKB5V*, CKB9V*
    >> FB2 CKB3V*, CKB5V*, CKB9V*, CHKV
    >> FBAABN CHKV
    >> FBAAON STRING+5
    >> FBAASN STRING+5
    >> FBADJA STRING+51*, STRING+52
    >> FBADJA1 STRING+18*, STRING+20
    >> FBADJA2 STRING+19*, STRING+20
    >> FBADJG STRING+36*, STRING+39, STRING+41*, STRING+44, STRING+47*, STRING+52
    >> FBADJR STRING+48*, STRING+52
    >> FBADJR1 STRING+15*, STRING+17
    >> FBADJR2 STRING+16*, STRING+17
    >> FBADMIT STRING+10
    >> FBAMTC STRING+34
    >> FBAP STRING+5
    >> FBAUTHF STRING+14
    >> FBAUTHNUM STRING+31
    >> FBCNTRN STRING+21
    >> FBCPT STRING+8
    >> FBCRARC( STRING+47, STRING+48, STRING+49, STRING+50, STRING+51
    >> FBCRARC(1 STRING+15, STRING+18, STRING+36, STRING+37, STRING+38
    >> FBCRARC(2 STRING+16, STRING+19, STRING+41, STRING+42, STRING+43
    >> FBCSID STRING+21
    >> FBCTY STRING+7
    >> FBDIN STRING+6, STRING+10
    >> FBDOB STRING+10
    FBDODINV STRING+24, STRING+26, STRING+63!, IPAC~, IPAC+10*, IPAC+17*, IPAC+31*, IPAC+34, IPAC+39*, IPACX+2*
    >> FBEDIF STRING+21
    >> FBERR CKB3V, CKB5V, CKB9V, CHKV*
    >> FBFEE NEWMSG+3*, NEWMSG+4, INCRM+2*
    >> FBFLAG NEWMSG+4, ROUT+1, ROUT+2, INCRM+1
    >> FBFPPSID STRING+30
    >> FBHCFA STRING+8
    >> FBI ROUT+1*, ROUT+2*, ADDRESS+1*, STRING+46*, STRING+47, STRING+48, STRING+49, STRING+50, STRING+51
    FBIA STRING+24, STRING+26, STRING+63!, IPAC~, IPAC+10*, IPAC+15*, IPAC+16*, IPAC+20*, IPAC+28*, IPACX+1*
    FBIAFDA IPAC+21~, IPAC+32~
    FBIAFDA( IPAC+23*, IPAC+34*
    FBIENS IPAC+21~, IPAC+22*, IPAC+23, IPAC+32~, IPAC+33*, IPAC+34
    >> FBINVN STRING+6
    FBIPIEN IPAC+9~, IPAC+20, IPAC+23
    >> FBJ NEWMSG+3*, NEWMSG+8, XMIT+3*, XMIT+8
    >> FBK NEWMSG+3*, NEWMSG+8, XMIT+3*, XMIT+8
    >> FBLN NEWMSG+8*, XMIT+4, XMIT+6*, INCRL+1*, STORE+1
    >> FBLNITM STRING+32*, STRING+33
    >> FBMOD1 STRING+14
    >> FBMOD2 STRING+14
    >> FBMOD3 STRING+14
    >> FBMOD4 STRING+14
    >> FBNPI STRING+21
    >> FBNVP NEWMSG+3*, NEWMSG+4, INCRM+1*
    >> FBOKTX NEWMSG+5*, NEWMSG+8*, XMIT+6*
    >> FBPATT STRING+6
    >> FBPAYT STRING+5
    >> FBPD STRING+8
    FBPICN STRING+2*, STRING+9, STRING+62!
    >> FBPNAMX STRING+5
    >> FBPOS STRING+8
    >> FBPOV STRING+6
    >> FBPSA STRING+8
    >> FBPYMTH STRING+54
    >> FBRRC1 STRING+37*, STRING+39, STRING+42*, STRING+44, STRING+49*, STRING+52
    >> FBRRC2 STRING+38*, STRING+39, STRING+43*, STRING+44, STRING+50*, STRING+52
    >> FBSSN STRING+5
    >> FBST STRING+7
    >> FBSTR STORE+1, STRING+5*, STRING+6*, STRING+7*, STRING+8*, STRING+9*, STRING+10*, STRING+14*, STRING+17*, STRING+20*
    , STRING+21*, STRING+26*, STRING+30*, STRING+31*, STRING+33*, STRING+34*, STRING+39*, STRING+44*, STRING+52*, STRING+54*
    , STRING+55*, STRING+56*, STRING+57*, STRING+59*
    >> FBSUSP STRING+5
    >> FBTD STRING+6
    >> FBTT STRING+6
    >> FBUNITS STRING+14
    >> FBVAR ADDRESS+1*
    >> FBVID STRING+5
    >> FBVTOS STRING+8
    >> FBXMFEE( ROUT+2
    >> FBXMNVP( ROUT+1
    >> FBXMZ NEWMSG+3*, NEWMSG+8*, XMIT+4, STORE+1
    FBY STRING+9, STRING+10, STRING+62!
    FBY2 IPAC+9~, IPAC+13*, IPAC+31
    FBY3 IPAC+9~, IPAC+14*, IPAC+15, IPAC+17
    >> FBZIP STRING+7
    >> J NEWMSG+3, NEWMSG+8*, XMIT+3, XMIT+8*, CKB3V, CKB5V, CKB9V
    K NEWMSG+3, NEWMSG+8*, XMIT+3, XMIT+8*, STRING+24, IPAC~, IPAC+13, IPAC+14, IPAC+22, IPAC+33
    L STRING+24, IPAC~, IPAC+11, IPAC+13, IPAC+14, IPAC+20, IPAC+22, IPAC+33
    M STRING+24, IPAC~, IPAC+13, IPAC+14, IPAC+22, IPAC+33
    N STRING+24, IPAC~, IPAC+13, IPAC+14, IPAC+22, IPAC+33
    >> PAD STRING+7, STRING+9
    U XMIT+5, STRING+9, STRING+15, STRING+16, STRING+18, STRING+19, STRING+36, STRING+37, STRING+38, STRING+41
    , STRING+42, STRING+43, STRING+47, STRING+48, STRING+49, STRING+50, STRING+51, IPAC+15, IPAC+16, IPAC+17
    , IPAC+31
    >> VAT( ADDRESS+1
    >> VATERR ADDRESS+1
    >> VATNAME ADDRESS+1*
    X ROUT+1*, ROUT+2*, PADZ~, PADZ+2, PADZ+4
    XMDF ROUT+1*!, ROUT+2*!
    >> XMDUN XMIT+5*
    >> XMDUZ NEWMSG+4*, ROUT+3*
    XMN ROUT+1*!, ROUT+2*!
    >> XMSUB NEWMSG+4*
    XMY XMIT+3!
    XMY( ROUT+3*
    XMZ NEWMSG+7, NEWMSG+8!, XMIT+4*
    Y PADZ~, PADZ+2, PADZ+3, PADZ+4
    Z PADZ+3~*, PADZ+4
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All