SCMCCV ;ALB/REW - PCMM Conversion of Patient File Fields ; 1 Feb 1996
Source file <SCMCCV.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;
; Variables: ; SCASSIGN: 1=Make Patient Assignments if unambiguous (0=No,default) ; SCDT: Date to make assignments (Default=DT) ; SCYESTM: 1=Make Pt Tm as well as Pt Posit Assmnts,default(0=No) ; SCNOPRPT 1=Don't print patient-detail lines |
|
QTEN | ||
OKASK() | ;
|
|
QTASK | ||
REP | ;non-interactive portion
|
|
QRP | ||
OKINIT() | ;
|
|
OKBUILD() | ;
|
|
OKREPORT() | ;
|
|
OKTEAM(SCTM,SCDT) | ;return 1 if exactly 1 posit for each team assignment
|
|
QTOKTM | ||
PCUPD(DFN) | ;
|
|
PCUPDTM(DFN) | ;
|
|
OKCLEAN() | ;
|
|
DISP200(SC200) | ;
|
|
DISPTP(SCTP) | ;
|
|
DISPTM(SCTM) | ;
|
|
DISPPT(DFN) | ;
|
|
MESS(TEXT,FORMAT) | ;
|
|
GETDEV() | ;
|
|
QTGDV | ||
QUE(NAME,START) | ;
; Needed: ZTSAVE array ; NAME = description ; START = starting point of routine |