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

Package: Fee Basis

Routine: FBNHDLDI


Information

FBNHDLDI ;AISC/GRR - DELETE DISCHARGE FOR NURSING HOME ;1/22/15 13:39

Source Information

Source file <FBNHDLDI.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 ^DIC  ^DIE  ^DIK  ^DIR  
Fee Basis 3 GETVET^FBAAUTL1  ^FBNHDEC  $$ADDUA^FBUTL9  

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

Package Total Caller Graph
Fee Basis 1 FBCNH DELETE DISCHARGE  

Entry Points

Name Comments DBIA/ICR reference
RD1
RD2
Q
CKVEIW
ALERT

External References

Name Field # of Occurrence
^DIC RD2
^DIE RD2+4
^DIK RD2+4
^DIR RD2+3, CKVEIW
GETVET^FBAAUTL1 RD1
^FBNHDEC CKVEIW
$$ADDUA^FBUTL9 RD2+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"Veteran presently has an active admission.",!,"You cannot delete a discharge when there is an active admission!",!
  • Line Location: RD1+1
Function Call: WRITE
  • Prompt: !!,*7,"There is activity following this discharge date.",!,"You must delete all subsequent activity before deleting this discharge."
  • Line Location: RD2+1
Function Call: WRITE
  • Prompt: !?5,"... deleted"
  • Line Location: RD2+4
Function Call: WRITE
  • Prompt: !,"Error adding record in User Audit. Please contact IRM."
  • Line Location: RD2+12
Function Call: WRITE
  • Prompt: !!,*7,"It will be necessary to adjust the 'TO DATE' of this patient's authorization",!,"using the 'EDIT CNH AUTHORIZATION' option."
  • Line Location: ALERT+0
Routine Call
  • DIC
  • Line Location:
    • RD2
Routine Call
  • DIE
  • Line Location:
    • RD2+4
Routine Call
  • DIR
  • Line Location:
    • RD2+3
    • CKVEIW

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAACNH - [#162.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FBAAA - [#161] RD2+9
^FBAACNH - [#162.3] RD2+2, RD2+7
^FBAACNH("AD" RD1+1, CKVEIW
^FBAACNH("AF" RD2+1

Label References

Name Line Occurrences
ALERT RD2+4
CKVEIW RD1+1
Q RD1, RD2+3
RD1 RD2, RD2+1, RD2+3, RD2+13, CKVEIW, CKVEIW+1
RD2 RD2

Naked Globals

Name Field # of Occurrence
^(0 RD2+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA RD2*, RD2+2, RD2+4*, Q!
DFN RD1, RD1+1, RD2+1, RD2+5, RD2+9, Q!, CKVEIW
DIC RD2*!, Q!
DIC("A" RD2*
DIC("S" RD2*
DIC(0 RD2*
DIE RD2*, RD2+4*, Q!
>> DIK RD2+4*
DIR RD2+3!, CKVEIW!
DIR("A" RD2+3*, CKVEIW*
DIR("B" RD2+3*, CKVEIW*
DIR(0 RD2+3*, CKVEIW*
DLAYGO RD2*!
DR RD2+4*, Q!
>> DTOUT RD2+3, CKVEIW
>> DUOUT RD2+3, CKVEIW
FB RD2+6~
FB(161 RD2+7*, RD2+8, RD2+9
FB(78 RD2+9*, RD2+10, RD2+11
FBCKDT RD2+1*, Q!
FBDA RD2+2*, RD2+4, RD2+7, Q!
FBPROG Q!
FBTYPE Q!
FBX RD2+6~, RD2+11*, RD2+12
FTP Q!
>> IFN CKVEIW*
X RD2, Q!
Y RD2, RD2+3, Q!, CKVEIW
Y(0 RD2+1
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