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

Package: Fee Basis

Routine: FBNHEP


Information

FBNHEP ;AISC/GRR - ENTER NURSING HOME PAYMENT ;10/07/2014

Source Information

Source file <FBNHEP.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Fee Basis 6 PDATE^FBAAUTL  (GETAUTH,GETVEN,GETVET)^FBAAUTL1  (ADD,DIS,HED,TRAN)^FBNHDEC  (,$$DAYS,PROB)^FBNHEP1  ($$B9INVC,CALC,CALC1,CKRAT,DAYS,GETBAT,NOBAT,Q)^FBNHEP2  $$UOKPAY^FBUTL9  
VA FileMan 2 ^%DT  ^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: 2

Package Total Caller Graph
Fee Basis 2 FBCNH ENTER PAYMENT  FBNHEP1  

Entry Points

Name Comments DBIA/ICR reference
RD
GETVET
GETVEN
LETSGO
ADDMOR
RD3
GETACT
SKIPC
CONT
MORE
AHEAD
ENDACT
GETPRV
NOAC
DISPAC
Q
CHKAHD

External References

Name Field # of Occurrence
^%DT RD
^DIR RD3, CHKAHD
PDATE^FBAAUTL DISPAC
GETAUTH^FBAAUTL1 GETVET+9
GETVEN^FBAAUTL1 GETVEN
GETVET^FBAAUTL1 GETVET+9
ADD^FBNHDEC DISPAC
DIS^FBNHDEC DISPAC
HED^FBNHDEC GETACT
TRAN^FBNHDEC DISPAC
^FBNHEP1 RD3
$$DAYS^FBNHEP1 RD+1, GETVET+9
PROB^FBNHEP1 GETPRV
$$B9INVC^FBNHEP2 GETVET+2
CALC^FBNHEP2 LETSGO+1
CALC1^FBNHEP2 ADDMOR
CKRAT^FBNHEP2 GETVEN+3
DAYS^FBNHEP2 ADDMOR
GETBAT^FBNHEP2 FBNHEP+6
NOBAT^FBNHEP2 FBNHEP+3, FBNHEP+5
Q^FBNHEP2 Q+2
$$UOKPAY^FBUTL9 GETVET+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: FBNHEP+6
Function Call: WRITE
  • Prompt: !!,"This Batch already has the maximum number of Payments!"
  • Line Location: GETVET+4
Function Call: WRITE
  • Prompt: !,$C(7),"Warning, you can only enter ",FBX," more invoices in this batch!",!
  • Line Location: GETVET+6
Function Call: WRITE
  • Prompt: !!,"You cannot process a payment associated with authorization ",DFN,"-",FTP
  • Line Location: GETVET+13
Function Call: WRITE
  • Prompt: !,"due to separation of duties."
  • Line Location: GETVET+14
Function Call: WRITE
  • Prompt: !!,*7,"Payment Period is NOT within the veterans authorized dates!"
  • Line Location: GETVET+16
Function Call: WRITE
  • Prompt: !!,*7,"Vendor is flagged for Austin deletion!",!
  • Line Location: GETVEN+1
Function Call: WRITE
  • Prompt: !!,*7,"Invoice (# ",FBINA,") already exists for treatment provided in the",!,"month and year selected.",!
  • Line Location: GETVEN+4
Function Call: WRITE
  • Prompt: !!!,"Amount based on ",FBTRDYS," days of care."
  • Line Location: ADDMOR+1
Function Call: WRITE
  • Prompt: !!," Total Amount calculated is: $",$J(FBDEFP,7,2),!
  • Line Location: ADDMOR+2
Function Call: WRITE
  • Prompt: !!,"No movements during payment period. Last transaction prior was:",!
  • Line Location: NOAC+1
Function Call: WRITE
  • Prompt: !,*7,"Veteran not provided care during Payment Period!"
  • Line Location: NOAC+2
Function Call: WRITE
  • Prompt: !,*7,"Veteran has not been in Nursing Home during Payment Period"
  • Line Location: NOAC+3
Routine Call
  • DIR
  • Line Location:
    • RD3
    • CHKAHD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FBAA(161.7 - [#161.7] FBNHEP+3, FBNHEP+4
^FBAACNH - [#162.3] GETACT+2, CONT, GETPRV
^FBAACNH("AF" GETPRV
^FBAACNH("AG" GETACT, GETACT+2, CONT
^FBAAI("AA" GETVEN+4
^FBAAV - [#161.2] GETVEN+1

Label References

Name Line Occurrences
CHKAHD GETVEN+4
CONT GETACT+6
DISPAC GETACT+4, GETACT+6, GETACT+7, MORE, NOAC+1
ENDACT CONT+2, NOAC, NOAC+2, NOAC+3, NOAC+4
GETACT LETSGO
GETPRV GETACT+4, GETACT+7, NOAC
GETVET GETVET+9, GETVET+12, GETVET+16, GETVEN+3, LETSGO, LETSGO+1, RD3, GETACT+7, CHKAHD
LETSGO CHKAHD
MORE CONT
NOAC GETACT
Q FBNHEP+6, RD, GETVET+3, GETVET+9, GETVEN, GETVEN+1
SKIPC GETACT+7

Naked Globals

Name Field # of Occurrence
^( GETPRV
^(0 FBNHEP+4, CONT

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT RD*, Q!
%DT("A" RD*
DFN GETVET+9, GETVET+12, GETVET+13, GETVEN+4, GETACT, GETACT+2, CONT, GETPRV, Q!
DIR RD3!, CHKAHD!
DIR("A" RD3*, CHKAHD*
DIR("B" RD3*, CHKAHD*
DIR(0 RD3*, CHKAHD*
DIRUT GETVET+9, Q!, CHKAHD
DTOUT Q!
DUOUT Q!
DUZ FBNHEP+3, FBNHEP+4
FB GETVET!, GETVEN+3!, Q!
FB583 Q!
FB7078 GETVET!
FBAAAD Q!
FBAABDT GETVET!, GETVET+16, GETACT, GETACT+5, GETACT+8, CONT+1, MORE
FBAAEDT GETVET!, GETVET+16, GETVEN, GETACT+5, GETACT+8, CONT+1, MORE
FBAAID GETVET!
FBAAMPI GETVET+2, Q+1!
FBAAOUT GETVET+9!
>> FBAAPTC RD*
FBAAVID GETVET!
FBAMTP Q!
FBASSOC GETVET!
FBAT GETVET!, Q!
FBAUT GETVET!
>> FBBAT FBNHEP+6, GETVET+2
FBBDT Q!
FBBEG GETVET!, Q!
FBCOUNT GETACT+6*, SKIPC*, CONT+1, AHEAD*, ENDACT!
>> FBDAYS RD+1*
FBDEFP GETVET!, ADDMOR+2, Q!
FBEND GETVET!, Q!
>> FBENDDT RD+1*, GETVET+9*, GETVEN*, GETACT, CONT, CONT+1, NOAC+4
FBENDFLG GETVEN*, NOAC+4, Q!
>> FBER RD*
>> FBERR GETVEN*, GETVEN+3, LETSGO, LETSGO+1
FBHI GETVET!, Q!
>> FBHZ GETACT+4*, GETACT+7*
FBIFN Q!
>> FBINA GETVEN+4*
FBLTT GETACT+6*, CONT*, CONT+1, MORE, AHEAD*, ENDACT!
>> FBMM RD+1*
FBNAC GETACT*, GETACT+2, GETACT+5, GETACT+6, GETACT+8, CONT*, MORE, AHEAD, ENDACT!
FBNHAC Q!
FBNHARUP GETVEN+2*, Q+1!
FBNOAC LETSGO+1, ADDMOR, NOAC*, Q!
>> FBOUT FBNHEP+4*, FBNHEP+5, FBNHEP+6
>> FBPAYDT RD+1*, GETVET+16, GETVEN+4, GETACT, GETACT+4, GETACT+8, GETPRV
FBPAYEDT RD+1*, Q!
FBPDT GETVET!, Q!
>> FBPIFN GETPRV*
FBPNAC GETACT+3, GETACT+4*, GETACT+5, GETACT+6*, CONT+1, MORE, AHEAD*, ENDACT!
FBPOV GETVET!
FBPREV GETVET!, GETPRV*
FBPROG GETVET!, GETVET+9*
FBPRTR GETVET!, GETACT*, GETACT+4, GETACT+7, GETPRV*, NOAC
FBPSA GETVET!
FBPT GETVET!
FBRIFN GETVET!, GETACT+2*, CONT*, GETPRV*, DISPAC+1
FBTDAYS Q!
FBTRDYS GETVET!, ADDMOR+1, GETACT*, GETACT+5*, GETACT+8*, CONT+1*, MORE*, NOAC+4*
FBTRDYS(2 GETACT*
FBTT GETVET!
FBTYPE GETVET!, DISPAC*
FBVEN GETVET!, GETVEN, GETACT, GETACT+2, CONT
FBX GETVET+2*, GETVET+3, GETVET+5, GETVET+6, GETVET+7!
FBX1 Q!
>> FBYY RD+1*
FBZ GETVET!, Q!
FBZ( DISPAC+1*
FBZZ Q!
FTP GETVET!, GETVET+9, GETVET+12, GETVET+13
>> I FBNHEP+4*, CONT*
IFN GETVET!, GETVEN*, GETVEN+1, GETVEN+4
PSA Q!
U GETVEN+1, DISPAC+1
>> X RD, RD+1*
>> Y RD+1, RD3, DISPAC*, CHKAHD
>> Z GETACT+2*, GETACT+3, GETACT+4*, GETACT+6, GETACT+7*, CONT*, CONT+1, MORE, AHEAD, NOAC*
, NOAC+2, NOAC+3, DISPAC, DISPAC+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All