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
Print Page as PDF
Routine: VAQDIS17

Package: Patient Data Exchange

Routine: VAQDIS17


Information

VAQDIS17 ;ALB/JFP - PDX,DEVICE SELECTER FOR DISPLAY;01MAR93

Source Information

Source file <VAQDIS17.m>

Entry Points

Name Comments DBIA/ICR reference
DEVICE(TYPE) ; -- Gets device
ASK
QUEUE ;QUEUE FOR PRINTING
TASK ; -- Task for printing
ALL ; -- Builds display for all segments
ALLQ
SELECT ; -- Builds display for selected segments
SELQ
BLD ; -- Builds printed output
EXIT ; -- Kill device/queue variables
END ; -- End of code

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"RIGHT MARGIN MUST BE AT LEAST 80",!!
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!,"Output Queued - Task number = ",ZTSK
  • Line Location: QUEUE+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ALL+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SELECT+5
Info |  Source |  Entry Points |  Interaction Calls