GLOBAL MAP DATA DICTIONARY #394.71 -- VAQ - DATA SEGMENT FILE 9/29/25 PAGE 1
STORED IN ^VAT(394.71, (85 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.5)
-----------------------------------------------------------------------------------------------------------------------------------
This file defines each data segment currently supported by PDX.
Global format of Extraction Array:
Root@("VALUE",file,field,sequence number)=value
Root@("ID",file,field,sequence number)=identifier
Extraction methods must account for data encryption.
Display methods must take the output of their associated extraction method as input.
Global format of Display Array:
Root@("DISPLAY",line number,0)=information displayed on specified
line number of screen
Methods must use the following parameters (where needed):
ROOT - Where to store the information (full global reference)
DFN - Internal file number for requested patient (pointer to PATIENT
File)
SEGPTR - Internal file number of segment (pointer to VAQ - DATA
SEGMENT File)
XTRCT - Where the extracted information resides (full global
reference)
OFFSET - Where line numbering should begin from
TIMLIM - Time limit to apply to extraction
OCCLIM - Occurrence limit to apply to extraction
Methods must return the following:
0 - Extraction was successful (if an Extraction Array was returned)
n - Number of lines in display (if a Display Array was returned)
-1^ErrorText - Method was not successful
Sample methods:
$$EXTRACT^VAQZZZ(DFN,SEGPTR,TIMLIM,OCCLIM,ROOT,OFFSET) - Display
Array is
returned
$$EXTRACT^VAQZZZ(DFN,SEGPTR,TIMLIM,OCCLIM,ROOT) - Extraction Array
is returned
$$DISPLAY^VAQZZZ(XTRCT,SEGPTR,ROOT,OFFSET) - Display Array, built from
input extraction array,
is returned
Sample use:
S ROOT="^TMP(""VAQ"","_$J_")"
S SEGPTR=internal file number for segment
S DFN=internal file number of patient
S TIMLIM=time limit to use when extracting segment (if applicable)
S OCCLIM=occurrence limit to use when extracting segment (if
applicable)
X ("S X="_^VAT(394.71,SEGPTR,"XRTN"))
The variable X is now set to the proper exit code (X<0 on error)
CROSS
REFERENCED BY: Data Segment Name(B), Abbreviation(C), Data Segment Name(D)
^VAT(394.71,D0,0)= (#.01) Data Segment Name [1F] ^ (#.02) Abbreviation [2F] ^ (#.03) Extract Is Display Ready [3S] ^ (#.04)
==>Health Summary Component [4P:142.1] ^ (#.05) Maximum Time Limit [5F] ^ (#.06) Maximum Occurrence Limit [6N] ^
^VAT(394.71,D0,DRTN)= (#20) Display Method [E1,240F] ^
^VAT(394.71,D0,XRTN)= (#10) Extraction Method [E1,240F] ^
INPUT TEMPLATE(S):
^DIE(950)= VAQ EDIT FILE
PRINT TEMPLATE(S):
^DIPT(499)= VAQ DATA SEGMENT LIST
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):