SCUTBK3 ;MJK/ALB - RPC Broker Utilities ; SEP 99
Source file <SCUTBK3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
GETUSER(SCDATA,SCDUZ) | ; -- get user data
|
|
DEFAULT(SCDUZ) | ; -- get default query for user
|
|
SETDEF(SCDATA,SCDUZ,SCQRY) | ; -- set user's default query
; input: SCDUZ -> user's id (DUZ) ; SCQRY ->query ien |
|
SETDEFQ | ||
VERPAT(SCRESULT,SCPATCH) | ;
; for rpc SCMC VERIFY C/S SYNC ; input := ServerPatch^ClientVersion ; output := SCRESULT: 0 = Not Continue ; 1 = Continue (pre SD*5.3*204) ; n = RpcTimeLimit (after SD*5.3*204) |
|
VPROGMR() | ; check if user is programmer
|
|
VAPVER(SCX) | ; check client RPCVersion
; ; input SCX := client RPCVersion(server XWBAPVER) ; ; output := RpcTimeLimit |
|
VCLIENT(SCX) | ; check executable version/update if new
; ; input SCX := server^client (versions) |
|
VPATCH(SCX) | ; check server version
; ; input SCX := server^client (versions) |
|
HDREC(SCDATA,SCER,SCPROC) | ; -- build zeroth of SCDATA array
|
|
SETPROC(SCDATA,SCPROC) | ; -- set process name for error list
|
|
ERRCHK(SCDATA,SCERR,SCPROC) | ; -- process fileman dbs errors
|
RPC Name | Call Tags |
---|---|
SCUT GET USER RECORD | GETUSER |
SCUT SET USER QUERY DEFAULT | SETDEF |
SCMC VERIFY C/S SYNC | VERPAT |
FileNo | Call Tags |
---|---|
^SCRS(403.35 - [#403.35] | FDA^DILF |