SCAPMC18 ;ALB/REW - Team APIs:ACPTCL ; 5 Jul 1995
Source file <SCAPMC18.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACPTCL(DFN,SCCL,SCFIELDA,SCACT,SCERR) | ;add a patient to a clinic (enrollment)
; input: ; DFN = pointer to PATIENT file (#2) ; SCCL = pointer to HOSPITAL LOCATION file (#44) ; SCFIELDA= array of additional fields to be added ; SCACT = date to activate [default=DT] ; SCERR = array NAME to store error messages. ; [ex. ^TMP("ORXX",$J)] |
|
| APTCLQ | ||
| PTCLACT(DFN,SCCL,SCDT,SCERR) | ;what is patient/clinic enrollment date on a given date-time? Return date or 0
|
|
| OKDATA() | ;setup/check variables
|
