SCAPMC1 ;ALB/REW - Team API's: PRTM ; JUN 26, 1995
Source file <SCAPMC1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRTM(SCTEAM,SCDATES,SCUSRA,SCROLEA,SCLIST,SCERR) | ; -- practitioners for team
; input: ; SCTEAM = ien of TEAM [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] ; SCUSRA = array of usr classes to use/exclude ; if $d(@scusra@('exclude')) -> list to exclude ; SCROLEA = array of roles to use/exclude ; SCERR = array NAME to store error messages. ; [ex. ^TMP("ORXX",$J ; Output: ; SCLIST() = array of practitioners ; Format: ; Subscript: Sequential # from 1 to n ; Piece Description ; 1 IEN of NEW PERSON file entry (#200) ; 2 Name of person ; 3 IEN of TEAM POSITION file (#404.57) ; 4 Name of Position ; 5 IEN OF USR CLASS(#8930) of POSITION (#404.57) ; 6 USR Class Name ; 7 IEN of STANDARD POSITION (#403.46) ; 8 Standard Role (Position) Name ; 9 Activation Date for 404.52 (not 404.59!) ; 10 Inactivation Date for 404.52 ; 11 IEN of Position Ass History (404.52) ; 12 IEN of Preceptor Position ; 13 Name of Preceptor Position |
|
| ST | ||
| PRACQ | ||
| OKDATA() | ; setup/check variables - return 1 if ok; 0 if error
|
