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

Package: Fee Basis

Routine: FBPAY21


Information

FBPAY21 ;AISC/CMR-OUTPATIENT PAYMENT HISTORY SORT/PRINT ; 9/13/12 10:30am

Source Information

Source file <FBPAY21.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Fee Basis 4 PMNT^FBAACCB2  ($$SSN,$$SSNL4)^FBAAUTL  $$EXTRL^FBMRASVR  TRAV^FBPAY671  
VA FileMan 1 ^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: 5

Package Total Caller Graph
Fee Basis 5 FBCHDI  FBPAY  FBPAY3  FBPAY67  FBPAY671  

Entry Points

Name Comments DBIA/ICR reference
PRINT ;write output
HDR ;main header
SH ;subheader - vendor if fbsort; patient if 'fbsort, prints when name changed
SH1
CR ;read for display
PAGE ;new page
EFBCK(FBCKIN) ;extract check information from ^TMP
  • ICR #5116
    • Status: Retired
    • Usage: Controlled Subscription
    EN ;entry from fbpay67 to set '*' if ancillary payment is
  • ICR #5116
    • Status: Retired
    • Usage: Controlled Subscription

    External References

    Name Field # of Occurrence
    ^DIR CR+1
    PMNT^FBAACCB2 PRINT+33
    $$SSN^FBAAUTL SH+3
    $$SSNL4^FBAAUTL SH+3
    $$EXTRL^FBMRASVR PRINT+31
    TRAV^FBPAY671 PRINT+2, SH1

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !," (continued)"
    • Line Location: PRINT+22
    Function Call: WRITE
    • Prompt: !?5,"FPPS Claim ID: ",$P(FBADJ,U,7)," FPPS Line Item: ",$P(FBADJ,U,8)
    • Line Location: PRINT+30
    Function Call: WRITE
    • Prompt: ?63,"Obl.#: ",$P(FBDATA,U,11)
    • Line Location: PRINT+32
    Function Call: WRITE
    • Prompt: @IOF
    • Line Location: HDR+1
    Function Call: WRITE
    • Prompt: !?25,$S($G(FBSORT):"VETERAN",1:"VENDOR")," PAYMENT HISTORY"
    • Line Location: HDR+3
    Function Call: WRITE
    • Prompt: " ",$S(FB1725R="M":"for 38 U.S.C. 1725 Claims",1:"excluding 38 U.S.C. 1725 Claims")
    • Line Location: HDR+4
    Function Call: WRITE
    • Prompt: !?24,$E(FBDASH,1,24),?71,"Page: ",FBPG,!
    • Line Location: HDR+5
    Function Call: WRITE
    • Prompt: !?(IOM-(13+$L(FBPROG(+FBPI)))/2),"FEE PROGRAM: ",FBPROG(+FBPI)
    • Line Location: HDR+8
    Function Call: WRITE
    • Prompt: !,?3,"('*' Reimb. to Patient '+' Cancel. Activity '#' Voided Payment)"
    • Line Location: HDR+9
    Function Call: WRITE
    • Prompt: !,?3,"(paid symbol: 'R' RBRVS 'F' 75th percentile 'C' contract 'M' Mill Bill"
    • Line Location: HDR+10
    Function Call: WRITE
    • Prompt: !,?3," 'U' U&C)"
    • Line Location: HDR+11
    Function Call: WRITE
    • Prompt: !,?1,"Svc Date",?11,"CPT-MOD ",?21,"Rev Code",?31,"Units Paid",?43,"Batch No.",?54,"Inv No.",?64,"Voucher Date"
    • Line Location: HDR+12
    Function Call: WRITE
    • Prompt: !,"Amt Claimed",?13,"Amt Paid",?23,"Adj Code",?36,"Adj Amounts",?48,"Remit Remark",?61,"Patient Account No",!,FBDASH
    • Line Location: HDR+13
    Function Call: WRITE
    • Prompt: !!,"Vendor: ",$P(FBVI,";"),?41,"Vendor ID: ",$P(FBVI,";",2)
    • Line Location: SH+2
    Function Call: WRITE
    • Prompt: !!,"Patient: ",$P(FBPT,";"),?41,"Patient ID: ",$$SSNL4^FBAAUTL($$SSN^FBAAUTL($P(FBPT,";",2)))
    • Line Location: SH+3
    Function Call: WRITE
    • Prompt: !
    • Line Location: CR+1
    Routine Call
    • DIR
    • Line Location:
      • CR+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^TMP($J PRINT+2, PRINT+3, PRINT+4, PRINT+5, PRINT+7, PRINT+8, PRINT+9, SH1

    Label References

    Name Line Occurrences
    CR PRINT+1, SH+1, PAGE+1
    EFBCK PRINT+8
    HDR PRINT+2, SH+1, PAGE+2
    PAGE PRINT+6, PRINT+22
    SH PRINT+3, PRINT+4, PAGE+2
    SH1 PRINT+4

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    A2 PRINT+31*, PRINT+33!
    DIR CR+1!
    DIR(0 CR+1*
    >> DTOUT CR+1
    >> DUOUT CR+1
    >> FB1725R HDR+4
    >> FBADJ PRINT+9*, PRINT+14, PRINT+15, PRINT+26, PRINT+27, PRINT+28, PRINT+29, PRINT+30
    >> FBCAN PRINT+10, EFBCK+1*, EFBCK+2*
    >> FBCANDT EFBCK+1*, EFBCK+2*
    >> FBCANR EFBCK+1*, EFBCK+2*
    >> FBCK EFBCK+1*, EFBCK+2*
    >> FBCKDT EFBCK+1*, EFBCK+2*
    FBCKIN PRINT+8*, EFBCK~, EFBCK+1, EFBCK+2, EFBCK+3!
    >> FBCKINT EFBCK+1*, EFBCK+2*
    >> FBCRT PRINT+1, HDR+1, SH+1, PAGE+1
    >> FBDASH HDR+5, HDR+13
    >> FBDATA PRINT+7*, PRINT+11, PRINT+12, PRINT+13, PRINT+16, PRINT+17, PRINT+18, PRINT+19, PRINT+21, PRINT+24
    , PRINT+25, PRINT+26, PRINT+31, PRINT+32
    >> FBDIS EFBCK+1*, EFBCK+2*
    >> FBDT PRINT+4*, PRINT+5, PRINT+7, PRINT+8, PRINT+9
    FBI PRINT+20~, PRINT+21*
    FBMOD PRINT+20~, PRINT+21*, PRINT+23
    >> FBOUT PRINT+1*, PRINT+3, PRINT+4, PRINT+5, PRINT+6, PRINT+19, PRINT+21, PRINT+22, SH+1, CR+1*
    , PAGE+1
    >> FBPAT PRINT+2*, SH1*
    >> FBPG PRINT+1, HDR+1, HDR+2*, HDR+5
    >> FBPI PRINT+3, PRINT+4, PRINT+5, PRINT+7, PRINT+8, PRINT+9, HDR+8
    >> FBPID HDR+6
    >> FBPNAME PRINT+2, HDR+6
    >> FBPROG( HDR+8
    >> FBPT PRINT+3*, PRINT+4*, PRINT+5, PRINT+7, PRINT+8, PRINT+9, SH+3, SH1
    >> FBR EN+4*
    >> FBSORT PRINT+2, PRINT+3, PRINT+4, HDR+3, HDR+6, SH+2, SH+3
    >> FBTRCK PRINT+2*, SH1*
    >> FBVI PRINT+3*, PRINT+4, PRINT+5, PRINT+7, PRINT+8, PRINT+9, SH+2
    >> FBVID HDR+6
    >> FBVNAME HDR+6
    IOF HDR+1
    IOM HDR+8
    IOSL PRINT+6, PRINT+22, SH+1
    >> L PRINT+5*, PRINT+7, PRINT+8, PRINT+9
    >> M PRINT+5*, PRINT+7, PRINT+8, PRINT+9
    U PRINT+11, PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+19, PRINT+21
    , PRINT+24, PRINT+25, PRINT+26, PRINT+27, PRINT+28, PRINT+29, PRINT+30, PRINT+31, PRINT+32, EFBCK+2*
    , EN+4
    >> Y EN+4
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All