SCAPMR6 ;ALB/REW/PDR - Team Reassignment APIs:APPTTM ; 5 Jul 1995
Source file <SCAPMR6.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ACPTRATM(DFNA,SCTMTO,SCTMFRM,SCOTH,SCFIELDA,SCACT,SCERR,SCNEWTM,SCOLDTM,SCBADTM) | ; list of patients RE-assigned to a team (404.42)
; input: as per ACPTTM (above with the following change:) ; DFNA = is the name of a patient array (e.g. $N(^TMP(SCJOB,"SC PATIENT LIST"))) ; there is at least one scpt(dfn)="" defined ; SCTMTO = pointer to "TO" team file ; SCTMFRM = pointer to "FROM" team file - PDR 7/98 ; SCOTH = array of other parameters e.g. SCOTH("SIZELIM") ; SCFIELDA = List of array of fields and values in 404.42 ; SCACT = Date filed (NOW) ; SCERR = Name of error message var ; SCNEWTM = Subset of DFNA that was NEWLY assigned to Team [returned] ; SCOLDTM = Subset of DFNA that was already assigned -Team [returned] ; SCBADTP = Subset of DFNA that was NOT assigned to Team [returned] ; Note: The above three arrays return data in a user determined array ; output: Count of Patients: ; 1 2 3 4 ; total assigned^newly assigned^assigned prior^not assigned |