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

Package: Scheduling

Routine: SDYCENR


Information

SDYCENR ;ALB/CAW - CLINIC ENROLLMENT ; 7/18/94

Source Information

Source file <SDYCENR.m>

Entry Points

Name Comments DBIA/ICR reference
EN
ENQ
INIT ; Init variables
LOOP ; Loop through the enrollment info
LOOP1 ; Find inactive enrollments with no date of discharge
WRT ;
QUE() ; -- que job
; return: did job que [ 1|yes 0|no ]

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"The following will provide a listing which will include patients that "
  • Line Location: WRT+1
Function Call: WRITE
  • Prompt: !,"have an inactive enrollment with no date of discharge. Because the "
  • Line Location: WRT+2
Function Call: WRITE
  • Prompt: !,"date of discharge cannot be automatically determined, the dates of "
  • Line Location: WRT+3
Function Call: WRITE
  • Prompt: !,"discharge will have to be entered manually via the 'Edit Clinic "
  • Line Location: WRT+4
Function Call: WRITE
  • Prompt: !,"Enrollment Data' option.",!
  • Line Location: WRT+5
Info |  Source |  Entry Points |  Interaction Calls