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

Package: Registration

Routine: DGOIL


Information

DGOIL ;ALB/AAS - INPATIENT LIST ; 28-SEPT-90

Source Information

Source file <DGOIL.m>

Entry Points

Name Comments DBIA/ICR reference
WARD ; -- by ward or by name
FIRST ; -- get range of the output
BRKOUT ; -- with ward breakout
DRG ; -- with DGR breakout
DEV
DQ ; -- entry point to start processing
SORT ; -- sort inpatients, store in ^utility($j,
BYWARD ; -- if by ward get entries to print
BYNAME ; -- if by name get entries to print
SETU ; -- set utility($j,$s(sort by ward:ward,1:name),$s(sort by ward:name,1:ward),dfn)=pointer to dgpm
HDR
HDR1
END
END1
LEGEND ; -legend for flag column
CAP(X)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DGOIL+4
Function Call: WRITE
  • Prompt: !!,?32,"Inpatient List",!!!
  • Line Location: DGOIL+5
Function Call: WRITE
  • Prompt: !!,"End must be after beginning",!
  • Line Location: FIRST+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: BRKOUT+1
Function Call: WRITE
  • Prompt: !,"No Matches Found"
  • Line Location: SORT+6
Function Call: WRITE
  • Prompt: @IOF,"INPATIENT LIST",?(IOM-29)
  • Line Location: HDR1+0
Function Call: WRITE
  • Prompt: DGDATE," PAGE: ",DGPG
  • Line Location: HDR1+0
Function Call: WRITE
  • Prompt: !?104,"Trim",?112,"Nat/Loc",?120,"Nat/Loc"
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: ?45,"DIVISION(S): ",VAUTD(I),!
  • Line Location: HDR1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: LEGEND+1
Function Call: WRITE
  • Prompt: !,"'+' Before the Patient name indicates patient is currently ASIH, '!' Indicates patient chose not to be in Facility Directory"
  • Line Location: LEGEND+2
Function Call: READ
  • Formatting: !
  • Prompt: "Press '^' to QUIT or Return to Continue"
  • Variable: Z
  • Timeout: DTIME
  • Line Location: LEGEND+4
Info |  Source |  Entry Points |  Interaction Calls