Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: FBAAPH

Package: Fee Basis

Routine: FBAAPH


Information

FBAAPH ;AISC/DMK,GRR-LIST PAYMENT HISTORY ;8/10/2003

Source Information

Source file <FBAAPH.m>

Entry Points

Name Comments DBIA/ICR reference
RD
LIST
SET ;
WRT
WRTCK
HED
Q
SETTR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: !!,"No payments for this patient!",!
  • Line Location: RD+1
Function Call: WRITE
  • Prompt: ?44,"Check #: ",$P(FB(D,FBTRX),"^",2),?63,"Paid: ",$$DATX^FBAAUTL($P(FB(D,FBTRX),"^",3))
  • Line Location: LIST+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: LIST+9
Function Call: WRITE
  • Prompt: !!,"Vendor: ",$E(V,1,33)," Vendor ID: ",FBVID,?66," Obl.#: "_FBOB
  • Line Location: WRT+1
Function Call: WRITE
  • Prompt: !,$S(FBTYPE="R":"*",1:" "),$S(FBVP="VP":"#",1:""),$S($G(FBCAN)]"":"+",1:""),?2,$$DATX^FBAAUTL(D),?12,FBAACPTC,FBCP_$S($G(FBMODLE)]"":"-"_$P(FBMODLE,","),1:""),?22,FBAARCE,?31,FBUNITS,?38,FBCSID,?60,$J(FBIN,7),?71,FBBN
  • Line Location: WRT+2
Function Call: WRITE
  • Prompt: !,"(continued)"
  • Line Location: WRT+6
Function Call: WRITE
  • Prompt: !,?17,"-",FBMOD
  • Line Location: WRT+7
Function Call: WRITE
  • Prompt: !?5,$J(A1,6),?18,$J(A2,6),FBAPS
  • Line Location: WRT+8
Function Call: WRITE
  • Prompt: ?32,$S(FBADJLR]"":FBADJLR,1:T)
  • Line Location: WRT+10
Function Call: WRITE
  • Prompt: ?42,$S(FBADJLA]"":FBADJLA,1:TAMT)
  • Line Location: WRT+12
Function Call: WRITE
  • Prompt: ?58,FBRRMKL,?71,D2
  • Line Location: WRT+13
Function Call: WRITE
  • Prompt: !,?5,"FPPS Claim ID: ",FBFPPSC,?32,"FPPS Line Item: ",FBFPPSL
  • Line Location: WRT+14
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WRTCK+1
Function Call: WRITE
  • Prompt: !?24,"MEDICAL PAYMENT HISTORY",!?23,$E(Q,1,25)
  • Line Location: HED+0
Function Call: WRITE
  • Prompt: !,"Patient: ",FBNAME,?40,"SSN: ",$$SSN^FBAAUTL(DFN),!,?10,"('*' Reimb. to Patient '+' Cancel. Activity '#' Voided Payment)"
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: !,?4,"(paid symbol: 'R' RBRVS 'F' 75th percentile 'C' contract 'M' Mill Bill"
  • Line Location: HED+2
Function Call: WRITE
  • Prompt: !,?4," 'U' U&C)"
  • Line Location: HED+3
Function Call: WRITE
  • Prompt: !,?2,"Svc Date",?12,"CPT-MOD",?22,"Rev.Code",?31,"Units",?38,"Patient Account No.",?60,"Invoice #",?71,"Batch #"
  • Line Location: HED+4
Function Call: WRITE
  • Prompt: !?5,"Amt Claimed",?18,"Amt Paid",?32,"Adj Code",?42,"Adj Amount",?58,"Remit Remark",?71,"VoucherDt"
  • Line Location: HED+5
Function Call: WRITE
  • Prompt: !,Q,!
  • Line Location: HED+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAC - [#162] Classic Fileman Calls
162.03 GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call