HDISVF02 ;BPFO/JRP - FILE UTILITIES/API;12/20/2004
Source file <HDISVF02.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | (CHK,FILE)^DIE GETS^DIQ |
Health Data and Informatics | 1 | $$GETPTR^HDISVF10 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
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 |
Name | Line Occurrences |
---|---|
$$GET | GETTYPE+8, GETVFAIL+8, GETVLOC+8, GETVCON+8, GETVSRV+8 |
$$SET | SETTYPE+11, SETVFAIL+8, SETVLOC+8, SETVCON+8, SETVSRV+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARR | GETTYPE+5~, GETTYPE+8, GETVFAIL+5~, GETVFAIL+8, GETVCON+5~, GETVCON+8 |
ARR("I" | GETTYPE+10, GETVFAIL+10, GETVCON+10 |
FAC | GETTYPE+5~, GETTYPE+6*, GETTYPE+7, GETTYPE+8, SETTYPE+5~, SETTYPE+6*, SETTYPE+7, SETTYPE+11, GETVFAIL+5~, GETVFAIL+6* , GETVFAIL+7, GETVFAIL+8, SETVFAIL+5~, SETVFAIL+6*, SETVFAIL+7, SETVFAIL+8, GETVLOC+5~, GETVLOC+6*, GETVLOC+7, GETVLOC+8 , SETVLOC+5~, SETVLOC+6*, SETVLOC+7, SETVLOC+8, GETVCON+5~, GETVCON+6*, GETVCON+7, GETVCON+8, SETVCON+5~, SETVCON+6* , SETVCON+7, SETVCON+8, GETVSRV+5~, GETVSRV+6*, GETVSRV+7, GETVSRV+8, SETVSRV+5~, SETVSRV+6*, SETVSRV+7, SETVSRV+8 |
FIELD | SET~, SET+12, GET~, GET+20, GET+22, GET+23, GET+24 |
FILE | SET~, SET+12, GET~, GET+20, GET+22, GET+23, GET+24 |
FLAGS | SET+11~, SET+13*, SET+14, GET+18~, GET+19*, GET+20 |
HDIERR | SETTYPE+5~ |
HDISFDA | SET+11~ |
HDISFDA( | SET+12* |
HDISMSG | SET+11~, SET+15, GET+18~, GET+21 |
HDISTRG | GET+18~ |
HDISTRG( | GET+22, GET+23, GET+24 |
HDIVAL | SETTYPE+5~, SETTYPE+9, SETTYPE+10, SETTYPE+11 |
HOW | GET~, GET+19, GET+22 |
IENS | SET~, SET+12, GET~, GET+20, GET+22, GET+23, GET+24 |
NTRNL | GETTYPE+5~, GETVFAIL+5~, GETVCON+5~ |
OUTPUT | GET~, GET+21! |
OUTPUT("E" | GET+24*, GET+25 |
OUTPUT("I" | GET+23* |
SYSPTR | GETTYPE~, GETTYPE+6, SETTYPE~, SETTYPE+6, GETVFAIL~, GETVFAIL+6, SETVFAIL~, SETVFAIL+6, GETVLOC~, GETVLOC+6 , SETVLOC~, SETVLOC+6, GETVCON~, GETVCON+6, SETVCON~, SETVCON+6, GETVSRV~, GETVSRV+6, SETVSRV~, SETVSRV+6 |
VALUE | SETTYPE~, SETTYPE+9, SETVFAIL~, SETVFAIL+8, SETVLOC~, SETVLOC+8, SETVCON~, SETVCON+8, SETVSRV~, SETVSRV+8 , SET~, SET+12 |
X | SETTYPE+5~, SETTYPE+11*, SETVFAIL+5~, SETVFAIL+8*, SETVLOC+5~, SETVLOC+8*, SETVCON+5~, SETVCON+8*, SETVSRV+5~, SETVSRV+8* |
XTRNL | GETTYPE+5~, GETTYPE+8*, GETTYPE+9, GETTYPE+10, GETVFAIL+5~, GETVFAIL+8*, GETVFAIL+9, GETVFAIL+10, GETVLOC+5~, GETVLOC+8* , GETVLOC+9, GETVLOC+10, GETVCON+5~, GETVCON+8*, GETVCON+9, GETVCON+10, GETVSRV+5~, GETVSRV+8*, GETVSRV+9, GETVSRV+10 , SET~, SET+13 |