DGSDU ;ALB/TMP - ACRP API UTILITIES ; 12/8/97 15:09
Source file <DGSDU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SCAN(DGINDX,DGVAL,DGFILTER,DGCBK,DGCLOSE,DGQUERY,DGDIR) | ; Scan encounters
; *** NOTE *** When using this call, the variable passed as DGQUERY ; must be newed or killed in the callling program ; DGINDX = index name property of the query object ; DGVAL = array of data elements for start/end of search ; DGVAL("DFN") = patient DFN ; DGVAL("BDT") = begin date ; DGVAL("EDT") = end date ; DGVAL("VIS") = encounter file ien ; DGFILTER = the executable code to use to screen entries ; DGCBK = the executable scan callback code to create the result set ; DGCLOSE = Flag that says whether or not to close the QUERY object ; 1 = Perform close 0 or null = Do not close object ; DGQUERY = the # of the current query, if not a new query. If passed by ; reference and query closed, this variable will be nulled ; DGDIR = the direction of the scan (optional) ; null, undefined or FORWARD : Scan forwards ; BACKWARD : Scan backwards |
|
SCANQ | ||
CLOSE(DGQUERY) | ; Close the query
|
|
CLOSEQ | ||
SETINDX(DGQUERY,DGINDX) | ;
|
|
PAT | ; Verify patient
|
|
DATE | ; Verify date range
|
|
VIS | ; Verify visit
|
|
SCE(DGOE,PC,NODE,ZXERR) | ; Returns the specific piece or entire node of the enctr
; NODE = the node to return ... if undefined, the 0-node is assumed ; If PC is null or undefined, the whole node is returned, otherwise ; just the PC-piece is returned ; DGERR = the name of the array where errors should be passed back in ; (pass in quotes I.E.: "DGERR"). If no name passed, errors are ; not returned |