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

Package: Fee Basis

Routine: FBCHEP


Information

FBCHEP ;AISC/DMK - ENTER PAYMENT FOR CONTRACT HOSPITAL ;10/1/2004

Source Information

Source file <FBCHEP.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Fee Basis 14 ^FBAACO0  (GETINDT,PPT)^FBAACO1  ($$IPAC,$$IPACINV)^FBAAMP  RCHOP^FBAAOB  (GETNXI,SITEP)^FBAAUTL  (GETAUTH,GETAUTHK,GETVET)^FBAAUTL1  EN1^FBAAVD  FILEADJ^FBCHFA  
FILERR^FBCHFR  $$ENTINPAT^FBUTL136  ($$ASKPCN,$$FPPSC,$$FPPSL)^FBUTL5  PTFC^FBUTL6  FILERP^FBUTL8  $$UOKPAY^FBUTL9  
VA FileMan 3 ^DIC  ^DIE  ^DIR  
Kernel 1 $$FMDIFF^XLFDT  

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

Package Total Caller Graph
Fee Basis 3 FBCH ENTER PAYMENT  FBCH REIMBURSEMENT INVOICE  FBUCPAY  

Entry Points

Name Comments DBIA/ICR reference
RD
SETINV
EN583 ;Entry from 583 enter payment
RDV
BAT
GETNXI
RIN
DIC
OUT
Q
PTF
PRBT ;Entry point for patient reimbursement option
CHK ;Check for vendor and batch being exempt from pricer
OPEN

External References

Name Field # of Occurrence
^DIC BAT, DIC
^DIE RDV+2, DIC+6
^DIR RDV+1, OUT+2, OPEN+1
^FBAACO0 EN583+1
GETINDT^FBAACO1 RIN
PPT^FBAACO1 RIN+19
$$IPAC^FBAAMP RIN+4
$$IPACINV^FBAAMP RIN+5
RCHOP^FBAAOB OPEN+1
GETNXI^FBAAUTL GETNXI
SITEP^FBAAUTL EN583+4
GETAUTH^FBAAUTL1 RD+1
GETAUTHK^FBAAUTL1 Q+4
GETVET^FBAAUTL1 RD
EN1^FBAAVD EN583+2
FILEADJ^FBCHFA DIC+9
FILERR^FBCHFR DIC+11
$$ENTINPAT^FBUTL136 RIN+13
$$ASKPCN^FBUTL5 RIN+8
$$FPPSC^FBUTL5 RIN+11
$$FPPSL^FBUTL5 RIN+15
PTFC^FBUTL6 PTF
FILERP^FBUTL8 DIC+13
$$UOKPAY^FBUTL9 RD+7
$$FMDIFF^XLFDT RIN+17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"No 7078 on file for this authorization."
  • Line Location: RD+4
Function Call: WRITE
  • Prompt: !!,"You cannot process a payment associated with authorization ",DFN,"-",FTP
  • Line Location: RD+8
Function Call: WRITE
  • Prompt: !,"due to separation of duties."
  • Line Location: RD+9
Function Call: WRITE
  • Prompt: !!,*7,"Vendor is flagged for Austin deletion!"
  • Line Location: EN583+3
Function Call: WRITE
  • Prompt: *7,!!,"Vendor is listed as 'exempt from the pricer'."
  • Line Location: RDV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BAT+0
Function Call: WRITE
  • Prompt: !,*7,"Obligation number on batch does not match 1358.",!,"Obligation number on batch must be ",$P($P(FBZ(0),U),"."),".",!
  • Line Location: BAT+2
Function Call: WRITE
  • Prompt: !!,"Invoice # ",FBAAIN," assigned to this Invoice"
  • Line Location: GETNXI+1
Function Call: WRITE
  • Prompt: !,"FPPS CLAIM ID: ",$S(FBFPPSC="":"N/A",1:FBFPPSC)
  • Line Location: RIN+10
Function Call: WRITE
  • Prompt: !,$C(7),"Warning, you can only enter ",FBX," more invoices in this batch!",!
  • Line Location: DIC+19
Function Call: WRITE
  • Prompt: !!,*7,?3,"Invoice number ",FBAAIN," has already been entered for this authorization.",!,?3,"Use the Contract Hospital 'Invoice Edit' option if needed.",!
  • Line Location: OUT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: OUT+2
Function Call: WRITE
  • Prompt: *7,!!,"This Invoice may not be added to Batch # ",+FBY(0),".",!,"***You may not add a ",$S(FBVE="Y":"pricer exempt",1:"non-exempt")," invoice to a ",$S(FBVE="Y":"non-exempt",1:"pricer exempt")," batch.***"
  • Line Location: OPEN+0
Routine Call
  • DIC
  • Line Location:
    • BAT
    • DIC
Routine Call
  • DIE
  • Line Location:
    • RDV+2
    • DIC+6
Routine Call
  • DIR
  • Line Location:
    • RDV+1
    • OUT+2
    • OPEN+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAV - [#161.2] Classic Fileman Calls
^FBAA(161.7 - [#161.7] Classic Fileman Calls
^FBAAI - [#162.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FB583 - [#162.7] RIN+10
^FB7078 - [#162.4] SETINV
^FBAA(161.7 - [#161.7] DIC+15*, CHK+5*, OPEN+2
^FBAAI("E" RD+11
^FBAAV - [#161.2] EN583+3, RDV, RDV+2

Label References

Name Line Occurrences
BAT BAT+1, BAT+2
CHK BAT+1, CHK+5
OPEN CHK+2, CHK+3
OUT RD+11
PTF DIC+20
Q RD, EN583+3, EN583+4, RDV+1, RDV+2, BAT+1, RIN, RIN+4, RIN+5, RIN+8
, RIN+11, RIN+13, RIN+15, DIC, DIC+21
RD RD+1, RD+4, RD+7, DIC+21, PRBT+3
SETINV OUT+2

Naked Globals

Name Field # of Occurrence
^("AMS" RDV

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A Q!
BO BAT+1*, BAT+2, Q!, OPEN+2*
CALLERID RIN*!
CNT Q!
D DIC+14!, Q!
DA EN583+2*, DIC+1*, DIC+9, DIC+11, DIC+13, DIC+14!, Q!
DAT Q!
DFN RD, RD+7, RD+8, Q+1!, PTF*
DIC BAT*!, DIC*, DIC+1, DIC+14!, Q!
DIC("S" BAT*
DIC(0 BAT*, DIC*
DIE RDV+2*!, DIC+1*, DIC+14!, Q!
DIE("NO^" DIC+1*
DIR RDV+1!, OUT+2!, OPEN+1!
DIR("A" RDV+1*, OUT+2*, OPEN+1*
DIR("B" RDV+1*, OUT+2*, OPEN+1*
DIR(0 RDV+1*, OUT+2*, OPEN+1*
DIRUT RDV+1, Q+1!, OPEN+1
DLAYGO DIC*, Q!
DR RDV+2*, DIC+1*, DIC+14!, Q!
>> DTOUT RDV+2
DUOUT RD+1, Q+1!
F Q+1!
FB583 RIN+10, RIN+19, DIC+21, Q+2!
FB7078 RD+4, RD+5, SETINV, Q!
FBAABDT RIN+17, DIC+5, Q!
FBAABE BAT+1*!, DIC+15, Q!, CHK+5, OPEN+2
FBAAEDT RIN+17, DIC+4, Q!
FBAAID RD!, Q!
FBAAIN RD+11*, GETNXI+1, DIC, OUT, Q!
>> FBAAMM RIN+19*
FBAAMPI EN583+5*, DIC+18, Q+3!
FBAAOUT FBCHEP+3*, BAT+1*, RIN, Q!, Q+1!, OPEN+1*
FBAAPN Q+1!
FBAAPTC FBCHEP+3*, EN583+1, RIN+19, Q!, PRBT+2*
FBAAVID RD!
FBADJ DIC+9, Q+3!
FBAMTC Q+1!
FBAMTP Q+3!
FBASSOC Q+1!
FBAUT Q+1!
FBCDAYS RIN+17*, RIN+18*, Q+3!
FBCHOB BAT+1*, Q+1!, OPEN+2*
FBCOUNTY Q+1!
FBCSID RIN+8*, Q+3!
FBD1 Q+2!
FBDEL Q+1!
FBDODINV RIN+3*, RIN+5, Q+3!
FBDX Q!
FBEXMPT BAT+1*, DIC+15, Q+1!, CHK+2, CHK+3, CHK+4*, CHK+5*, OPEN+1*
FBFDC Q+2!
FBFPPSC RIN+10*, RIN+11*, RIN+13, RIN+15, Q+3!
FBFPPSL RIN+15*, Q+3!
FBI Q!
FBI7078 RD+5*, RD+11, BAT+2, Q!, PTF
FBIA RIN+4*, RIN+5, Q+3!
FBINC BAT+3*, DIC+15, DIC+18, Q+1!
FBK Q!
FBLN BAT+3*, DIC+15, Q+1!
FBLOC Q+1!
FBMST Q+2!
FBNOPTF DIC+20, OUT+2*, Q+1!
FBPOP EN583+4, Q!
FBPOV Q!
FBPROG RD+1*, Q!
>> FBPROV DIC+13
FBPSA Q!
FBPT Q!
FBRESUB RD*, OUT+2*, Q+1!
FBRR Q!
FBRRMK DIC+11, Q+3!
FBSEQ Q+1!
FBSITE Q+1!
FBSITE("FBNUM" EN583+5
FBSTN BAT+1*, RIN+13, Q+1!, OPEN+2*
FBSW Q!
FBTT Q!
FBTTYPE Q+2!
FBTYPE Q!
FBUCI135 RIN+13*, Q+2!
FBV Q+3!
FBVE RDV*, RDV+1*, RDV+2, Q+1!, CHK+1*, CHK+2, CHK+3, CHK+4, OPEN, OPEN+1
FBVEN SETINV*, EN583+2, EN583+3, RDV, RDV+2, RIN+4, RIN+13, Q!
FBVET SETINV*, Q!, PTF
FBX DIC+17~, DIC+18*, DIC+19
FBXX Q!
FBY Q!
FBY(0 BAT+1*, BAT+3, DIC+15*, OPEN, OPEN+2*
FBZ Q!
FBZ(0 SETINV*, BAT+2, PTF
FTP RD+1, RD+7, RD+8, Q!
I Q!
ICDVDT DIC+4~*, DIC+5*
J Q!
PI Q!
PSA Q+1!
PTYPE Q!
S Q!
T Q!
U EN583+3, EN583+5, BAT+2, RIN+10
X RDV+2, BAT+1, DIC*, Q+1!
Y RDV+1, BAT+1!, DIC, DIC+1, OUT+2, Q!, OPEN+1
Y(0 BAT+1!
Z1 BAT+1*, Q!, OPEN+2*
Z2 BAT+1*, Q!, CHK+4, CHK+5, OPEN+2*
ZZ Q!
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 |  Naked Globals |  Local Variables  | All