Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  Local Variables |  All
Print Page as PDF
Routine: XBHEDD13

Package: IHS VA Utilities

Routine: XBHEDD13


Information

XBHEDD13 ;402,DJB,5/1/90,EDD - Help Text 2

Source Information

Source file <XBHEDD13.m>

Entry Points

Name Comments DBIA/ICR reference

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?5,"INPUT",?20,"EFFECT",!?5,"=======",?20,"========================================================="
  • Line Location: XBHEDD13+4
Function Call: WRITE
  • Prompt: !?2,"1.",?7,"""^""",?20,"Causes an exit back to the Main Menu."
  • Line Location: XBHEDD13+5
Function Call: WRITE
  • Prompt: !!?2,"2.",?7,"""B""",?20,"Backs up to previous screen."
  • Line Location: XBHEDD13+6
Function Call: WRITE
  • Prompt: !!?2,"3.",?7,"""n""",?20,"Typing a number here allows you to jump to that screen."
  • Line Location: XBHEDD13+7
Function Call: WRITE
  • Prompt: !?20,"In the lower right hand corner of the screen, you will"
  • Line Location: XBHEDD13+8
Function Call: WRITE
  • Prompt: !?20,"see 2 numbers: TOP and CUR. TOP is the highest screen"
  • Line Location: XBHEDD13+9
Function Call: WRITE
  • Prompt: !?20,"you have <RETURNED> to. CUR is the current screen"
  • Line Location: XBHEDD13+10
Function Call: WRITE
  • Prompt: !?20,"you are viewing. You can only jump between the first and"
  • Line Location: XBHEDD13+11
Function Call: WRITE
  • Prompt: !?20,"TOP screen. As an example, if you selected the ""FIELD"
  • Line Location: XBHEDD13+12
Function Call: WRITE
  • Prompt: !?20,"Global Location"" option and then hit <RETURN> 6 times,"
  • Line Location: XBHEDD13+13
Function Call: WRITE
  • Prompt: !?20,"TOP would be equal to 6 and CUR would be equal to 6."
  • Line Location: XBHEDD13+14
Function Call: WRITE
  • Prompt: !?20,"Now you can jump to any screen between 1 and 6."
  • Line Location: XBHEDD13+15
Function Call: WRITE
  • Prompt: !?20,"If you entered a ""2"" and <RETURN>, you would jump"
  • Line Location: XBHEDD13+16
Function Call: WRITE
  • Prompt: !?20,"to screen 2. TOP would still be equal to 6 but CUR"
  • Line Location: XBHEDD13+17
Function Call: WRITE
  • Prompt: !?20,"would now be 2. If you then hit ""B"" to back up 1 screen,"
  • Line Location: XBHEDD13+18
Function Call: WRITE
  • Prompt: !?20,"TOP would be 6 and CUR would be 1. If you now"
  • Line Location: XBHEDD13+19
Function Call: WRITE
  • Prompt: !?20,"wanted to return to TOP (screen 6) you would type a ""6"""
  • Line Location: XBHEDD13+20
Function Call: READ
  • Timeout: DTIME
  • Line Location: XBHEDD13+21
Function Call: WRITE
  • Prompt: @IOF,!?5,"INPUT",?20,"EFFECT",!?5,"=======",?20,"========================================================="
  • Line Location: XBHEDD13+22
Function Call: WRITE
  • Prompt: !?20,"and this page would now be displayed. TOP and CUR would"
  • Line Location: XBHEDD13+23
Function Call: WRITE
  • Prompt: !?20,"both be equal to 6 again."
  • Line Location: XBHEDD13+24
Function Call: WRITE
  • Prompt: !!?2,"4.",?7,"""I""",?20,"""I"" allows you to zoom in on an individual field. It"
  • Line Location: XBHEDD13+25
Function Call: WRITE
  • Prompt: !?20,"prompts you for a field and then gives you the Individual"
  • Line Location: XBHEDD13+26
Function Call: WRITE
  • Prompt: !?20,"FIELD Summary for that field. When using ""I"", you"
  • Line Location: XBHEDD13+27
Function Call: WRITE
  • Prompt: !?20,"must start at the top of the multiple. For example, if"
  • Line Location: XBHEDD13+28
Function Call: WRITE
  • Prompt: !?20,"you were looking at the Patient file and you had selected"
  • Line Location: XBHEDD13+29
Function Call: WRITE
  • Prompt: !?20,"""Admission Date"" as the starting point for FIELD Global"
  • Line Location: XBHEDD13+30
Function Call: WRITE
  • Prompt: !?20,"Location and you <RETURNED> thru 2 screens, you would see"
  • Line Location: XBHEDD13+31
Function Call: WRITE
  • Prompt: !?20,"the field Treating Specialty. To view the Individual"
  • Line Location: XBHEDD13+32
Function Call: WRITE
  • Prompt: !?20,"FIELD Summary for this field you would have to first"
  • Line Location: XBHEDD13+33
Function Call: WRITE
  • Prompt: !?20,"select Admission Date and then Treating Specialty. This"
  • Line Location: XBHEDD13+34
Function Call: WRITE
  • Prompt: !?20,"is made easier by the design of the FIELD Global Location"
  • Line Location: XBHEDD13+35
Function Call: WRITE
  • Prompt: !?20,"screens. Each layer of multiple fields is preceeded by"
  • Line Location: XBHEDD13+36
Function Call: WRITE
  • Prompt: !?20,"dashes that indicated their level. You trace these dashes"
  • Line Location: XBHEDD13+37
Function Call: WRITE
  • Prompt: !?20,"back to locate the starting point for each layer."
  • Line Location: XBHEDD13+38
Function Call: WRITE
  • Prompt: !?20,"You can also use the ""Trace a Field"" option."
  • Line Location: XBHEDD13+39
Function Call: READ
  • Prompt: "Hit any key to continue: "
  • Formatting: !!?2
  • Timeout: DTIME
  • Variable: Z1
  • Line Location: XBHEDD13+40

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DTIME XBHEDD13+21, XBHEDD13+40
>> FLAG XBHEDD13+21*, XBHEDD13+40*
IOF XBHEDD13+4, XBHEDD13+22
>> Z1 XBHEDD13+21*, XBHEDD13+40*
Info |  Source |  Entry Points |  Interaction Calls |  Local Variables |  All