VPRSDAG ;SLC/MKB -- SDA GMR utilities ;10/25/18 15:29
Source file <VPRSDAG.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PROBLEMS | ; -- Problem List query
 ; Expects DSTRT, DSTOP, DMAX from DDEGET and returns DLIST(#)=ien  | 
|
| PROB1(IEN) | ; -- get info for single problem [ID Action]
 | 
|
| SCTTEXT(CODE,IEN) | ; -- get Preferred Text for SCT Code
 | 
|
| PROBCMT(IEN) | ; -- return list of comments in
 ; DLIST(#) = id ^ date ^ user ^ type ^ facility ^ text  | 
|
| DELETED(IEN,FLD) | ; -- return 1 or 0, if FLD value was recently deleted
 | 
|
| FIMQ | ; -- Functional Independence Measurements query
 ; Expects DSTRT, DSTOP, DMAX from DDEGET ; Returns DLIST(#)=ien, VPRSITE array  | 
|
| DATE(X) | ; -- Return internal form of date X
 | 
|
| FIM1(IEN) | ; -- get info for one set of measurements [ID Action]
 | 
|
| FIMS | ; -- get DLIST(#)=name^value of each score
 ; Returns VPRFIMS = Assessment type(s) for ProblemDetail  | 
|
| TOTAL(NODE) | ; -- Return total of scores, or "" if incomplete
 | 
|
| VIT1(IEN) | ; -- get info for one Vital measurement, returns VPRGMV=^(0)
 | 
|
| VITQUAL | ; -- build DLIST(#)=Qualifiers [code^name]
 | 
|
| VITCODE(IEN,SFN) | ; -- return [first] code for vital type
 ; SubFileNumber = 120.518 for Vital Type ; 120.522 for Vital Qualifier  |