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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: DGRUGIX

Package: Registration

Routine: DGRUGIX


Information

DGRUGIX ;ALB/BOK/MLI - RUG-II INDEX BY DATE ; 9 FEB 88

Source Information

Source file <DGRUGIX.m>

Entry Points

Name Comments DBIA/ICR reference
Q
ASK
DAT
OK
1
CS
S
CONT
CL
M
INIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: Q+0
Function Call: WRITE
  • Prompt: !!,"Sort by (A)ssessment or (T)ransfer/Admission Date: T//"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: X
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !!,?12,"CHOOSE FROM:",!?12,"A - Date range for the search is by Assessment Date",!?12,"T - Date range is by Transfer or admission date",!
  • Line Location: ASK+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: DAT+10
Function Call: WRITE
  • Prompt: !,"Enter Category: "
  • Line Location: DAT+10
Function Call: WRITE
  • Prompt: "ALL// "
  • Condition for execution: ($O(DGCT(0))="")
  • Line Location: DAT+10
Function Call: WRITE
  • Prompt: !!,"You have selected output for:",!!?4,$S(DGX="AA":"Assessment",1:"Transfer/Admission")," dates between "
  • Line Location: OK+0
Function Call: WRITE
  • Prompt: " and "
  • Line Location: OK+3
Function Call: WRITE
  • Prompt: !!,*7,"This output requires 132 columns!",!
  • Line Location: OK+14
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST)="C"
  • Line Location: 1+6
Function Call: WRITE
  • Prompt: !,"***RUG-II INDEX REPORTS--NO MATCHES FOUND***"
  • Line Location: 1+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: CL+0
Function Call: WRITE
  • Prompt: @(X_"(I)")
  • Line Location: M+2
Function Call: WRITE
  • Prompt: ", ",@(X_"(I)")
  • Line Location: M+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(45.91 - [#45.91] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call