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

Package: Scheduling

Routine: SDAMOL1


Information

SDAMOL1 ;ALB/CAW - Retroactive Appointment List (con't);4/15/92 ; 2/16/07 2:59pm

Source Information

Source file <SDAMOL1.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ; main sort, by division
MAINQ ; -- exit logic
SCAN ; -- api to invoke scan
SCANQ
CB(SDOE,SDOE0,SDSTOP) ; -- main callback
CBQ
NEXTDT(X1) ; -- get next date
SET ;^TMP("SDRAL",$J,Division,Stop Code,Visit Date,Patient)
SETQ
TMP(SDENCDT,SDMADE) ; -- Check to see if ^TMP("SDRL",$J,Encounter Date/Time)
; exists
; input - SDENCDT := encounter date/time
; SDMADE := date encounter made
DIV() ; -- valid division for report ?
CLINIC() ; -- valid clinic for report ?
STOP() ; -- valid stop code for report ?
APPT(SDCL,SDPAT,SDVSTDT) ; Return 'Date Appt Made' field.
; If user selected specific Clinic or Stop Code then SDAPI has been called in line tag MAIN+nnn above.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,SDERR,!
  • Line Location: MAIN+21
Function Call: WRITE
  • Prompt: !!,SDERR,!
  • Line Location: APPT+12
Info |  Source |  Entry Points |  Interaction Calls