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
Print Page as PDF
Routine: SCAPMC29

Package: Scheduling

Routine: SCAPMC29


Information

SCAPMC29 ;ALB/REW - TEAM APIs:CLPT ; 2/17/00 1:33pm

Source Information

Source file <SCAPMC29.m>

Entry Points

Name Comments DBIA/ICR reference
CLPT(DFN,SCDATES,SCTEAMA,SCLIST,SCERR) ;clinics for patient
; input:
; DFN = ien of PATIENT <FILE#2> [required]
; SCDATES("BEGIN") = begin date to search (inclusive)
; [default: TODAY]
; ("END") = end date to search (inclusive)
; [default: TODAY]
; ("INCL") = 1: only use pracitioners who were on
; team for entire date range
; 0: anytime in date range
; [default: 1]
; SCTEAMA= array of teams to include reverse with scposa('exclude')
; SCERR = array NAME to store error messages.
; [ex. ^TMP("ORXX",$J)]
ST
PTCLQ
OKCLIN(SC44,SCPOSA) ;is clinic ok, given position array
QTOKC
OKDATA() ;check/setup variables - return 1 if ok; 0 if error
Info |  Source |  Entry Points