©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETVCON(SYSPTR) | ;Get value of VUID SERVER CONNECTION TYPE field (#13)
; Input : 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) |
|
| 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) |
|
| 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) |
|
| 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) |
|
| 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) |
|
| 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 |
|
| GETVFAIL(SYSPTR) | ;Get value of DISABLE VUID ACTIVITY field (#11)
; Input : 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) |
|
| GETVSRV(SYSPTR) | ;Get value of VUID SERVER OPTION field (#21)
; 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) |
| 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 |