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

Package: Fee Basis

Routine: FBNHEDTR


Information

FBNHEDTR ;AISC/GRR - EDIT TRANSFER TYPE FOR NURSING HOME ;9/19/2014

Source Information

Source file <FBNHEDTR.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Fee Basis 2 GETVET^FBAAUTL1  $$ADDUA^FBUTL9  
VA FileMan 2 ^DIC  ^DIE  

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 EDIT TRANSFER  

Entry Points

Name Comments DBIA/ICR reference
RD1
RD2
Q
CHKTR ;called from dr string to make sure that the transfer type is
ERROR ;write inconsistant movement type which will reset the movement type
ERROR1 ;write inconsistant movement type 'gain', reset transfer type and re-edit

External References

Name Field # of Occurrence
^DIC RD2
^DIE RD2+8
GETVET^FBAAUTL1 RD1
$$ADDUA^FBUTL9 RD2+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"There are movements following this transfer that must be deleted first.",!!
  • Line Location: RD2+2
Function Call: WRITE
  • Prompt: !,"Error adding record in User Audit. Please contact IRM."
  • Line Location: RD2+16
Function Call: WRITE
  • Prompt: !?5,*7,"Movement Type must be consistant. A transfer that is a loss",!?5,"may only be editted to another 'loss' type.",!
  • Line Location: ERROR+3
Function Call: WRITE
  • Prompt: !?5,*7,"Movement Type must be consistant. A transfer that is a gain",!?5,"may only be editted to another 'gain' type.",!
  • Line Location: ERROR1+2
Routine Call
  • DIC
  • Line Location:
    • RD2
Routine Call
  • DIE
  • Line Location:
    • RD2+8

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+13
^FBAACNH - [#162.3] RD2+5, RD2+6, RD2+11
^FBAACNH("AC" RD2+2
^FBAACNH("AF" RD2+5

Label References

Name Line Occurrences
ERROR CHKTR+5
ERROR1 CHKTR+4
Q RD1, RD2+1, RD2+8, RD2+17
RD1 RD2, RD2+1, RD2+17
RD2 RD2

Naked Globals

Name Field # of Occurrence
^(0 RD2+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA RD2*, RD2+2, RD2+5, Q!
DFN RD1, RD2+5, RD2+13, Q!
DIC RD2*!, Q!
DIC("A" RD2*
DIC("S" RD2*
DIC(0 RD2*
DIE RD2*, RD2+8!, Q!
DLAYGO RD2*!
DR RD2+7*, Q!
>> DTOUT RD2+8
FB RD2+10~
FB(161 RD2+11*, RD2+12, RD2+13
FB(78 RD2+13*, RD2+14, RD2+15
FBAADT RD2*, RD2+5, Q!
FBASIH Q!
FBDA RD2+1*, RD2+2, RD2+11, Q!
FBERR RD2+1, RD2+2*, Q!
FBJ RD2+5*, Q!
FBK RD2+5*, RD2+6, Q!
FBLTTYP RD2+4*, RD2+6*, Q!, CHKTR+4, CHKTR+5
FBNTR Q!, CHKTR+4, CHKTR+5
FBPROG Q!
FBTR RD2+4*, Q!, CHKTR+4, CHKTR+5
FBTYPE Q!
FBX RD2+10~, RD2+15*, RD2+16
FTP Q!
IFN RD2*, Q!
U RD2, RD2+1, RD2+4, RD2+6
X RD2, Q!
Y RD2, Q!, CHKTR+6*
Y(0 RD2+1, RD2+4
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