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

Package: Fee Basis

Routine: FBCH780


Information

FBCH780 ;AISC/DMK-7078/AUTHORIZATION CON'T ;8/18/2004

Source Information

Source file <FBCH780.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 5 NOW^%DTC  WAIT^DICD  ^DIE  EN^DIQ  ^DIR  
Fee Basis 2 FBPDIS^FBCH78  PTFC^FBUTL6  
IFCAP 1 (EN2,EN3)^PRCS58  
Kernel 1 HOME^%ZIS  

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 FBCH78  FBCHCD  FBPHON2  

Entry Points

Name Comments DBIA/ICR reference
DISP
ASK
END
EDIT
HELP
POST
NULL
NULL1
DISCH(X) ;X = Pointer for 7078
PTF ;called to create a non-va ptf record at admission time for an

External References

Name Field # of Occurrence
NOW^%DTC POST+2
HOME^%ZIS DISP
WAIT^DICD ASK+2
^DIE EDIT
EN^DIQ DISP+1
^DIR ASK
FBPDIS^FBCH78 NULL
PTFC^FBUTL6 PTF+14
EN2^PRCS58 POST+3
EN3^PRCS58 POST

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISP+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !,?2,"....Posting to 1358",!
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+0
Function Call: WRITE
  • Prompt: !!,"Select one of the following: ",!,?18,"'00' FOR SURGICAL",!,?18,"'10' FOR MEDICAL",!,?18,"'86' FOR PSYCHIATRY",!
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !!,*7,"1358 not available for posting!",!
  • Line Location: POST+0
Function Call: WRITE
  • Prompt: !,*7,"Enter the reason for pending disposition or an '^' to exit",!
  • Line Location: NULL+0
Function Call: WRITE
  • Prompt: !,*7,"This is a required response. Enter an '^' to exit.",!
  • Line Location: NULL1+0
Routine Call
  • DIE
  • Line Location:
    • EDIT
Routine Call
  • DIR
  • Line Location:
    • ASK
Routine Call
  • %ZIS
  • Line Location:
    • DISP

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FB7078 - [#162.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FB7078 - [#162.4] ASK+1, PTF+11
^FBAA(162.6 - [#162.6] DISCH+6
^FBAAI - [#162.5] DISCH+5
^FBAAI("E" DISCH+3

Label References

Name Line Occurrences
DISP EDIT+1
EDIT ASK
POST ASK+2

Naked Globals

Name Field # of Occurrence
^(0 DISCH+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % POST+2
>> DA DISP+1*, EDIT*
>> DFN ASK+1*, POST+2, PTF+14
>> DIC DISP+1*, EDIT*
>> DIE EDIT*
DIR ASK!
DIR("A" ASK*
DIR("B" ASK*
DIR(0 ASK*
>> DIRUT ASK
>> DR DISP+1*, EDIT*
>> FBAA78 DISP+1, ASK+1, EDIT, POST+2, PTF+11
>> FBCHOB POST, POST+2
>> FBCOMM POST+1*, POST+2
FBDT PTF+7~, PTF+11*, PTF+14
>> FBEST POST+2
>> FBNAME POST+1
>> FBOUT ASK*
>> FBSEQ POST+2
>> FBSSN POST+1
IOF DISP
>> PRCS("TYPE" POST*, POST+2*
>> PRCS("X" POST*
U DISCH+5, DISCH+6, PTF+11
X POST+2*, DISCH~, DISCH+3
Y ASK, POST, DISCH+2~, DISCH+3*, DISCH+4, DISCH+5*, DISCH+6
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