HDISVF02 ;BPFO/JRP - FILE UTILITIES/API;12/20/2004
Source file <HDISVF02.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETTYPE(SYSPTR) | ;Get value of SYSTEM TYPE field (#.02)
; Input : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| SETTYPE(VALUE,SYSPTR) | ;Set value of SYSTEM TYPE field (#.02)
; Input : VALUE - New value (internal or external) ; : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| GETVFAIL(SYSPTR) | ;Get value of DISABLE VUID ACTIVITY field (#11)
; Input : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| SETVFAIL(VALUE,SYSPTR) | ;Set value of DISABLE VUID ACTIVITY field (#11)
; Input : VALUE - New value (internal or external) ; : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| GETVLOC(SYSPTR) | ;Get value of VUID SERVER LOCATION field (#12)
; Input : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| SETVLOC(VALUE,SYSPTR) | ;Set value of VUID SERVER LOCATION field (#12)
; Input : VALUE - New value (internal or external) ; : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| GETVCON(SYSPTR) | ;Get value of VUID SERVER CONNECTION TYPE field (#13)
; Input : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| SETVCON(VALUE,SYSPTR) | ;Set value of VUID SERVER CONNECTION TYPE field (#13)
; Input : VALUE - New value (internal or external) ; : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| GETVSRV(SYSPTR) | ;Get value of VUID SERVER OPTION field (#21)
; Input : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| SETVSRV(VALUE,SYSPTR) | ;Set value of VUID SERVER OPTION field (#21)
; Input : VALUE - New value (internal or external) ; : SYSPTR - Pointer to HDIS System file ; (default to current system) |
|
| SET(FILE,FIELD,IENS,VALUE,XTRNL) | ;Store value into a field
; Input : FILE - File number ; FIELD - Field number ; IENS - IENS of entry ; VALUE - Value to store ; XTRNL - Flag indicating if VALUE is in external format ; 1 = Yes (external) 0 = No (internal) (default) |
|
| GET(FILE,FIELD,IENS,HOW,OUTPUT) | ;Get value for a field
; Input : FILE - File number ; FIELD - Field number ; IENS - IENS of entry ; HOW - Flag indicating how value should be returned ; I - Return internal value ; E - Return external value ; B - Return internal and external value ; OUTPUT - Output array (pass by reference - dot notation) ; Only set if HOW = B (both) ; OUTPUT("I") = Internal value ; OUTPUT("E") = External value |
| FileNo | Call Tags |
|---|---|
| ^HDISF(7118.29 - [#7118.29] | CHK^DIE |
