[613] | 1 | SPNMSHLP ;WDE/SD PRINT MS DESCRIPTIONS;04/18/2000
|
---|
| 2 | ;;2.0;Spinal Cord Dysfunction;**12,13**;01/02/1997
|
---|
| 3 | ;;
|
---|
| 4 | EN1 ; Main Entry Point
|
---|
| 5 | S SPNPAGE=1
|
---|
| 6 | S SPNLEXIT=0
|
---|
| 7 | W !!,"Display expanded Multiple Sclerosis descriptions",!
|
---|
| 8 | S ZTSAVE("SPN*")=""
|
---|
| 9 | D DEVICE^SPNPRTMT("PRINT^SPNMSHLP","Print MS Descriptions",.ZTSAVE) Q:SPNLEXIT
|
---|
| 10 | I SPNIO="Q" D EXIT Q ; Print was Queued
|
---|
| 11 | I IO'="" D PRINT D EXIT Q ; Print was not Queued
|
---|
| 12 | Q
|
---|
| 13 | EXIT ; Exit routine
|
---|
| 14 | K SPNPAGE,SPNEXIT,ZTSAVE,SPN,DIR,Y
|
---|
| 15 | Q
|
---|
| 16 | PRINT ; Print main Body
|
---|
| 17 | U IO
|
---|
| 18 | S Y=DT X ^DD("DD") S SPNDATE=Y
|
---|
| 19 | D HEAD
|
---|
| 20 | F SPN=1:1:1000 Q:$T(TEXT+SPN)="" D Q:SPNLEXIT=1
|
---|
| 21 | .I $Y>(IOSL-5) D HEAD
|
---|
| 22 | .W !,$P($T(TEXT+SPN),";;",2)
|
---|
| 23 | I $E(IOST,1)="C" I SPNLEXIT=0 N DIR S DIR(0)="E" D ^DIR K Y
|
---|
| 24 | D CLOSE^SPNPRTMT
|
---|
| 25 | Q
|
---|
| 26 | HEAD ; Header Print
|
---|
| 27 | I SPNPAGE'=1 Q:$Y<(IOSL-4)
|
---|
| 28 | I $E(IOST,1)="P" I SPNPAGE'=1 W #
|
---|
| 29 | I $E(IOST,1)="C" D Q:SPNLEXIT
|
---|
| 30 | .I SPNPAGE=1 W @IOF Q
|
---|
| 31 | .I SPNPAGE'=1 D Q:SPNLEXIT
|
---|
| 32 | ..N DIR S DIR(0)="E" D ^DIR I 'Y S SPNLEXIT=1,SPN=1000
|
---|
| 33 | ..K Y
|
---|
| 34 | ..W @IOF
|
---|
| 35 | ..Q
|
---|
| 36 | .Q
|
---|
| 37 | Q:SPNLEXIT
|
---|
| 38 | W !?10,"MS Expanded Help Text"
|
---|
| 39 | W ?50,"Page: ",SPNPAGE," ",SPNDATE
|
---|
| 40 | W !,$$REPEAT^XLFSTR("-",79)
|
---|
| 41 | S SPNPAGE=SPNPAGE+1
|
---|
| 42 | I $D(ZTQUEUED) S:$$STPCK^SPNPRTMT SPNLEXIT=1
|
---|
| 43 | Q:SPNLEXIT
|
---|
| 44 | Q
|
---|
| 45 | TEXT ;
|
---|
| 46 | ;; PYRAMIDAL
|
---|
| 47 | ;; =========
|
---|
| 48 | ;;Normal
|
---|
| 49 | ;;Abnormal Signs without disability.
|
---|
| 50 | ;;Minimal disability.
|
---|
| 51 | ;;Mild to moderate paraparesis or hemiparesis; severe monoparesis.
|
---|
| 52 | ;;Marked paraparesis or hemiparesis; moderate quadriparesis, or
|
---|
| 53 | ;; monoplegia.
|
---|
| 54 | ;;Paraplegia, hemiplegia, or marked quadriparesis.
|
---|
| 55 | ;;Quadriplegia.
|
---|
| 56 | ;;Unknown
|
---|
| 57 | ;;
|
---|
| 58 | ;; BRAINSTEM
|
---|
| 59 | ;; =========
|
---|
| 60 | ;;Normal
|
---|
| 61 | ;;Signs only.
|
---|
| 62 | ;;Moderate nystagmus or other mild disability.
|
---|
| 63 | ;;Severe nystagmus, marked extraocular weakness.
|
---|
| 64 | ;;Marked dysarthria.
|
---|
| 65 | ;;Inability to swallow or speak.
|
---|
| 66 | ;;Unknown
|
---|
| 67 | ;;
|
---|
| 68 | ;; SENSORY
|
---|
| 69 | ;; =======
|
---|
| 70 | ;;Normal
|
---|
| 71 | ;;Vibration or finger-writing decrease only, in 1 or 2 limbs.
|
---|
| 72 | ;;Mild decrease in touch or pain or position sense, and/or
|
---|
| 73 | ;; moderate decrease in vibration in 1 or 2 limbs or vibration
|
---|
| 74 | ;; decrease alone in 3 or 4 limbs.
|
---|
| 75 | ;;Moderate decrease in touch or pain or position sense, and/or
|
---|
| 76 | ;; essentially lost vibration in 1 or 2 limbs; mild decrease in
|
---|
| 77 | ;; touch or pain and/or moderate decrease in all proprioceptive
|
---|
| 78 | ;; tests in 3 or 4 limbs.
|
---|
| 79 | ;;Marked decrease in touch or pain or loss of proprioception, alone
|
---|
| 80 | ;; or combined, in 1 or 2 limbs; or moderate decrease in touch or
|
---|
| 81 | ;; pain and/or severe proprioception decrease in more than 2 limbs.
|
---|
| 82 | ;;Sensation essentially lost below head.
|
---|
| 83 | ;;Unknown
|
---|
| 84 | ;;
|
---|
| 85 | ;; CEREBRAL
|
---|
| 86 | ;; ========
|
---|
| 87 | ;;Normal
|
---|
| 88 | ;;Mood alteration only.
|
---|
| 89 | ;;Mild decrease in mentation.
|
---|
| 90 | ;;Moderate decrease in mentation.
|
---|
| 91 | ;;Marked decrease in mentation.
|
---|
| 92 | ;;Dementia or chronic brain syndrome.
|
---|
| 93 | ;;Unknown
|
---|
| 94 | ;;
|
---|
| 95 | ;; CEREBELLAR
|
---|
| 96 | ;; ==========
|
---|
| 97 | ;;Normal
|
---|
| 98 | ;;Abnormal signs without disability.
|
---|
| 99 | ;;Mild ataxia.
|
---|
| 100 | ;;Moderate truncal or limb ataxia (tremor or clumsy movements
|
---|
| 101 | ;; interfere with function in all spheres).
|
---|
| 102 | ;;Severe ataxia in all limbs (most function is very difficult).
|
---|
| 103 | ;;Unable to perform coordinated movements due to ataxia.
|
---|
| 104 | ;;Weakness (grade 3 or more on pyramidal) interferes with testing.
|
---|
| 105 | ;;Unknown
|
---|
| 106 | ;;
|
---|
| 107 | ;; BOWEL & BLADDER
|
---|
| 108 | ;; ===============
|
---|
| 109 | ;;Normal
|
---|
| 110 | ;;Mild hesitancy.
|
---|
| 111 | ;;Moderate hesitance, urgency, retention or rare incontinence
|
---|
| 112 | ;; (intermittent self-catheterization, manual compression to
|
---|
| 113 | ;; evacuate bladder or finger evacuation of stool).
|
---|
| 114 | ;;Frequent urinary incontinence.
|
---|
| 115 | ;;In need of almost constant catheterization (and constant use of
|
---|
| 116 | ;; measure to evacuate stool).
|
---|
| 117 | ;;Loss of bladder function.
|
---|
| 118 | ;;Loss of bladder and bowel function.
|
---|
| 119 | ;;Unknown
|
---|
| 120 | ;;
|
---|
| 121 | ;; VISUAL
|
---|
| 122 | ;; ======
|
---|
| 123 | ;;Normal
|
---|
| 124 | ;;Scotoma with visual acuity (corrected) better than 20/30.
|
---|
| 125 | ;;Worse eye with scotoma with maximum visual acuity (corrected) or
|
---|
| 126 | ;; 20/30 to 20/59.
|
---|
| 127 | ;;Worse eye with large scotoma, or moderate decrease in fields, but
|
---|
| 128 | ;; with maximal visual acuity of 20/60 to 20/99.
|
---|
| 129 | ;;Worse eye with marked decrease of fields and maximal visual acuity
|
---|
| 130 | ;; (corrected) of 20/100 to 20/200; grade 3 plus maximal acuity
|
---|
| 131 | ;; better eye 20/60 or less.
|
---|
| 132 | ;;Worse eye with maximal visual acuity or (corrected) less than
|
---|
| 133 | ;; 20/20; grade 4 plus maximal acuity of better eye 20/60 or less.
|
---|
| 134 | ;;Grade 5 plus maximal visual acuity of better eye 20/60 or less.
|
---|
| 135 | ;;Presence of temporal pallor.
|
---|
| 136 | ;;Unknown
|
---|
| 137 | ;;
|
---|
| 138 | ;; OTHER
|
---|
| 139 | ;; =====
|
---|
| 140 | ;;None
|
---|
| 141 | ;;Any other neurological finding attributed to MS.
|
---|
| 142 | ;;Unknown
|
---|
| 143 | ;;
|
---|
| 144 | ;; EDSS
|
---|
| 145 | ;; ====
|
---|
| 146 | ;;Normal neurological exam.
|
---|
| 147 | ;;No disability, minimal signs in one FS.
|
---|
| 148 | ;;No disability, minimal signs in more than one FS.
|
---|
| 149 | ;;Minimal disability in one FS.
|
---|
| 150 | ;;Minimal disability on two FS.
|
---|
| 151 | ;;Moderate disability in one FS.
|
---|
| 152 | ;;Fully ambulatory but with moderate disability in one FS and one
|
---|
| 153 | ;; or two FSs grade 2; or two FSs grade 3; or five FSs grade 2.
|
---|
| 154 | ;;Fully ambulatory without aid, self-sufficient, up and about some
|
---|
| 155 | ;; 12 hrs despite relatively severe disability consisting of one FS
|
---|
| 156 | ;; grade 4, or combinations of lesser grades exceeding limits of
|
---|
| 157 | ;; previous steps.
|
---|
| 158 | ;;Fully ambulatory without aid up and about much of the day, able to
|
---|
| 159 | ;; work full day may otherwise have some limitations of full activity
|
---|
| 160 | ;; or require minimal assistance.
|
---|
| 161 | ;;Ambulatory without aid or rest for about 200 meters, disability severe
|
---|
| 162 | ;; enough to impair full daily activity.
|
---|
| 163 | ;;Ambulatory without aid or rest for about 100 meters, disability severe
|
---|
| 164 | ;; enough to preclude full daily activity.
|
---|
| 165 | ;;Intermittent or unilateral constraint assistance (cane, crutch, brace)
|
---|
| 166 | ;; required to walk about 100 meters with or without resting.
|
---|
| 167 | ;;Constant bilateral assistant (cane, crutches, brace) required to walk
|
---|
| 168 | ;; about 20 meters without resting.
|
---|
| 169 | ;;Unable to walk beyond about 5 meters even with aid; essentially
|
---|
| 170 | ;; restricted to wheelchair, wheels self in standard wheelchair and
|
---|
| 171 | ;; transfers alone; up and about in wheelchair some 12 hours a day.
|
---|
| 172 | ;;Unable to take more than a few steps; restricted to wheelchair; may
|
---|
| 173 | ;; need aid in transfer; wheels self, but cannot carry on in standard
|
---|
| 174 | ;; wheelchair a full day; may require motorized wheelchair.
|
---|
| 175 | ;;Essentially restricted to bed or chair or perambulated in wheelchair,
|
---|
| 176 | ;; but may be out of bed himself/herself much of the day; retains
|
---|
| 177 | ;; many self-care functions; generally has effective use of arms.
|
---|
| 178 | ;;Essentially restricted to bed much of the day; has some effective use
|
---|
| 179 | ;; of arms; retains some self-care functions.
|
---|
| 180 | ;;Helpless bed patient; can communicate and eat.
|
---|
| 181 | ;;Totally helpless bed patient; unable to communicate effectively or
|
---|
| 182 | ;; eat/swallow.
|
---|
| 183 | ;;Death due to MS
|
---|