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 |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All
Print Page as PDF
Routine: OOPSDM

Package: Asists

Routine: OOPSDM


Information

OOPSDM ;HINES/WAA-Utilities Routines ;5/26/98

Source Information

Source file <OOPSDM.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;
EXIT ;
DEVICE ; This is the device selection routine.
PRINT ; This is the main print portion of the routine
END ; exit the report

External References

Name Field # of Occurrence
^%ZIS DEVICE+2
HOME^%ZIS DEVICE+5
^%ZISC END+1
^%ZTLOAD DEVICE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?6,"EMPLOYEES' BILL OF RIGHTS FOR ACCIDENT AND OCCUPATIONAL ILLNESSES"
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!?6,"The Federal Employees' Compensation Act (FECA) describes an employee's"
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !?6,"rights and entitlements to benefits following a work-related"
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !?6,"injury or illness."
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !!?6,"You have the right to file a CA-1 (injury) or CA-2 (illness), to apply"
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !?6,"for compensation."
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !!?6,"Entitlements include the option to receive medical treatment by either"
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !?6,"the VA Employee Health Unit or by your primary care physician."
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !!?6,"You have the right to request union representation."
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !!?6,"For additional information and explanation of your rights and"
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !?6,"responsibilities, contact your Workers' Compensation"
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !?6,"Specialist/Coordinator/Manager."
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !,?6,"You have the right to select the physician or facility to provide"
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: !,?6,"treatment for the sustained injury or illness. The VA facility is"
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: !,?6,"available for examination and treatment, but cannot mandate use of"
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: !,?6,"the facility to the exclusion of your choice of medical care.",!
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: !,?6,"You have the right to file a CA-1 (injury) or CA-2 (illness) to"
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: !,?6,"apply for compensation.",!
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !,?6,"You have the right to union representation at any time.",!
  • Line Location: PRINT+21
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+2
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+5

Label References

Name Line Occurrences
DEVICE EN1+2
EXIT EN1+4
PRINT EN1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEVICE+2*
IO PRINT+1
IO("Q" EN1+3, EXIT+1!, DEVICE+3
POP EN1+1~, EN1+2, DEVICE+2
>> ZTDESC DEVICE+4*
>> ZTQUEUED END+2
>> ZTREQ END+2*
>> ZTRTN DEVICE+4*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All