[613] | 1 | DVBCVSCK ;ALB/GTS-557/THM-VISUAL EXAM ; 6/27/91 2:11 PM
|
---|
| 2 | ;;2.7;AMIE;;Apr 10, 1995
|
---|
| 3 | ;
|
---|
| 4 | S PG=1,HD91="Department of Veterans Affairs",HD9=$S($D(CMBN):"Abbreviated",1:"Full")_" Exam Worksheet"
|
---|
| 5 | EN D:'$D(IOF) SETIOF W:(IOST?1"C-".E) @IOF
|
---|
| 6 | W !?25,HD91,!?22,"Compensation and Pension Examination",! W ?33,"# 1330 Worksheet" S HD7="VISUAL",HD8="For "_HD7 W !?(40-($L(HD9)\2)),HD9,!?(40-($L(HD8)\2)),HD8,!!
|
---|
| 7 | W "Name: ",NAME,?45,"SSN: ",SSN,!?45,"C-number: ",CNUM,!,"Date of exam: ____________________",!!,"Place of exam: ___________________",!!,"Type of Exam: ",HD7
|
---|
| 8 | W !!!!,"Narrative: "
|
---|
| 9 | S LX="TXT" F I=1:1 S LY=$T(@LX+I) Q:LY["END" W $P(LY,";;",2),!
|
---|
| 10 | W !!,"A. Medical history:",!!!!!!!!!
|
---|
| 11 | W !!,"B. Visual Acuity:",!!?44,"Near",?55,"Far",!?43,"______",?54,"______",!
|
---|
| 12 | W ?13,"Right Eye",?28,"Uncorrected",?42,"|______",?49,"|",?53,"|______",?60,"|",!!?43,"______",?54,"______",!?30,"Corrected",?42,"|______",?49,"|",?53,"|______",?60,"|",!!!
|
---|
| 13 | W ?44,"Near",?55,"Far",!?43,"______",?54,"______",!?13," Left Eye",?28,"Uncorrected",?42,"|______",?49,"|",?53,"|______",?60,"|",!!?43,"______",?54,"______",!?30,"Corrected",?42,"|______",?49,"|",?53,"|______",?60,"|",!!!
|
---|
| 14 | D HD2 S LX="TXT" D ^DVBCVSC1 W !!!!!
|
---|
| 15 | W "F. Diagnostic/clinical test results (other than visual acuity,visual fields",!,?4,"or diplopia):",!!!!!!!!!!,"G. Diagnosis:",!!!!!!!!!!
|
---|
| 16 | W ?25,"Signature: ______________________________",!!?30,"Date: _________________________",!
|
---|
| 17 | ;S LN22="Attachment - Visual Exam" W @IOF,!!?(80-$L(LN22)\2),LN22,!!! D ^DVBCVSC2 W !
|
---|
| 18 | K LN,LN1,LN22
|
---|
| 19 | Q
|
---|
| 20 | ;
|
---|
| 21 | HD2 S PG=PG+1 W @IOF,!,"Page: ",PG,!!,"Compensation and Pension Examination",!,HD8," for ",NAME,!!!
|
---|
| 22 | Q
|
---|
| 23 | ;
|
---|
| 24 | TXT ;
|
---|
| 25 | ;;For visual acuity worse than 5/200 in either or both eyes, report
|
---|
| 26 | ;; the distance in feet/inches (or meters/centimeters) from the face
|
---|
| 27 | ;; at which the veteran can count fingers/detect hand motion/read the
|
---|
| 28 | ;; largest line on the chart. If the veteran cannot detect hand motion
|
---|
| 29 | ;; or count fingers at any distance, state whether he/she has light
|
---|
| 30 | ;; perception.
|
---|
| 31 | ;;END
|
---|
| 32 | SETIOF ; ** Set device control var's
|
---|
| 33 | D HOME^%ZIS
|
---|
| 34 | Q
|
---|