DVBCPTS1 ;ALB ISC/THM-ATTACHMENT A FOR POST TRAUMATIC STRESS DISORDER ; 12/27/90 1:06 PM
;;2.7;AMIE;;Apr 10, 1995
EN S PG=0,DVBAX="Attachment A for Post-Traumatic Stress Disorder" W @IOF,!?(IOM-$L(DVBAX)\2),DVBAX,! S DVBAX="DSM-III-R Diagnostic Criteria for PTSD" W ?(IOM-$L(DVBAX)\2),DVBAX,!!!
F I=0:1 S LY=$T(TXT+I) Q:LY["END" W $P(LY,";;",2),!
D EN1 G Q
;
EN1 F I=0:1 S LY=$T(SECTB+I) Q:LY["END"!(LY="") W $P(LY,";;",2),! I $Y>55 D HD2^DVBCPTCK
Q K I,LY,DVBAX Q
;
TXT ;;A. The veteran has experienced an event that is outside the range of usual
;;human experience and that would be markedly distressing to almost anyone,
;;e.g., serious threat to one's life or physical integrity; serious threat
;;to one's children, spouse, or other close relatives and friends; sudden
;;destruction of one's home or community; seeing another person who has
;;recently been or being, seriously injured or killed as the result of an
;;accident or physical violence.
;;END
;;
SECTB ;;
;;B. The traumatic event is persistently re-experienced in at least one of the
;; following ways:
;;
;;
;; 1. recurrent and intrusive distressing recollections of the event
;;
;; 2. recurrent distressing dreams of the event
;;
;; 3. sudden acting or feeling as if the traumatic event were recurring
;; (includes a sense of reliving the experience, illusions, hallucinations
;; and dissociative [flashback] episodes, even those that occur upon waking
;; or when intoxicated)
;;
;; 4. intense psychological distress at exposure to events that symbolize or
;; resemble an aspect of the traumatic event, including anniversaries of
;; the trauma.
;;
;;C. Persistent avoidance of stimuli associated with the trauma or numbing of
;; general responsiveness (not present before the trauma), as indicated by
;; at least three of the following:
;;
;;
;; 1. efforts to avoid thoughts or feelings associated with the trauma
;;
;; 2. efforts to avoid activities or situations that arouse recollections
;; of the trauma
;;
;; 3. inability to recall an important aspect of the trauma (psychogenic
;; amnesia)
;;
;; 4. markedly diminished interest in significant activities
;;
;; 5. feeling of detachment or estrangement from others
;;
;; 6. restricted range of affect, e.g., unable to have love feelings
;;
;; 7. sense of a foreshortened future, e.g., does not expect to hava a
;; career, marriage, or children or a long life.
;;
;;
;;
;;
;;D. Persistent symptoms of increased arousal (not present before the trauma),
;; as indicated by at least two of the following:
;;
;;
;; 1. difficulty falling or staying asleep
;;
;; 2. irritability or outbursts of anger
;;
;; 3. difficulty concentrating
;;
;; 4. hypervigilance
;;
;; 5. exaggerated startle response
;;
;; 6. physiologic reactivity upon exposure to events that symbolize or
;; resemble an aspect of the traumatic event (e.g., a woman who was
;; raped in an elevator breaks out in a sweat when entering any elevator)
;;END
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HDVBCPTS1 3212 printed Dec 13, 2024@01:45:22 Page 2
DVBCPTS1 ;ALB ISC/THM-ATTACHMENT A FOR POST TRAUMATIC STRESS DISORDER ; 12/27/90 1:06 PM
+1 ;;2.7;AMIE;;Apr 10, 1995
EN SET PG=0
SET DVBAX="Attachment A for Post-Traumatic Stress Disorder"
WRITE @IOF,!?(IOM-$LENGTH(DVBAX)\2),DVBAX,!
SET DVBAX="DSM-III-R Diagnostic Criteria for PTSD"
WRITE ?(IOM-$LENGTH(DVBAX)\2),DVBAX,!!!
+1 FOR I=0:1
SET LY=$TEXT(TXT+I)
if LY["END"
QUIT
WRITE $PIECE(LY,";;",2),!
+2 DO EN1
GOTO Q
+3 ;
EN1 FOR I=0:1
SET LY=$TEXT(SECTB+I)
if LY["END"!(LY="")
QUIT
WRITE $PIECE(LY,";;",2),!
IF $Y>55
DO HD2^DVBCPTCK
Q KILL I,LY,DVBAX
QUIT
+1 ;
TXT ;;A. The veteran has experienced an event that is outside the range of usual
+1 ;;human experience and that would be markedly distressing to almost anyone,
+2 ;;e.g., serious threat to one's life or physical integrity; serious threat
+3 ;;to one's children, spouse, or other close relatives and friends; sudden
+4 ;;destruction of one's home or community; seeing another person who has
+5 ;;recently been or being, seriously injured or killed as the result of an
+6 ;;accident or physical violence.
+7 ;;END
+8 ;;
SECTB ;;
+1 ;;B. The traumatic event is persistently re-experienced in at least one of the
+2 ;; following ways:
+3 ;;
+4 ;;
+5 ;; 1. recurrent and intrusive distressing recollections of the event
+6 ;;
+7 ;; 2. recurrent distressing dreams of the event
+8 ;;
+9 ;; 3. sudden acting or feeling as if the traumatic event were recurring
+10 ;; (includes a sense of reliving the experience, illusions, hallucinations
+11 ;; and dissociative [flashback] episodes, even those that occur upon waking
+12 ;; or when intoxicated)
+13 ;;
+14 ;; 4. intense psychological distress at exposure to events that symbolize or
+15 ;; resemble an aspect of the traumatic event, including anniversaries of
+16 ;; the trauma.
+17 ;;
+18 ;;C. Persistent avoidance of stimuli associated with the trauma or numbing of
+19 ;; general responsiveness (not present before the trauma), as indicated by
+20 ;; at least three of the following:
+21 ;;
+22 ;;
+23 ;; 1. efforts to avoid thoughts or feelings associated with the trauma
+24 ;;
+25 ;; 2. efforts to avoid activities or situations that arouse recollections
+26 ;; of the trauma
+27 ;;
+28 ;; 3. inability to recall an important aspect of the trauma (psychogenic
+29 ;; amnesia)
+30 ;;
+31 ;; 4. markedly diminished interest in significant activities
+32 ;;
+33 ;; 5. feeling of detachment or estrangement from others
+34 ;;
+35 ;; 6. restricted range of affect, e.g., unable to have love feelings
+36 ;;
+37 ;; 7. sense of a foreshortened future, e.g., does not expect to hava a
+38 ;; career, marriage, or children or a long life.
+39 ;;
+40 ;;
+41 ;;
+42 ;;
+43 ;;D. Persistent symptoms of increased arousal (not present before the trauma),
+44 ;; as indicated by at least two of the following:
+45 ;;
+46 ;;
+47 ;; 1. difficulty falling or staying asleep
+48 ;;
+49 ;; 2. irritability or outbursts of anger
+50 ;;
+51 ;; 3. difficulty concentrating
+52 ;;
+53 ;; 4. hypervigilance
+54 ;;
+55 ;; 5. exaggerated startle response
+56 ;;
+57 ;; 6. physiologic reactivity upon exposure to events that symbolize or
+58 ;; resemble an aspect of the traumatic event (e.g., a woman who was
+59 ;; raped in an elevator breaks out in a sweat when entering any elevator)
+60 ;;END