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 |  Local Variables |  All
Print Page as PDF
Routine: BTIUVAR

Package: IHS Mods To Text Integration Utilities

Routine: BTIUVAR


Information

BTIUVAR ; IHS/ITSC/LJF - MENU ENTRY & EXIT ACTIONS ;

Source Information

Source file <BTIUVAR.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
IHS VA Utilities 2 ^XBCLS  EN^XBVK  
Kernel 1 $$REPEAT^XLFSTR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Text Integration Utility 1 TIU PRINT PN USER MENU  

Entry Points

Name Comments DBIA/ICR reference
ENTER(TIUZ) ;EP; entry actions for BTIU MAIN MENUs
MENU ;ENTRY POINT >>> entry action for all submenus
PAD(DATA,LENGTH) ; pad length of data
XQUIT
EXIT ;ENTRY POINT >>> exit actions for BTIU MENUs
SP(NUM) ; pad spaces

External References

Name Field # of Occurrence
^XBCLS ENTER+8
EN^XBVK EXIT+1
$$REPEAT^XLFSTR ENTER+8, ENTER+12, PAD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?18,$$REPEAT^XLFSTR("*",41)
  • Line Location: ENTER+8
Function Call: WRITE
  • Prompt: !?18,"* INDIAN HEALTH SERVICE *"
  • Line Location: ENTER+9
Function Call: WRITE
  • Prompt: !?18,"*",$$SP(9),$S(TIUZ=1:"TIU CLINICIAN'S MENU"_$$SP(10),1:"TIU MEDICAL RECORDS MENU"_$$SP(6)),"*"
  • Line Location: ENTER+10
Function Call: WRITE
  • Prompt: !?18,"* VERSION ",TIU("VERS"),", ",TIU("VERDT"),?58,"*"
  • Line Location: ENTER+11
Function Call: WRITE
  • Prompt: !?18,$$REPEAT^XLFSTR("*",41)
  • Line Location: ENTER+12
Function Call: WRITE
  • Prompt: !!?74-$L(X)\2,X
  • Line Location: ENTER+17
Function Call: WRITE
  • Prompt: !!,"INVALID FACILITY; NOTIFY YOUR SITE MANAGER!"
  • Line Location: ENTER+18
Function Call: WRITE
  • Prompt: @IOF,!!?80-$L(TIU("TITLE"))/2,TIU("TITLE")
  • Line Location: MENU+3
Function Call: WRITE
  • Prompt: !!?80-$L(X)\2,"(",X,")"
  • Line Location: MENU+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" ENTER+5
^DIC(4 - [#4] ENTER+17, MENU+4
^DIC(9.4 - [#9.4] ENTER+2, ENTER+3, ENTER+4, ENTER+5

Label References

Name Line Occurrences
$$PAD SP+1
$$SP ENTER+10
XQUIT ENTER+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DATA PAD~, PAD+1
DUZ(0 ENTER+14
DUZ(2 ENTER+14, ENTER+17, MENU+4
IOF MENU+3
IOSTBM EXIT+1!
LENGTH PAD~, PAD+1
NUM SP~, SP+1
TIU ENTER+1~, MENU+1~
TIU("TITLE" MENU+2*, MENU+3
TIU("VERDT" ENTER+6*, ENTER+11
TIU("VERS" ENTER+2*, ENTER+3, ENTER+4, ENTER+11
TIUZ ENTER~, ENTER+10
U ENTER+5, ENTER+17, MENU+2, MENU+4
X ENTER+1~, ENTER+17*, ENTER+18, MENU+4*, MENU+5
>> XQUIT ENTER+4*, ENTER+16*, ENTER+18*
>> XQY0 MENU+2
Y ENTER+1~, ENTER+2*, ENTER+3, ENTER+4, ENTER+5*, ENTER+6
Z ENTER+1~, ENTER+3*, ENTER+4*, ENTER+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All