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

Package: Registration

Routine: DGODNP1


Information

DGODNP1 ;ALB/EG - OUTPUT TOT DISCH BY MEANS TEST CAT ; 23 DEC 88@0957

Source Information

Source file <DGODNP1.m>

Entry Points

Name Comments DBIA/ICR reference
DDV
EN
END
QTSK ;queue task
BG
0
1
2
ZRO ;zero facility+suffix
DIV ;get facility for cases where PTF has div as ""
MT ;if MT="U" drive variation of DGPTF3 to determine current MT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"INPATIENT DISCHARGES BY MEANS TEST CATEGORY",!
  • Line Location: DGODNP1+5
Function Call: WRITE
  • Prompt: !,"REPORT REQUIRES 132 COLUMN OUTPUT",!
  • Line Location: DGODNP1+6
Function Call: WRITE
  • Prompt: !,"CANNOT QUEUE TO YOUR OWN DEVICE"
  • Line Location: DDV+1
Function Call: WRITE
  • Prompt: !,"CONTINUE DIRECTLY TO YOUR I/O DEVICE// "
  • Line Location: DDV+1
Function Call: WRITE
  • Prompt: !,"If you say YES execution will begin immediately and your default i/o device will hang during compilation, NO or ^ will end"
  • Line Location: DDV+2
Function Call: WRITE
  • Prompt: !
  • Line Location: BG+1
Function Call: WRITE
  • Prompt: *7,"TO DATE IS LESS THAN FROM DATE, TRY AGAIN"
  • Line Location: BG+1
Info |  Source |  Entry Points |  Interaction Calls