SCAPMC5 ;ALB/REW - Team API's:TMAU ; JUL 3, 1995
Source file <SCAPMC5.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
TMAU(SCAU,SCDATES,SCPURPA,SCLIST,SCERR) | ; -- list of teams for autolink
; input: ; SCAU = variable pointer to TEAM AUTOLINK file (#404.56) ; e.g. 10866;VA(200 for the practitioner with duz=10866 ; SCDATES("BEGIN") = begin date to search (inclusive) ; [default: TODAY] ; ("END") = end date to search (inclusive) ; [default: TODAY] ; ("INCL") = 1: only use teams who were active ; for entire date range ; 0: anytime in date range ; [default: 1] ; SCPURPA -array of pointers to team purpose file 403.47 ; if none are defined - returns all teams ; if @SCPURPA@('exclude') is defined - exclude listed teams ; SCLIST -array name to store list ; [ex. ^TMP("SCTM",$J)] ; ; SCERR = array NAME to store error messages. ; [ex. ^TMP("ORXX",$J)] |
|
ST | ||
PRACQ | ||
OKDATA() | ;check/setup variables
|