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

Package: Fee Basis

Routine: FBAAVD1


Information

FBAAVD1 ;AISC/DMK/GRR-COMMUNITY NURSING HOME VENDOR DISPLAY ; 1/15/10 2:06pm

Source Information

Source file <FBAAVD1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 COMMA^%DTC  ^DIR  
Fee Basis 1 $$DATX^FBAAUTL  

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 FBAAVD  FBNHEAU2  FBNHRAT1  FBNHRC  FBNHRDEL  

Entry Points

Name Comments DBIA/ICR reference
CNH(X,Z) ;retrieve latest vendor contract
RATE(X,FBCNRTS) ;retrieve rates
DISPLAY ;

External References

Name Field # of Occurrence
COMMA^%DTC DISPLAY+10
^DIR FBAAVD1+4, DISPLAY+14
$$DATX^FBAAUTL FBAAVD1+13, FBAAVD1+14, FBAAVD1+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,$J("Name:",13),?15,$E(Z(1),1,30),?48,"ID Number: ",Z(2)
  • Line Location: FBAAVD1+5
Function Call: WRITE
  • Prompt: !?23,">>> CNH INFORMATION <<<",!
  • Line Location: FBAAVD1+7
Function Call: WRITE
  • Prompt: !,$J("Total Beds:",13),?15,$P(V,"^",8),?37,"Inspected/Accredited:",?59,$S($P(V,"^",4)="I":"Inspected by VA",$P(V,"^",4)="A":"Accredited by JCAH",$P(V,"^",4)="B":"Inspect. & Accred.",1:"")
  • Line Location: FBAAVD1+8
Function Call: WRITE
  • Prompt: !,$J("Contract #:",13),?15,$P(FBX,U)
  • Line Location: FBAAVD1+11
Function Call: WRITE
  • Prompt: ?40,$J("Medicare/Medicaid:",13),?59,$S($P(V,"^",5)=1:"Not Cert. for either",$P(V,"^",5)=2:"Cert. for Medicare",$P(V,"^",5)=3:"Cert. for Medicaid",$P(V,"^",5)=4:"Cert. for both",1:"")
  • Line Location: FBAAVD1+12
Function Call: WRITE
  • Prompt: !,$J("Effect. DT:",13),?15,$$DATX^FBAAUTL($P(FBX,U,2))
  • Line Location: FBAAVD1+13
Function Call: WRITE
  • Prompt: ?42,"Last Assessment:",?59,$$DATX^FBAAUTL($P(V,"^",6))
  • Line Location: FBAAVD1+14
Function Call: WRITE
  • Prompt: !,$J("End Date:",13),?15,$$DATX^FBAAUTL($P(FBX,U,3))
  • Line Location: FBAAVD1+15
Function Call: WRITE
  • Prompt: !
  • Line Location: FBAAVD1+17
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY+14
Routine Call
  • DIR
  • Line Location:
    • FBAAVD1+4
    • DISPLAY+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FBAA(161.21 - [#161.21] FBAAVD1+9, CNH+6, CNH+7, RATE+5, RATE+6, DISPLAY+7
^FBAA(161.22 - [#161.22] RATE+7, RATE+8
^FBAAV - [#161.2] CNH+5, DISPLAY+6

Label References

Name Line Occurrences
$$CNH FBAAVD1+10
$$RATE DISPLAY+9
DISPLAY FBAAVD1+18

Naked Globals

Name Field # of Occurrence
^( CNH+6, CNH+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT RATE+4~, RATE+7*, RATE+8, RATE+9
>> DA FBAAVD1+9, FBAAVD1+10, FBAAVD1+18
DIR FBAAVD1+4!, DISPLAY+14!
DIR(0 FBAAVD1+4*, DISPLAY+14*
>> DIRUT DISPLAY+14
DT CNH+6, CNH+7
FBCNRTS RATE~
FBCNRTS( RATE+8*
>> FBCNUM FBAAVD1+16*, DISPLAY+7, DISPLAY+9
FBCONRTS DISPLAY+9~
FBCONRTS( DISPLAY+10, DISPLAY+16
>> FBRATE DISPLAY+9*, DISPLAY+11, DISPLAY+12, DISPLAY+13, DISPLAY+14*, DISPLAY+16*
FBVIEN FBAAVD1+18*!, DISPLAY+6
FBX FBAAVD1+10*, FBAAVD1+11, FBAAVD1+13, FBAAVD1+15, FBAAVD1+16!, DISPLAY+6*, DISPLAY+7*, DISPLAY+9~*
I RATE+4~, RATE+7*, RATE+8, DISPLAY+8~, DISPLAY+10*, DISPLAY+11, DISPLAY+12, DISPLAY+14
IOF FBAAVD1+5
IOSL FBAAVD1+3
IOST FBAAVD1+4
J DISPLAY+8~, DISPLAY+10*, DISPLAY+11, DISPLAY+12
U FBAAVD1+11, FBAAVD1+13, FBAAVD1+15, FBAAVD1+16, CNH+6, CNH+7, CNH+8
>> V FBAAVD1+8, FBAAVD1+12, FBAAVD1+14
X CNH~, CNH+5, CNH+6, CNH+7, RATE~, RATE+5, RATE+6*, RATE+7, DISPLAY+10*
>> X2 DISPLAY+10*
Y FBAAVD1+3, FBAAVD1+4, FBAAVD1+6*, CNH+4~, CNH+6*, CNH+7*, CNH+8, RATE+7*, DISPLAY+16
Z CNH~, CNH+8
Z(1 FBAAVD1+5
Z(2 FBAAVD1+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All