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 |