VPSSRVY3 ;WOIFO/BT - VPS CLINICAL SURVEY QUESTIONNAIRE;01/16/15 13:07
Source file <VPSSRVY3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| UTGET(VPSDFN,TARGET,VPSQIEN,VPSQNM,VPSFDT,VPSTDT,VPSNUM) | ;
|
|
| GETRPT(VPSDFN,TARGET,VPSQIEN,VPSQNM,VPSFDT,VPSTDT,VPSNUM,AHFLG) | ;
|
|
| STARTHS | ;
|
|
| EX | ;
|
|
| PASSCHK(ID1,VPSQIEN,VPSQNM) | ;
; test is see if this is the survey being requested |
|
| GETDATA(VPSDFN,TID,FDT,VPSQNM) | ;
|
|
| ADD(TXT) | ;
|
|
| PDO(PTIEN,PDOARY) | ;
; create object and store the results of this clinical survey request |
|
| CLOSE | ;
; close the object |
|
| HSAHCAL | ;
; Entry point for including answer history and calculated values with the health summary ; AHFLG - is the flag for obtaining answer history |
|
| HSCAL | ;
; Entry point for including calculated values with the health summary ; CALC - is the flag for obtaining calcualted values |
|
| HS | ;
; Entry point for health summary ; VPSHSFLG - Flag that indicates health summary so the report is processed accordingly ; obtains key values that are provided by the CPRS call |
|
| PRINTHS(SURVEY) | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
