29 lines
2.0 KiB
Mathematica
29 lines
2.0 KiB
Mathematica
DVBCPWC2 ;ALB ISC/THM-POW PROTOCOL MENTAL DISORDER EXAM ; 5/6/91 9:40 AM
|
|
;;2.7;AMIE;;Apr 10, 1995
|
|
;
|
|
S PG=1,HD91="Department of Veterans Affairs",HD9="Full Exam Worksheet"
|
|
EN W @IOF,!?25,HD91,!?22,"Compensation and Pension Examination",! S HD7="MENTAL DISORDERS - POW PROTOCOL",HD8="For "_HD7 W !?(40-($L(HD9)\2)),HD9,!?(40-($L(HD8)\2)),HD8,!!!
|
|
W !,"Name: ",NAME,?45,"SSN: ",SSN,!?45,"C-number: ",CNUM,!,"Date of exam: ____________________",!!,"Place of exam: ___________________",!!,"Type of Exam: ",HD7
|
|
W !!,"Physician's Guide Reference: Chapter 14, 17, 20",!!,"Narrative: "
|
|
W !!,"A. Medical and occupational history:",!!
|
|
W ?8,"1. Immediate pre-military events -",!!!!!!!!!?8,"2. Events as a POW -",!!!!!!!!!?8,"3. Post-active service events (to present) -",!!!!!!!!!
|
|
W ?8,"4. Employment history prior to and following",!?11,"active service -" D HD2
|
|
W "B. Subjective complaints (include the veteran's history of unusually ",!?27,"traumatic events as a POW, if not elsewhere",!?27,"indicated) -",!!!!!!!!!!!!!!! W "C. Objective findings:",! D HD2
|
|
W "D. Specific evaluation information required by the rating board",!?4,"(if the information requested is included elsewhere, do not",!?4,"repeat here):",!!!
|
|
S LX="TXT1" F I=1:1 S LY=$T(@LX+I) Q:LY["$END" W $P(LY,";;",2),!
|
|
W !!!!!!!!!!!!,"E. Diagnosis:",!!!!!!!!!!!!?25,"Signature: ______________________________",!!?30,"Date: _________________________",!
|
|
K LN,LN1,LN2
|
|
G ^DVBCPWC3
|
|
;
|
|
HD2 S PG=PG+1 W @IOF,!,"Page: ",PG,!!,"Compensation and Pension Exam for ",HD7,!,"for ",NAME,!!!
|
|
Q
|
|
TXT1 ;
|
|
;; 1. State if the veteran is capable of managing his/her benefit
|
|
;; payments in the individual's own best interests without restriction
|
|
;; (a physical disability which prevents the veteran from attending
|
|
;; to financial matters in person is not a proper basis for a finding
|
|
;; of incompetency unless the veteran is, by reason of that disability,
|
|
;; incapable of directing someone else in handling the individual's
|
|
;; his financial affairs) -
|
|
;;$END
|