REVO2700 DSM-4 P9setProp writable what if word 1 of the target <> "field" then exit writable set the locktext of the target to not what set the traversalon of the target to what set the autohilite of the target to what end writable getProp writable if word 1 of the target <> "field" then exit writable return the traversalon of the target end writable function sr str return word 1 to (the number of words of str) of str end sr function q str return quote & str & quote end q function howMany tg,ctr -- returns how many instances of string tg in string ctr put offsets(tg,ctr) into mosList if mosList = "0" then put "" into mosList return the number of items of mosList end howMany function offsets str,ctr put "" into mosList put 0 into startPoint repeat put offset(str,ctr,startPoint) into os if os = 0 then if mosList = "" then put 0 into mosList exit repeat end if put os + startPoint & comma after mosList put os + startPoint into startPoint end repeat if last char of mosList = "," then delete last char of mosList return mosList end offsets on lineOffsets str,ctr put offsets(str,ctr) into charList if charList = "0" then return "0" put the number of items of charList into nbr put "" into mlo repeat with n = 1 to nbr put the number of lines of (char 1 to (item n of charList) of ctr) & "," after mlo end repeat if char -1 of mlo = "," then delete char -1 of mlo return mlo end lineOffsets on doFind put fld "findStr" into str if str = empty then exit doFind find string str in fld "codes" if the result <> empty then beep end doFind on doBox tLine set the itemdelimiter to tab put item 3 of line tLine of fld "codes" into tDxNbr if tDxNbr is not a number then exit doBox lock screen put the scroll of fld "codes" into scr repeat find whole tDxNbr in fld "codes" put word 2 of the foundline into L if L= tLine then exit repeat if the commandkey is down then exit repeat end repeat set the scroll of fld "codes" to scr unlock screen end doBox on mousemove if "button" is in the long name of the target then set the defaultcursor to hand else pass mousemove end if end mousemove on mouseLeave set the defaultcursor to empty end mouseLeave function fixDxForProp dxText put offset("[",dxText) into b if b <> 0 then delete char b-1 to -1 of dxText end if replace tab with "|" in dxText replace space with "_" in dxText return dxText end fixDxForProp on setupticks put the number of lines of fld "codes" into nbr set the itemdelimiter to tab repeat with n = 1 to nbr -- if char 2 of word 1 of line n of fld "codes" is not a number then next repeat -- put item 3 to -1 of line n of fld "codes" into tDx -- replace "*" with empty in tDx -- put fixDxForProp(tDx) into dxProp -- put the modifiers[dxProp] of this stack into tMods -- put the ICD9[dxProp] of this stack into tICD -- if tMods <> empty then -- put " " into item 2 of line n of fld "codes" -- put tDx into item 3 to -1 of line n of fld "codes" -- end if -- if tICD <> empty then -- put " " into item 1 of line n of fld "codes" -- end if put item 2 of line n of fld "codes" into modItem if modItem contains "" then put " " into item 2 of line n of fld "codes" end repeat answer "done" as sheet end setupticks on commandkeydown which switch which case "w" if the environment = "development" then close this stack else quit end if break case "q" quit break case "f" select text of fld "findStr" break case "g" put fld "findStr" into fs if fs = empty then beep else find string fs in fld "codes" break default pass commandkeydown end switch end commandkeydown = @ DSM Assistant " U Lucida Grande U Lucida Grande U Times U Times U Arial U Arial W Arial U Arial W Arial W Times U Times U Times U Times W Times W Times U Bookman Old Style U GrTimes W Bookman Old Style @U Bookman Old Style U Bookman Old Style U Times U Arial W Arial U Osaka,Japanese U Times W Monaco U Monaco U Times New Roman U Times New Roman U Times New Roman W Times New Roman U Monaco U Apple Braille Pinpoint 6 Dot U Apple Braille Pinpoint 6 Dot modifiers 302.74|Male_orgasmic_disorder llifelong type acquired type - generalized situational - due to psychological factors due to combined factors304.40|Amphetamine_dependence with physiological dependence without physiological dependence - early partial remission sustained partial remission early full remission sustained full remission - on agonist therapy - in a controlled environment#309.21|Separation_anxiety_disorder early onset*292.89|Amphetamine-induced_sleep_disorder wwith onset during intoxication with onset during withdrawal - insomnia type hypersomnia type parasomnia type mixed type&292.89|Cocaine-induced_sleep_disorder wwith onset during intoxication with onset during withdrawal - insomnia type hypersomnia type parasomnia type mixed type300.29|Specific_phobia \animal type natural environment type blood-injection-injury type situational type other typeT292.12|Other_(or_unknown)_substance-induced_psychotic_disorder,_with_hallucinations ;with onset during intoxication with onset during withdrawal.296.21|Major_depression,_single_episode,_mild fchronic with catatonic features with melancholic features with atypical features with postpartum onset9307.60|Enuresis_(not_due_to_a_general_medical_condition) 0nocturnal only diurnal only nocturnal && diurnalH296.66|Bipolar_I_disorder,_most_recent_episode_mixed,_in_full_remission with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recoveryY296.63|Bipolar_I_disorder,_most_recent_episode_mixed,_severe,_without_psychotic_features with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recoveryC296.06|Bipolar_I_disorder,_single_manic_episode,_in_full_remission -with catatonic features with postpartum onset'292.89|Caffeine-induced_sleep_disorder onset during intoxicationC296.52|Bipolar_I_disorder,_most_recent_episode_depressed,_moderate chronic with catatonic features with melancholic features with atypical features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery.290.43|Vascular_dementia,_with_depressed_mood with behavioral disturbance0296.30|Major_depression,_recurrent,_unspecified chronic with catatonic features with melancholic features with atypical features with postpartum onset - with seasonal pattern - with full interepisode recovery without full interepisode recoveryG296.33|Major_depression,_recurrent,_severe,_without_psychotic_features chronic with catatonic features with melancholic features with atypical features with postpartum onset - with seasonal pattern - with full interepisode recovery without full interepisode recovery3306.51|Vaginismus_(not_due_to_a_medical_condition) llifelong type acquired type - generalized situational - due to psychological factors due to combined factors300.23|Social_phobia generalized/304.10|Sedative-hypnotic/anxiolytic_dependence with physiological dependence without physiological dependence - early partial remission sustained partial remission early full remission sustained full remission - on agonist therapy - in a controlled environment5296.20|Major_depression,_single_episode,_unspecified fchronic with catatonic features with melancholic features with atypical features with postpartum onset)292.89|Opioid-induced_sexual_dysfunction qwith onset during intoxication - with impaired desire with impaired arousal with impaired orgasm with sexual pain%291.89|Alcohol-induced_mood_disorder ~with onset during intoxication with onset during withdrawal - with depressive symptoms with manic symptoms with mixed symptoms304.00|Opioid_dependence with physiological dependence without physiological dependence - early partial remission sustained partial remission early full remission sustained full remission - on agonist therapy - in a controlled environment*291.80|Alcohol-induced_sexual_dysfunction qwith onset during intoxication - with impaired desire with impaired arousal with impaired orgasm with sexual pain 302.73|Female_orgasmic_disorder llifelong type acquired type - generalized situational - due to psychological factors due to combined factors;296.70|Bipolar_I_disorder,_most_recent_episode_unspecified owith rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recoveryK296.65|Bipolar_I_disorder,_most_recent_episode_mixed,_in_partial_remission with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery307.44|Primary_hypersomnia recurrentY296.43|Bipolar_I_disorder,_most_recent_episode_manic,_severe,_without_psychotic_features with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery&292.84|Inhalant-induced_mood_disorder awith onset during intoxication - with depressive symptoms with manic symptoms with mixed symptomsE292.12|Phencyclidine-induced_psychotic_disorder,_with_hallucinations with onset during intoxication?291.30|Alcohol-induced_psychotic_disorder,_with_hallucinations ;with onset during intoxication with onset during withdrawal>296.25|Major_depression,_single_episode,_in_partial_remission fchronic with catatonic features with melancholic features with atypical features with postpartum onset:291.50|Alcohol-induced_psychotic_disorder,_with_delusions ;with onset during intoxication with onset during withdrawal%309.81|Posttraumatic_stress_disorder acute chronic - delayed onset%295.20|Schizophrenia,_catatonic_type with prominent negative symptoms - episodic with interepisode residual symptoms episodic with no interepisode residual symptoms continuous single episode in partial remission single episode in full remission other or unspecified pattern302.72|Male_erectile_disorder llifelong type acquired type - generalized situational - due to psychological factors due to combined factors>292.11|Amphetamine-induced_psychotic_disorder,_with_delusions with onset during intoxication292.89|Cocaine_intoxication with perceptual disturbances300.70|Hypochondriasis poor insight&302.72|Female_sexual_arousal_disorder llifelong type acquired type - generalized situational - due to psychological factors due to combined factorsF296.05|Bipolar_I_disorder,_single_manic_episode,_in_partial_remission -with catatonic features with postpartum onset9296.40|Bipolar_I_disorder,_most_recent_episode_hypomanic owith rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recoveryI296.24|Major_depression,_single_episode,_severe,_with_psychotic_features chronic with catatonic features with melancholic features with atypical features with postpartum onset - mood-congruent psychotic features mood-incongruent psychotic featuresB296.40|Bipolar_I_disorder,_most_recent_episode_manic,_unspecified with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery$295.30|Schizophrenia,_paranoid_type with prominent negative symptoms - episodic with interepisode residual symptoms episodic with no interepisode residual symptoms continuous single episode in partial remission single episode in full remission other or unspecified patternQ296.04|Bipolar_I_disorder,_single_manic_episode,_severe,_with_psychotic_features uwith catatonic features with postpartum onset - mood-congruent psychotic features mood-incongruent psychotic features?296.62|Bipolar_I_disorder,_most_recent_episode_mixed,_moderate with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery%307.30|Stereotypic_movement_disorder with self-injurious behaviorL296.56|Bipolar_I_disorder,_most_recent_episode_depressed,_in_full_remission chronic with catatonic features with melancholic features with atypical features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery9302.85|Gender_identity_disorder_in_adolescents_or_adults rsexually attracted to males sexually attracted to females sexually attracted to both sexually attracted to neither312.80|Conduct_disorder Achildhood-onset type adolescent-onset type - mild moderate severeV296.44|Bipolar_I_disorder,_most_recent_episode_manic,_severe,_with_psychotic_features with catatonic features with postpartum onset - mood-congruent psychotic features mood-incongruent psychotic features - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery304.30|Cannabis_dependence with physiological dependence without physiological dependence - early partial remission sustained partial remission early full remission sustained full remission - in a controlled environment302.75|Premature_ejaculation llifelong type acquired type - generalized situational - due to psychological factors due to combined factors(290.41|Vascular_dementia,_with_delerium with behavioral disturbance;292.89|Sedative-hypnotic/anxiolytic-induced_sleep_disorder wwith onset during intoxication with onset during withdrawal - insomnia type hypersomnia type parasomnia type mixed type300.11|Conversion_disorder rwith motor symptom or deficit with sensory symptom or deficit with seizures or convulsions with mixed presentation.292.89|Amphetamine-induced_sexual_dysfunction qwith onset during intoxication - with impaired desire with impaired arousal with impaired orgasm with sexual pain9290.30|Dementia_(Alzheimer's),_late_onset,_with_delerium with behavioral disturbance:290.10|Dementia_(Alzheimer's),_early_onset,_uncomplicated with behavioral disturbance,295.90|Schizophrenia,_undifferentiated_type with prominent negative symptoms - episodic with interepisode residual symptoms episodic with no interepisode residual symptoms continuous single episode in partial remission single episode in full remission other or unspecified patternT292.12|Sedative-hypnotic/anxiolytic-induced_psychotic_disorder,_with_hallucinations ;with onset during intoxication with onset during withdrawal/292.00|Other_(or_unknown)_substance_withdrawal with perceptual disturbances/292.00|Sedative-hypnotic/anxiolytic_withdrawal with perceptual disturbances)296.31|Major_depression,_recurrent,_mild chronic with catatonic features with melancholic features with atypical features with postpartum onset - with seasonal pattern - with full interepisode recovery without full interepisode recovery>292.12|Opioid-induced_psychotic_disorder,_with_hallucinations with onset during intoxicationZ296.54|Bipolar_I_disorder,_most_recent_episode_depressed,_severe,_with_psychotic_features chronic with catatonic features with melancholic features with atypical features with postpartum onset - mood-congruent psychotic features mood-incongruent psychotic features - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery$295.60|Schizophrenia,_residual_type with prominent negative symptoms - episodic with interepisode residual symptoms episodic with no interepisode residual symptoms continuous single episode in partial remission single episode in full remission other or unspecified pattern@290.13|Dementia_(Alzheimer's),_early_onset,_with_depressed_mood with behavioral disturbance296.89|Bipolar_II_disorder current or most recent episode hypomanic current or most recent episode depressed - mild moderate severe, without psychotic features severe, with psychotic features in partial remission in full remission - chronic with catatonic features with melancholic features with atypical features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery9296.35|Major_depression,_recurrent,_in_partial_remission chronic with catatonic features with melancholic features with atypical features with postpartum onset - with seasonal pattern - with full interepisode recovery without full interepisode recoveryB296.60|Bipolar_I_disorder,_most_recent_episode_mixed,_unspecified with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery(290.40|Vascular_dementia,_uncomplicated with behavioral disturbance9290.00|Dementia_(Alzheimer's),_late_onset,_uncomplicated with behavioral disturbanceB313.89|Reactive_attachment_disorder_of_infancy_or_early_childhood inhibited type disinhibited typeC292.12|Amphetamine-induced_psychotic_disorder,_with_hallucinations with onset during intoxication$292.84|Opioid-induced_mood_disorder awith onset during intoxication - with depressive symptoms with manic symptoms with mixed symptoms6296.36|Major_depression,_recurrent,_in_full_remission chronic with catatonic features with melancholic features with atypical features with postpartum onset - with seasonal pattern - with full interepisode recovery without full interepisode recovery294.00|Amnestic_disorder_2_ transient chronicH296.46|Bipolar_I_disorder,_most_recent_episode_manic,_in_full_remission with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recoveryK296.45|Bipolar_I_disorder,_most_recent_episode_manic,_in_partial_remission with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery&291.80|Alcohol-induced_sleep_disorder wwith onset during intoxication with onset during withdrawal - insomnia type hypersomnia type parasomnia type mixed type&291.89|Alcohol-induced_sleep_disorder wwith onset during intoxication with onset during withdrawal - insomnia type hypersomnia type parasomnia type mixed type,292.89|Amphetamine-induced_anxiety_disorder swith onset during intoxication - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms:290.20|Dementia_(Alzheimer's),_late_onset,_with_delusions with behavioral disturbance?296.42|Bipolar_I_disorder,_most_recent_episode_manic,_moderate with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery;296.26|Major_depression,_single_episode,_in_full_remission fchronic with catatonic features with melancholic features with atypical features with postpartum onset=296.00|Bipolar_I_disorder,_single_manic_episode,_unspecified -with catatonic features with postpartum onset*292.84|Hallucinogen-induced_mood_disorder awith onset during intoxication - with depressive symptoms with manic symptoms with mixed symptoms=292.89|Other_(or_unknown)_substance-induced_anxiety_disorder with onset during intoxication with onset during withdrawal - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms307.21|Transient_tic_disorder single episode recurrent292.89|Opioid_intoxication with perceptual disturbances.292.89|Phencyclidine-induced_anxiety_disorder swith onset during intoxication - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms-292.89|Hallucinogen-induced_anxiety_disorder swith onset during intoxication - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms:290.11|Dementia_(Alzheimer's),_early_onset,_with_delerium with behavioral disturbance;292.89|Other_(or_unknown)_substance-induced_sleep_disorder wwith onset during intoxication with onset during withdrawal - insomnia type hypersomnia type parasomnia type mixed type293.89|Anxiety_disorder_2_... =with generalized anxiety with panic attacks with OCD symptomsV296.64|Bipolar_I_disorder,_most_recent_episode_mixed,_severe,_with_psychotic_features with catatonic features with postpartum onset - mood-congruent psychotic features mood-incongruent psychotic features - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery(291.80|Alcohol-induced_anxiety_disorder with onset during intoxication with onset during withdrawal - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms6296.01|Bipolar_I_disorder,_single_manic_episode,_mild -with catatonic features with postpartum onset)292.84|Amphetamine-induced_mood_disorder ~with onset during intoxication with onset during withdrawal - with depressive symptoms with manic symptoms with mixed symptoms"292.89|Phencyclidine_intoxication with perceptual disturbancesS307.89|Pain_disorder_associated_with_psychological_factors_and_a_medical_condition acute chronic9292.11|Opioid-induced_psychotic_disorder,_with_delusions with onset during intoxication;290.12|Dementia_(Alzheimer's),_early_onset,_with_delusions with behavioral disturbance302.20|Pedophilia sexually attracted to males sexually attracted to females sexually attracted to both - limited to incest - exclusive type non-exclusive type307.10|Anorexia_nervosa +restricting type binge-eating//purging type?296.51|Bipolar_I_disorder,_most_recent_episode_depressed,_mild chronic with catatonic features with melancholic features with atypical features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery"295.90|Schizophrenia,_unspecified with prominent negative symptoms - episodic with interepisode residual symptoms episodic with no interepisode residual symptoms continuous single episode in partial remission single episode in full remission other or unspecified pattern 295.70|Schizoaffective_disorder bipolar type depressive type;296.41|Bipolar_I_disorder,_most_recent_episode_manic,_mild with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery4302.76|Dyspareunia_(not_due_to_a_medical_condition) llifelong type acquired type - generalized situational - due to psychological factors due to combined factors310.10|Personality_change_2_ tlabile type disinhibited type aggressive type apathetic type paranoid type other type combined type unspecified type297.10|Delusional_disorder eerotomanic type grandiose type jealous type persecutory type somatic type mixed type unspecified type'307.45|Circadian_rhythm_sleep_disorder Fdelayed sleep phase type jet lag type shift work type unspecified type%300.30|Obsessive-compulsive_disorder with poor insight300.40|Dysthymic_disorder 0early onset laste onset - with atypical features291.80|Alcohol_withdrawal with perceptual disturbances:292.84|Other_(or_unknown)_substance-induced_mood_disorder ~with onset during intoxication with onset during withdrawal - with depressive symptoms with manic symptoms with mixed symptoms:292.11|Cocaine-induced_psychotic_disorder,_with_delusions with onset during intoxication305.70|Amphetamine_abuse with perceptual disturbancesD296.34|Major_depression,_recurrent,_severe,_with_psychotic_features chronic with catatonic features with melancholic features with atypical features with postpartum onset - mood-congruent psychotic features mood-incongruent psychotic features - with seasonal pattern - with full interepisode recovery without full interepisode recovery-296.32|Major_depression,_recurrent,_moderate chronic with catatonic features with melancholic features with atypical features with postpartum onset - with seasonal pattern - with full interepisode recovery without full interepisode recovery304.20|Cocaine_dependence with physiological dependence without physiological dependence - early partial remission sustained partial remission early full remission sustained full remission - on agonist therapy - in a controlled environment*291.89|Alcohol-induced_sexual_dysfunction qwith onset during intoxication - with impaired desire with impaired arousal with impaired orgasm with sexual pain304.50|Hallucinogen_dependence early partial remission sustained partial remission early full remission sustained full remission - in a controlled environment)292.89|Cannabis-induced_anxiety_disorder swith onset during intoxication - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms+292.84|Phencyclidine-induced_mood_disorder awith onset during intoxication - with depressive symptoms with manic symptoms with mixed symptoms(292.89|Cocaine-induced_anxiety_disorder with onset during intoxication with onset during withdrawal - with generalized anxiety with panic attacks with OCD symptoms with phobic symptomsO292.11|Other_(or_unknown)_substance-induced_psychotic_disorder,_with_delusions ;with onset during intoxication with onset during withdrawal 292.89|Amphetamine_intoxication with perceptual disturbancesO292.11|Sedative-hypnotic/anxiolytic-induced_psychotic_disorder,_with_delusions ;with onset during intoxication with onset during withdrawal 302.79|Sexual_aversion_disorder llifelong type acquired type - generalized situational - due to psychological factors due to combined factors;292.11|Cannabis-induced_psychotic_disorder,_with_delusions with onset during intoxication 298.80|Brief_psychotic_disorder Dwith marked stressors without marked stressors with postpartum onset?292.11|Hallucinogen-induced_psychotic_disorder,_with_delusions with onset during intoxicationD292.12|Hallucinogen-induced_psychotic_disorder,_with_hallucinations with onset during intoxication1292.89|Other_(or_unknown)_substance_intoxication with perceptual disturbances307.51|Bulimia_nervosa purging type nonpurging type302.30|Transvestic_fetishism with gender dysphoria 304.90|Phencyclidine_dependence early partial remission sustained partial remission early full remission sustained full remission - in a controlled environmentT296.03|Bipolar_I_disorder,_single_manic_episode,_severe,_without_psychotic_features -with catatonic features with postpartum onset)290.42|Vascular_dementia,_with_delusions with behavioral disturbance292.89|Cannabis_intoxication with perceptual disturbances?292.89|Other_(or_unknown)_substance-induced_sexual_dysfunction qwith onset during intoxication - with impaired desire with impaired arousal with impaired orgasm with sexual painL296.23|Major_depression,_single_episode,_severe,_without_psychotic_features fchronic with catatonic features with melancholic features with atypical features with postpartum onset:296.02|Bipolar_I_disorder,_single_manic_episode,_moderate -with catatonic features with postpartum onset?292.89|Sedative-hypnotic/anxiolytic-induced_sexual_dysfunction qwith onset during intoxication - with impaired desire with impaired arousal with impaired orgasm with sexual painF296.50|Bipolar_I_disorder,_most_recent_episode_depressed,_unspecified chronic with catatonic features with melancholic features with atypical features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery;296.61|Bipolar_I_disorder,_most_recent_episode_mixed,_mild with catatonic features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery@292.12|Cannabis-induced_psychotic_disorder,_with_hallucinations with onset during intoxication=292.89|Sedative-hypnotic/anxiolytic-induced_anxiety_disorder qwith onset during withdrawal - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms)302.71|Hypoactive_sexual_desire_disorder llifelong type acquired type - generalized situational - due to psychological factors due to combined factors]296.53|Bipolar_I_disorder,_most_recent_episode_depressed,_severe,_without_psychotic_features chronic with catatonic features with melancholic features with atypical features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery%291.80|Alcohol-induced_mood_disorder ~with onset during intoxication with onset during withdrawal - with depressive symptoms with manic symptoms with mixed symptoms!295.40|Schizophreniform_disorder >with good prognostic features without good prognostic features)292.89|Inhalant-induced_anxiety_disorder swith onset during intoxication - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms(291.89|Alcohol-induced_anxiety_disorder with onset during intoxication with onset during withdrawal - with generalized anxiety with panic attacks with OCD symptoms with phobic symptoms304.60|Inhalant_dependence early partial remission sustained partial remission early full remission sustained full remission - in a controlled environment:292.84|Sedative-hypnotic/anxiolytic-induced_mood_disorder ~with onset during intoxication with onset during withdrawal - with depressive symptoms with manic symptoms with mixed symptoms(295.10|Schizophrenia,_disorganized_type with prominent negative symptoms - episodic with interepisode residual symptoms episodic with no interepisode residual symptoms continuous single episode in partial remission single episode in full remission other or unspecified patternO296.55|Bipolar_I_disorder,_most_recent_episode_depressed,_in_partial_remission chronic with catatonic features with melancholic features with atypical features with postpartum onset - with rapid cycling - with seasonal pattern - with full interepisode recovery without full interepisode recovery2296.22|Major_depression,_single_episode,_moderate fchronic with catatonic features with melancholic features with atypical features with postpartum onset;292.11|Inhalant-induced_psychotic_disorder,_with_delusions with onset during intoxication%292.84|Cocaine-induced_mood_disorder ~with onset during intoxication with onset during withdrawal - with depressive symptoms with manic symptoms with mixed symptoms%292.89|Opioid-induced_sleep_disorder wwith onset during intoxication with onset during withdrawal - insomnia type hypersomnia type parasomnia type mixed type*292.89|Cocaine-induced_sexual_dysfunction qwith onset during intoxication - with impaired desire with impaired arousal with impaired orgasm with sexual pain;307.80|Pain_disorder_associated_with_psychological_factors acute chronic,302.60|Gender_identity_disorder_in_children rsexually attracted to males sexually attracted to females sexually attracted to both sexually attracted to neither303.90|Alcohol_dependence with physiological dependence without physiological dependence - early partial remission sustained partial remission early full remission sustained full remission - on agonist therapy - in a controlled environment@292.11|Phencyclidine-induced_psychotic_disorder,_with_delusions with onset during intoxication?290.21|Dementia_(Alzheimer's),_late_onset,_with_depressed_mood with behavioral disturbance293.83|Mood_disorder_2_ cwith depressive features with major depressive-like episode with manic features with mixed features?292.12|Cocaine-induced_psychotic_disorder,_with_hallucinations with onset during intoxication@292.12|Inhalant-induced_psychotic_disorder,_with_hallucinations with onset during intoxication)292.89|Caffeine-induced_anxiety_disorder onset during intoxication ICD9 -304.40|Amphetamine_dependence 304.40 Amphetamine and other psychostimulant dependence unspecified 304.41 Amphetamine and other psychostimulant dependence continuous 304.42 Amphetamine and other psychostimulant dependence episodic 304.43 Amphetamine and other psychostimulant dependence in remission305.90|Inhalant_abuse 305.90 Other, mixed, or unspecified drug abuse unspecified 305.91 Other, mixed, or unspecified drug abuse continuous 305.92 Other, mixed, or unspecified drug abuse episodic 305.93 Other, mixed, or unspecified drug abuse in remission304.50|Hallucinogen_dependence 304.50 Hallucinogen dependence unspecified 304.51 Hallucinogen dependence continuous 304.52 Hallucinogen dependence episodic 304.53 Hallucinogen dependence in remission305.50|Opioid_abuse |305.50 Opioid abuse unspecified 305.51 Opioid abuse continuous 305.52 Opioid abuse episodic 305.53 Opioid abuse in remission303.00|Alcohol_intoxication 303.00 Acute alcoholic intoxication unspecified 303.01 Acute alcoholic intoxication continuous 303.02 Acute alcoholic intoxication episodic 303.03 Acute alcoholic intoxication in remission#309.21|Separation_anxiety_disorder i309.21 Separation anxiety disorder 309.22 Separation anxiety disorder of adolescence and early adult life305.00|Alcohol_abuse 305.00 Alcohol abuse unspecified 305.01 Alcohol abuse continuous 305.02 Alcohol abuse episodic 305.03 Alcohol abuse in remission$295.30|Schizophrenia,_paranoid_type f295.30 Schizophrenic D//O Paranoid type unspecified 295.31 Schizophrenic D//O Paranoid type subchronic 295.32 Schizophrenic D//O Paranoid type chronic 295.33 Schizophrenic D//O Paranoid type subchronic with acute exacerbation 295.34 Schizophrenic D//O Paranoid type chronic with acute exacerbation 295.35 Schizophrenic D//O Paranoid type chronic in remission312.80|Conduct_disorder 312.80 Not a valid ICD-9 code 312.81 Conduct disorder, childhood onset type 312.82 Conduct disorder, adolescent onset type 312.89 Other specified conduct disorderQ290.10|Dementia_2_Pick's_disease_(also_code_on_axis_III:_331.10_Pick's_disease) 294.10 Dementia in conditions classified elsewhere, without behavioral disturbance 294.11 Dementia in conditions classified elsewhere, with behavioral disturbance*305.90|Other_(or_unknown)_substance_abuse 305.90 Other, mixed, or unspecified drug abuse unspecified 305.91 Other, mixed, or unspecified drug abuse continuous 305.92 Other, mixed, or unspecified drug abuse episodic 305.93 Other, mixed, or unspecified drug abuse in remission305.30|Hallucinogen_abuse 305.30 Hallucinogen abuse unspecified 305.31 Hallucinogen abuse continuous 305.32 Hallucinogen abuse episodic 305.33 Hallucinogen abuse in remission304.30|Cannabis_dependence 304.30 Cannabis dependence unspecified 304.31 Cannabis dependence continuous 304.32 Cannabis dependence episodic 304.33 Cannabis dependence in remission-294.10|Dementia_2__(also_code_on_axis_III) 294.10 Dementia in conditions classified elsewhere, without behavioral disturbance 294.11 Dementia in conditions classified elsewhere, with behavioral disturbance 304.90|Phencyclidine_dependence 304.90 Unspecified drug dependence unspecified 304.91 Unspecified drug dependence continuous 304.92 Unspecified drug dependence episodic 304.93 Unspecified drug dependence in remission/304.10|Sedative-hypnotic/anxiolytic_dependence L304.10 Barbiturate and similarly acting sedative or hypnotic dependence unspecified 304.11 Barbiturate and similarly acting sedative or hypnotic dependence continuous 304.12 Barbiturate and similarly acting sedative or hypnotic dependence episodic 304.13 Barbiturate and similarly acting sedative or hypnotic dependence in remission,295.90|Schizophrenia,_undifferentiated_type ,295.90 Unspecified Schizophrenia unspecified 295.91 Unspecified Schizophrenia subchronic 295.92 Unspecified Schizophrenia chronic 295.93 Unspecified Schizophrenia subchronic with acute exacerbation 295.94 Unspecified Schizophrenia with acute exacerbation 295.95 Unspecified Schizophrenia in remission*305.40|Sedative-hypnotic/anxiolytic_abuse 8304.10 Barbiturate and similarly acting sedative or hypnotic abuse unspecified 304.11 Barbiturate and similarly acting sedative or hypnotic abuse continuous 304.12 Barbiturate and similarly acting sedative or hypnotic abuse episodic 304.13 Barbiturate and similarly acting sedative or hypnotic abuse in remission305.90|Phencyclidine_abuse 305.90 Other, mixed, or unspecified drug abuse unspecified 305.91 Other, mixed, or unspecified drug abuse continuous 305.92 Other, mixed, or unspecified drug abuse episodic 305.93 Other, mixed, or unspecified drug abuse in remission305.60|Cocaine_abuse 305.60 Cocaine abuse unspecified 305.61 Cocaine abuse continuous 305.62 Cocaine abuse episodic 305.63 Cocaine abuse in remission305.20|Cannabis_abuse 305.20 Cannabis abuse unspecified 305.21 Cannabis abuse continuous 305.22 Cannabis abuse episodic 305.23 Cannabis abuse in remission[294.10|Dementia_2_Parkinson's_disease_(also_code_on_axis_III:_332.00_Parkinson's_disease) 294.10 Dementia in conditions classified elsewhere, without behavioral disturbance 294.11 Dementia in conditions classified elsewhere, with behavioral disturbance,299.80|Pervasive_developmental_disorder_NOS 299.80 Other specified early childhood psychoses, current or active state 299.81 Other specified early childhood psychoses, residual state/304.90|Other_(or_unknown)_substance_dependence 304.90 Drug dependence unspecified 304.91 Drug dependence continuous 304.92 Drug dependence episodic 304.93 Drug dependence in remission304.00|Opioid_dependence 304.00 Opioid type dependence unspecified 304.01 Opioid type dependence continuous 304.02 Opioid type dependence episodic 304.03 Opioid type dependence in remission299.00|Autistic_disorder X299.00 Infantile Autism, current or active state 299.01 Infantile Autism, residual stateK294.10|Dementia_2_head_trauma_(also_code_on_axis_III:_854.00_head_injury) 294.10 Dementia in conditions classified elsewhere, without behavioral disturbance 294.11 Dementia in conditions classified elsewhere, with behavioral disturbance299.80|Rett's_disorder 299.80 Other specified early childhood psychoses, current or active state 299.81 Other specified early childhood psychoses, residual state!295.40|Schizophreniform_disorder 8295.40 Acute Schizophrenic Episode unspecified 295.41 Acute Schizophrenic Episode subchronic 295.42 Acute Schizophrenic Episode chronic 295.43 Acute Schizophrenic Episode subchronic with acute exacerbation 295.44 Acute Schizophrenic Episode with acute exacerbation 295.45 Acute Schizophrenic Episode in remission$295.60|Schizophrenia,_residual_type 295.60 Residual Schizophrenia unspecified 295.61 Residual Schizophrenia subchronic 295.62 Residual Schizophrenia chronic 295.63 Residual Schizophrenia subchronic with acute exacerbation 295.64 Residual Schizophrenia with acute exacerbation 295.65 Residual Schizophrenia in remission304.60|Inhalant_dependence 304.60 Other specified drug dependence unspecified 304.61 Other specified drug dependence continuous 304.62 Other specified drug dependence episodic 304.63 Other specified drug dependence in remission)299.10|Childhood_disintegrative_disorder |299.10 Childhood disintegrative psychosis, current or active state 299.11 Childhood disintegrative psychosis, residual state(295.10|Schizophrenia,_disorganized_type ~295.10 Schizophrenic D//O Disorganized type unspecified 295.11 Schizophrenic D//O Disorganized type subchronic 295.12 Schizophrenic D//O Disorganized type chronic 295.13 Schizophrenic D//O Disorganized type subchronic with acute exacerbation 295.14 Schizophrenic D//O Disorganized type chronic with acute exacerbation 295.15 Schizophrenic D//O Disorganized type chronic in remission 295.70|Schizoaffective_disorder h295.70 Schizo-affective type schizophrenia unspecified 295.71 Schizo-affective type schizophrenia subchronic 295.72 Schizo-affective type schizophrenia chronic 295.73 Schizo-affective type schizophrenia subchronic with acute exacerbation 295.74 Schizo-affective type schizophrenia with acute exacerbation 295.75 Schizo-affective type schizophrenia in remission]294.10|Dementia_2_Huntington's_disease_(also_code_on_axis_III:_333.40_Huntington's_disease) 294.10 Dementia in conditions classified elsewhere, without behavioral disturbance 294.11 Dementia in conditions classified elsewhere, with behavioral disturbance305.90|Caffeine_intoxication 305.90 Other, mixed, or unspecified drug abuse unspecified 305.91 Other, mixed, or unspecified drug abuse continuous 305.92 Other, mixed, or unspecified drug abuse episodic 305.93 Other, mixed, or unspecified drug abuse in remission293.00|Delerium_due_to_ .293.00 Acute Delirium 293.10 Subacute Delirium 304.80|Polysubstance_dependence =304.70 Combinations of opioid type drug with any other unspecified 304.71 Combinations of opioid type drug with any other continuous 304.72 Combinations of opioid type drug with any other episodic 304.73 Combinations of opioid type drug with any other in remission 304.80 Combinations of drug dependence excluding opioid type drug unspecified 304.81 Combinations of drug dependence excluding opioid type drug continuous 304.82 Combinations of drug dependence excluding opioid type drug episodic 304.83 Combinations of drug dependence excluding opioid type drug in remission303.90|Alcohol_dependence 303.90 Other and unspecified alcoholic dependence unspecified 303.91 Other and unspecified alcoholic dependence continuous 303.92 Other and unspecified alcoholic dependence episodic 303.93 Other and unspecified alcoholic dependence in remission%295.20|Schizophrenia,_catatonic_type l295.20 Schizophrenic D//O Catatonic type unspecified 295.21 Schizophrenic D//O Catatonic type subchronic 295.22 Schizophrenic D//O Catatonic type chronic 295.23 Schizophrenic D//O Catatonic type subchronic with acute exacerbation 295.24 Schizophrenic D//O Catatonic type chronic with acute exacerbation 295.25 Schizophrenic D//O Catatonic type chronic in remission291.80|Alcohol_withdrawal 7291.80 Not a valid ICD-9 code 291.81 Alcohol Withdrawal305.70|Amphetamine_abuse 305.70 Amphetamine or related acting sympathomimetic abuse unspecified 305.71 Amphetamine or related acting sympathomimetic abuse continuous 305.72 Amphetamine or related acting sympathomimetic abuse episodic 305.73 Amphetamine or related acting sympathomimetic abuse in remission299.80|Asperger's_disorder 299.80 Other specified early childhood psychoses, current or active state 299.81 Other specified early childhood psychoses, residual stateg290.10|Dementia_2_Creutzfeldt-Jakob_disease_(also_code_on_axis_III:_046.10_Creutzfeldt-Jakob_disease) 294.10 Dementia in conditions classified elsewhere, without behavioral disturbance 294.11 Dementia in conditions classified elsewhere, with behavioral disturbance304.20|Cocaine_dependence 304.20 Cocaine dependence unspecified 304.21 Cocaine dependence continuous 304.22 Cocaine dependence episodic 304.23 Cocaine dependence in remission cRevStandaloneSettings 5scriptLibraries Font Support Internet Table MacOSX true OSX,name DSM AssistantMacOS,documentType UNIX,fileSelector trueWindows trueWindows,LegalCopyright <2008-9 Peter M. Brigham, MD. All rights reserved worldwideMacOS,longVersion DSM-4 1.0.0.0UNIX,pageSetup trueOSX,documentType inclusions selectWindows,documenticonFile e/Applications/Revolution Studio/2.9.0-gm-1/Runtime/Windows/x86-32/Support/Sample Icons/genericdoc.ico answerDialog trueWindows,copyright #2008 All rights reserved worldwideOSX,documentExtension Windows,FileDescription !DSM Assistant 1.0.0.0 for WindowsOSX,longVersion DSM Coder 1.0.0.0Windows,buildU3 falseOSX,copyright >2008-9 by Peter M. Brigham, MD. All rights reserved worldwideUNIX,printerChooser trueMacOS,shortVersion 1.0.0.0MacOS,MinimumSize 15000MacOS,versionnumber1 1MacOS,versionnumber2 0MacOS,Release FinalOSX,identifier com..dsm-4name DSMassistantMacOS,versionnumber3 0moveSubstacks true MacOS,Region 1OSX,shortVersion 1.0.0.0Windows,fileversion1 1Windows,productversion1 1Windows,fileversion2 0Windows,productversion2 0Windows,fileversion3 0cursors trueWindows,productversion3 0Windows,fileversion4 0Windows,productversion4 0 OSX,info DSM Assistant Version 1.0.0.0MacOSX PowerPC-32 falseMacOS,dynamicMemory true askDialog true destroyStack trueOSX,signature ????Windows,iconFile e/Applications/Revolution Studio/2.9.0-gm-1/Runtime/Windows/x86-32/Support/Sample Icons/genericapp.icoMacOS,PreferredSize 15000Windows,ProductName DSM AssistantUNIX,colorChooser trueMacOSX x86-32 falseWindows,companyname MacOS,creator ???? cREVGeometryCache stackID 1049 cREVGeneral scriptChecksum 6{ZCz*\eg debugObjects breakPoints handlerList vwritable writable sr q howMany offsets lineOffsets doFind mouseenter mouseLeave fixDxForProp setupticks commandkeydownscriptSelection char 2072 to 2071breakpointstates scripteditorvscroll 1303 bookmarks breakpointconditions scripteditorselection 2297tempScript prevHandler fixDxForPropscript <
setProp writable what
if word 1 of the target <> "field" then exit writable
set the locktext of the target to not what
set the traversalon of the target to what
set the autohilite of the target to what
end writable
getProp writable
if word 1 of the target <> "field" then exit writable
return the traversalon of the target
end writable
function sr str
return word 1 to (the number of words of str) of str
end sr
function q str
return quote & str & quote
end q
function howMany tg,ctr
-- returns how many instances of string tg in string ctr
put offsets(tg,ctr) into mosList
if mosList = "0" then put "" into mosList
return the number of items of mosList
end howMany
function offsets str,ctr
put "" into mosList
put 0 into startPoint
repeat
put offset(str,ctr,startPoint) into os
if os = 0 then
if mosList = "" then put 0 into mosList
exit repeat
end if
put os + startPoint & comma after mosList
put os + startPoint into startPoint
end repeat
if last char of mosList = "," then delete last char of mosList
return mosList
end offsets
on lineOffsets str,ctr
put offsets(str,ctr) into charList
if charList = "0" then return "0"
put the number of items of charList into nbr
put "" into mlo
repeat with n = 1 to nbr
put the number of lines of (char 1 to (item n of charList) of ctr) & "," after mlo
end repeat
if char -1 of mlo = "," then delete char -1 of mlo
return mlo
end lineOffsets
on doFind
put fld "findStr" into str
if str = empty then exit doFind
find string str in fld "codes"
if the result <> empty then beep
end doFind
on mouseenter
if "button" is in the long name of the target then
set the defaultcursor to hand
else
pass mouseenter
end if
end mouseenter
on mouseLeave
set the defaultcursor to empty
end mouseLeave
function fixDxForProp dxText
put offset("[",dxText) into b
if b <> 0 then
delete char b-1 to -1 of dxText
end if
replace tab with "|" in dxText
replace space with "_" in dxText
return dxText
end fixDxForProp
on setupticks
put the number of lines of fld "codes" into nbr
set the itemdelimiter to tab
repeat with n = 1 to nbr
-- if char 2 of word 1 of line n of fld "codes" is not a number then next repeat
-- put item 3 to -1 of line n of fld "codes" into tDx
-- replace "*" with empty in tDx
-- put fixDxForProp(tDx) into dxProp
-- put the modifiers[dxProp] of this stack into tMods
-- put the ICD9[dxProp] of this stack into tICD
-- if tMods <> empty then
-- put " " into item 2 of line n of fld "codes"
-- put tDx into item 3 to -1 of line n of fld "codes"
-- end if
-- if tICD <> empty then
-- put " " into item 1 of line n of fld "codes"
-- end if
put item 2 of line n of fld "codes" into modItem
if modItem contains "" then put " " into item 2 of line n of fld "codes"
end repeat
answer "done" as sheet
end setupticks
on commandkeydown which
switch which
case "w"
if the environment = "development" then
close this stack
else
quit
end if
break
case "q"
quit
break
case "f"
select text of fld "findStr"
break
case "g"
put fld "findStr" into fs
if fs = empty then beep
else find string fs in fld "codes"
break
default
pass commandkeydown
end switch
end commandkeydown
Pon preopenstack put empty into fld "findstr" set the scroll of fld "codes" to 0 put empty into fld "dx" end preopenstack on openstack set the tool to "browse tool" pass openstack end openstack on fixtable set the itemdelimiter to tab put fld "codes" into c repeat with n = 1 to the number of lines of c delete item 2 of line n of fld "codes" end repeat answer "done." as sheet end fixtable on enterkey doFind end enterkey on returnkey doFind end returnkey @ cREVGeometryCacheIDs 1210818305326 10131248386421585 10491210948089335 10241211232141766 10411210818653865 10151231334566449 10451231335486791 10471210947494749 10231211232103841 10401089833727448 10321210824013101 10191211303278349 10421210816861291 10041210818071818 10071210994886807 10371210818158400 10091210994680659 1035 cREVGeometrycache total 17order cREVGeneral scriptChecksum {95$K[V|ThandlerList 2preopenstack openstack fixtable enterkey returnkeyscriptSelection char 84 to 83 bookmarks scripteditorvscroll 0scripteditorselection 204prevHandler preopenstacktempScript script .on preopenstack
put empty into fld "findstr"
set the scroll of fld "codes" to 0
end preopenstack
on openstack
set the tool to "browse tool"
pass openstack
end openstack
on fixtable
set the itemdelimiter to tab
put fld "codes" into c
repeat with n = 1 to the number of lines of c
delete item 2 of line n of fld "codes"
end repeat
answer "done." as sheet
end fixtable
on enterkey
doFind
end enterkey
on returnkey
doFind
end returnkey
codes x Eon mouseup tBtn if the commandkey is down and the shiftkey is down and the environment = "development" then set the writable of me to not the writable of me if the locktext of me then set the autohilite of me to true exit to top end if if tBtn =1 and the controlkey is down then put 3 into tBtn set the itemdelimiter to tab put word 2 of the clickline into L put line L of me into tDx put sr(tDx) into lineContent if lineContent = empty then find empty put empty into fld "dx" put empty into fld "ICD/DSM" exit to top end if put item 3 of tDx into tDxNbr put item 3 to 4 of tDx into fullDx if not (fld "dx" begins with fullDx) then put fullDx into fld "dx" put "DSM-4" into fld "ICD/DSM" end if doBox L if tBtn = 1 then exit mouseup set the itemdelimiter to comma put the clickloc into clLoc put the clickh into cHoriz subtract the left of me from cHoriz put the tabstops of me into ts if cHoriz > item 2 of ts then exit to top put cHoriz < item 1 of ts into getICD9 put (cHoriz > item 1 of ts) into getMods put word 2 of the clickline into cLine set the itemdelimiter to tab put item 3 of line cLine of me into tCode set the lineClicked of me to cLine put item 3 to -1 of line cLine of me into dxText if tCode is not a number then exit to top doBox cLine put fixDxForProp(dxText) into tDx put the modifiers[tDx] of this stack into tModifiers put the ICD9[tDx] of this stack into tICD if getICD9 then -- ICD9 dxes if tICD <> empty then -- pop up ICD dxes replace "/" with "//" in dxText put snipText(dxText) & cr & "-" & cr & "ICD-9:" & cr & tICD into btn "popChoose" set the itemdelimiter to comma add 15 to item 2 of clLoc popup btn "popChoose" at clLoc put the chosenitem of btn "popChoose" into theChoice put theChoice into fld "dx" put "ICD-9" into fld "ICD/DSM" end if -- end pop else if getMods then -- modifiers if tModifiers <> empty and not fetchData then -- pop up the modifiers replace "/" with "//" in dxText put snipText(dxText) & cr & "-" & cr & tModifiers into btn "popChoose" set the itemdelimiter to comma add 15 to item 2 of clLoc popup btn "popChoose" at clLoc put the chosenitem of btn "popChoose" into theChoice -- now load "dx" field if word 1 of theChoice is a number then put item 3 to 4 of line L of fld "codes" into fld "dx" if fld "dx" = empty then exit mouseup put the scroll of fld "codes" into scr lock screen find whole tDxNbr in fld "codes" set the scroll of fld "codes" to scr exit mouseup end if if not (fld "dx" begins with fullDx) then put fullDx into fld "dx" end if set the itemdelimiter to ";" if space & theChoice is among the items of fld "dx" then exit to top if fld "dx" contains "" then -- has modifiers already put "; " after fld "dx" else -- no modifiers yet put " " after fld "dx" end if put theChoice after fld "dx" find empty put the scroll of fld "codes" into scr lock screen find whole tDxNbr in fld "codes" set the scroll of fld "codes" to scr put "DSM-4" into fld "ICD/DSM" else -- fetch modifiers -- -- take this part of the if-structure out before compiling standalone -- if tModifiers = empty then -- -- load with full subst abuse modifiers, add any further -- put offset("[",dxText) into b -- if b <> 0 then -- put char b+1 to -2 of dxText after modsList -- delete char b-1 to -1 of dxText -- replace "] [" with cr & "-" & cr in modsList -- replace " | " with cr in modsList -- end if -- else -- already have modifiers -- put tModifiers into modsList -- replace "&&" with "&" in modsList -- end if -- put dxText & cr & modsList into fld "enterModifiers" -- set the originatingLine of fld "enterModifiers" to cLine -- set the entermode of fld "enterModifiers" to "mods" -- show fld "enterModifiers" -- select after text of fld "enterModifiers" end if end if end mouseup function snipText tDx put false into snipped repeat until the number of chars of tDx < 45 delete word -1 of tDx put true into snipped end repeat if snipped then put "..." after tDx return tDx end snipText function makeModsSA put "with physiological dependence;" into physDep put "without physiological dependence" after physDep put "with onset during intoxication;" into onsetMod put "with onset during withdrawal" after onsetMod put "early partial remission;" into remissn put "sustained partial remission;" after remissn put "early full remission;" after remissn put "sustained full remission" after remissn put "on agonist therapy" into onAgon put "in a controlled environment" into contrEnv put "with depressive symptoms;" into moodMod put "with manic symptoms;" after moodMod put "with mixed symptoms" after moodMod put "with generalized anxiety;" after anxMod put "with panic attacks;" after anxMod put "with OCD symptoms;" after anxMod put "with phobic symptoms" after anxMod put physDep & cr & "-" & cr into tModifiers put onsetMod & cr & "-" & cr after tModifiers put remissn & cr & "-" & cr after tModifiers put onAgon & cr & "-" & cr after tModifiers put contrEnv & cr & "-" & cr after tModifiers put moodMod & cr & "-" & cr after tModifiers put anxMod after tModifiers replace ";" with cr in tModifiers return tModifiers end makeModsSA on enterinfield select empty set the writable of me to not the writable of me end enterinfield @ < boxedLine 288codeClicked 296.33lineClicked 266 @ } cREVGeneral scriptChecksum #tABդ}handlerList (mouseup snipText makeModsSA enterinfieldbreakPoints scriptSelection char 3365 to 3364revUniqueID 1210816861291 bookmarks scripteditorvscroll 129scripteditorselection 565tempScript prevHandler mouseupscript ]on mouseup tBtn
if the commandkey is down and the shiftkey is down and the environment = "development" then
set the writable of me to not the writable of me
exit to top
end if
if tBtn <> 3 then exit mouseup
put the clickloc into clLoc
put the clickh into cHoriz
subtract the left of me from cHoriz
put the tabstops of me into ts
if cHoriz > item 2 of ts then exit to top
put cHoriz < item 1 of ts into getICD9
put (cHoriz > item 1 of ts) and (cHoriz < item 2 of ts) into getMods
put the optionkey is down into fetchData
put word 2 of the clickline into cLine
set the itemdelimiter to tab
put item 3 of line cLine of me into tCode
put item 3 to -1 of line cLine of me into dxText
if tCode is not a number then exit to top
put fixDxForProp(dxText) into tDx
put the modifiers[tDx] of this stack into tModifiers
put the ICD9[tDx] of this stack into tICD
if getICD9 then -- ICD9 dxes
if tICD <> empty and not fetchData then
-- pop up ICD dxes
replace "/" with "//" in dxText
put snipText(dxText) & cr & "-" & cr & "ICD-9:" & cr & tICD into btn "popChoose"
set the itemdelimiter to comma
add 15 to item 2 of clLoc
popup btn "popChoose" at clLoc
else -- fetch ICD9 dxes
-- -- take this part of the if-structure out before compiling standalone
-- put empty into ICDlist
-- if tICD = empty then
-- -- no ICD dxes yet
-- repeat with i = 0 to 6
-- put char 1 to -2 of tCode & i into newCode
-- put newCode & tab & cr after ICDlist
-- end repeat
-- delete char -1 of ICDlist
-- else -- already have ICD dxes
-- put tICD into ICDlist
-- replace "&&" with "&" in ICDlist
-- replace "//" with "/" in ICDlist
-- end if
-- put dxText & cr & ICDlist into fld "enterModifiers"
-- set the originatingLine of fld "enterModifiers" to cLine
-- set the entermode of fld "enterModifiers" to "ICD"
-- show fld "enterModifiers"
-- unlock screen
-- select after line 2 of fld "enterModifiers"
end if -- end pop/fetch modifiers
else if getMods then -- modifiers
if tModifiers <> empty and not fetchData then
-- pop up the modifiers
replace "/" with "//" in dxText
put snipText(dxText) & cr & "-" & cr & tModifiers into btn "popChoose"
set the itemdelimiter to comma
add 15 to item 2 of clLoc
popup btn "popChoose" at clLoc
else -- fetch modifiers
-- -- take this part of the if-structure out before compiling standalone
-- if tModifiers = empty then
-- -- load with full subst abuse modifiers, add any further
-- put offset("[",dxText) into b
-- if b <> 0 then
-- put char b+1 to -2 of dxText after modsList
-- delete char b-1 to -1 of dxText
-- replace "] [" with cr & "-" & cr in modsList
-- replace " | " with cr in modsList
-- end if
-- else -- already have modifiers
-- put tModifiers into modsList
-- replace "&&" with "&" in modsList
-- end if
-- put dxText & cr & modsList into fld "enterModifiers"
-- set the originatingLine of fld "enterModifiers" to cLine
-- set the entermode of fld "enterModifiers" to "mods"
-- show fld "enterModifiers"
-- select after text of fld "enterModifiers"
end if
end if
end mouseup
function snipText tDx
put false into snipped
repeat until the number of chars of tDx < 45
delete word -1 of tDx
put true into snipped
end repeat
if snipped then put "..." after tDx
return tDx
end snipText
function makeModsSA
put "with physiological dependence;" into physDep
put "without physiological dependence" after physDep
put "with onset during intoxication;" into onsetMod
put "with onset during withdrawal" after onsetMod
put "early partial remission;" into remissn
put "sustained partial remission;" after remissn
put "early full remission;" after remissn
put "sustained full remission" after remissn
put "on agonist therapy" into onAgon
put "in a controlled environment" into contrEnv
put "with depressive symptoms;" into moodMod
put "with manic symptoms;" after moodMod
put "with mixed symptoms" after moodMod
put "with generalized anxiety;" after anxMod
put "with panic attacks;" after anxMod
put "with OCD symptoms;" after anxMod
put "with phobic symptoms" after anxMod
put physDep & cr & "-" & cr into tModifiers
put onsetMod & cr & "-" & cr after tModifiers
put remissn & cr & "-" & cr after tModifiers
put onAgon & cr & "-" & cr after tModifiers
put contrEnv & cr & "-" & cr after tModifiers
put moodMod & cr & "-" & cr after tModifiers
put anxMod after tModifiers
replace ";" with cr in tModifiers
return tModifiers
end makeModsSA
on enterinfield
select empty
set the writable of me to not the writable of me
end enterinfield
/Disorders Usually First Diagnosed in Childhood . 'Mental retardation (coded on axis II): & % 317.00 Mild mental retardation % 318.00 Moderate mental retardation $ # 318.10 Severe mental retardation " % 318.20 Profound mental retardation $ 2 319.00 Mental retardation, severity unspecified 1 Learning disorders: 315.00 Reading disorder 315.10 Mathematics disorder ( 315.20 Disorder of written expression ' 315.90 Learning disorder NOS Motor skills disorder: - 315.40 Developmental coordination disorder , Communication disorders: & 315.31 Expressive language disorder % 6 315.32 Mixed receptive-expressive language disorder 5 315.39 Phonological disorder 307.00 Stuttering $ 307.90 Communication disorder NOS # #Pervasive developmental disorders: " 299.00 Autistic disorder 299.80 Rett's disorder - 299.10 Childhood disintegrative disorder , 299.80 Asperger's disorder 0 299.80 Pervasive developmental disorder NOS / 5Attention-deficit and disruptive behavior disorders: 4 ? 314.00 Attention-deficit/hyperactivity disorder, inattentive > < 314.01 Attention-deficit/hyperactivity disorder, combined ; I 314.01 Attention-deficit/hyperactivity disorder, hyperactive-impulsive H 6 314.90 Attention-deficit/hyperactivity disorder NOS 5 312.80 Conduct disorder ' 313.81 Oppositional-defiant disorder & * 312.90 Disruptive behavior disorder NOS ) /Feeding & eating disorders of early childhood: . 307.52 Pica 307.53 Rumination disorder 5 307.59 Feeding disorder of infancy/early childhood 4 Tic disorders: 307.23 Tourette's disorder - 307.22 Chronic motor or vocal tic disorder , " 307.21 Transient tic disorder ! 307.20 Tic disorder NOS Elimination disorders: < 787.60 Encopresis w/ constipation & overflow incontinence ; = 307.70 Encopresis w/o constipation & overflow incontinence < = 307.60 Enuresis (not due to a general medical condition) < 7Other disorders of infancy, childhood, or adolescence: 6 ) 309.21 Separation anxiety disorder ( 313.23 Selective mutism F 313.89 Reactive attachment disorder of infancy or early childhood E ) 307.30 Stereotypic movement disorder ( < 313.90 Disorder of infancy, childhood, or adolescence NOS ; =Delerium, Dementia, and Amnestic & Other Cognitive Disorders < Delerium: 293.00 Delerium due to 780.09 Delerium NOS Dementia: > 290.10 Dementia (Alzheimer's), early onset, uncomplicated = > 290.11 Dementia (Alzheimer's), early onset, with delerium = ? 290.12 Dementia (Alzheimer's), early onset, with delusions > D 290.13 Dementia (Alzheimer's), early onset, with depressed mood C = 290.00 Dementia (Alzheimer's), late onset, uncomplicated < = 290.30 Dementia (Alzheimer's), late onset, with delerium < > 290.20 Dementia (Alzheimer's), late onset, with delusions = C 290.21 Dementia (Alzheimer's), late onset, with depressed mood B , 290.40 Vascular dementia, uncomplicated + , 290.41 Vascular dementia, with delerium + - 290.42 Vascular dementia, with delusions , 2 290.43 Vascular dementia, with depressed mood 1 S 294.90 Dementia 2 HIV disease (also code on axis III: 043.10 HIV affecting CNS) R O 294.10 Dementia 2 head trauma (also code on axis III: 854.00 head injury) N _ 294.10 Dementia 2 Parkinson's disease (also code on axis III: 332.00 Parkinson's disease) ^ a 294.10 Dementia 2 Huntington's disease (also code on axis III: 333.40 Huntington's disease) ` U 290.10 Dementia 2 Pick's disease (also code on axis III: 331.10 Pick's disease) T k 290.10 Dementia 2 Creutzfeldt-Jakob disease (also code on axis III: 046.10 Creutzfeldt-Jakob disease) j 1 294.10 Dementia 2 (also code on axis III) 0 294.80 Dementia NOS Amnestic disorders: " 294.00 Amnestic disorder 2 ! 294.80 Amnestic disorder NOS Other cognitive disorders: 294.90 Cognitive disorder NOS MMental Disorders Due to a General Medical Condition Not Elsewhere Classified L ! 293.89 Catatonic disorder 2 # 310.10 Personality change 2 " " 293.90 Mental disorder NOS 2 ! Substance-Related Disorders Alcohol-related disorders: 303.90 Alcohol dependence 305.00 Alcohol abuse 303.00 Alcohol intoxication 291.80 Alcohol withdrawal ' 291.00 Alcohol intoxication delerium & % 291.00 Alcohol withdrawal delerium $ - 291.20 Alcohol-induced persisting dementia , 6 291.10 Alcohol-induced persisting amnestic disorder 5 > 291.50 Alcohol-induced psychotic disorder, with delusions = C 291.30 Alcohol-induced psychotic disorder, with hallucinations B ) 291.89 Alcohol-induced mood disorder ( , 291.89 Alcohol-induced anxiety disorder + . 291.89 Alcohol-induced sexual dysfunction - * 291.89 Alcohol-induced sleep disorder ) & 291.90 Alcohol-related disorder NOS % 5Amphetamine (or amphetamine-like)-related disorders: 4 $ 304.40 Amphetamine dependence # 305.70 Amphetamine abuse $ 292.89 Amphetamine intoxication # 292.00 Amphetamine withdrawal + 292.81 Amphetamine intoxication delerium * B 292.11 Amphetamine-induced psychotic disorder, with delusions A G 292.12 Amphetamine-induced psychotic disorder, with hallucinations F - 292.84 Amphetamine-induced mood disorder , 0 292.89 Amphetamine-induced anxiety disorder / 2 292.89 Amphetamine-induced sexual dysfunction 1 . 292.89 Amphetamine-induced sleep disorder - * 292.90 Amphetamine-related disorder NOS ) Caffeine-related disorders: ! 305.90 Caffeine intoxication - 292.89 Caffeine-induced anxiety disorder , + 292.89 Caffeine-induced sleep disorder * ' 292.90 Caffeine-related disorder NOS & Cannabis-related disorders: ! 304.30 Cannabis dependence 305.20 Cannabis abuse ! 292.89 Cannabis intoxication ( 292.81 Cannabis intoxication delerium ' ? 292.11 Cannabis-induced psychotic disorder, with delusions > D 292.12 Cannabis-induced psychotic disorder, with hallucinations C - 292.89 Cannabis-induced anxiety disorder , ' 292.90 Cannabis-related disorder NOS & Cocaine-related disorders: 304.20 Cocaine dependence 305.60 Cocaine abuse 292.89 Cocaine intoxication 292.00 Cocaine withdrawal ' 292.81 Cocaine intoxication delerium & > 292.11 Cocaine-induced psychotic disorder, with delusions = C 292.12 Cocaine-induced psychotic disorder, with hallucinations B ) 292.84 Cocaine-induced mood disorder ( , 292.89 Cocaine-induced anxiety disorder + . 292.89 Cocaine-induced sexual dysfunction - * 292.89 Cocaine-induced sleep disorder ) & 292.90 Cocaine-related disorder NOS % Hallucinogen-related disorders: % 304.50 Hallucinogen dependence $ 305.30 Hallucinogen abuse # 292.89 Hallucinogen intoxication " B 292.89 Hallucinogen persisting perception disorder (flashbacks) A , 292.81 Hallucinogen intoxication delerium + C 292.11 Hallucinogen-induced psychotic disorder, with delusions B H 292.12 Hallucinogen-induced psychotic disorder, with hallucinations G . 292.84 Hallucinogen-induced mood disorder - 1 292.89 Hallucinogen-induced anxiety disorder 0 + 292.90 Hallucinogen-related disorder NOS * Inhalant-related disorders: ! 304.60 Inhalant dependence 305.90 Inhalant abuse 292.89 Inhalant intoxication ( 292.81 Inhalant intoxication delerium ' . 292.82 Inhalant-induced persisting dementia - ? 292.11 Inhalant-induced psychotic disorder, with delusions > D 292.12 Inhalant-induced psychotic disorder, with hallucinations C * 292.84 Inhalant-induced mood disorder ) - 292.89 Inhalant-induced anxiety disorder , ' 292.90 Inhalant-related disorder NOS & Nicotine-related disorders: 305.10 Nicotine dependence 292.00 Nicotine withdrawal ' 292.90 Nicotine-related disorder NOS & Opioid-related disorders: 304.00 Opioid dependence 305.50 Opioid abuse 292.89 Opioid intoxication 292.00 Opioid withdrawal & 292.81 Opioid intoxication delerium % = 292.11 Opioid-induced psychotic disorder, with delusions < B 292.12 Opioid-induced psychotic disorder, with hallucinations A ( 292.84 Opioid-induced mood disorder ' - 292.89 Opioid-induced sexual dysfunction , ) 292.89 Opioid-induced sleep disorder ( % 292.90 Opioid-related disorder NOS $ 9Phencyclidine (or phencyclidine-like)-related disorders: 8 & 304.90 Phencyclidine dependence % 305.90 Phencyclidine abuse & 292.89 Phencyclidine intoxication % - 292.81 Phencyclidine intoxication delerium , D 292.11 Phencyclidine-induced psychotic disorder, with delusions C I 292.12 Phencyclidine-induced psychotic disorder, with hallucinations H / 292.84 Phencyclidine-induced mood disorder . 2 292.89 Phencyclidine-induced anxiety disorder 1 , 292.90 Phencyclidine-related disorder NOS + 7Sedative-, hypnotic-, or anxiolytic-related disorders: 6 5 304.10 Sedative-hypnotic/anxiolytic dependence 4 . 305.40 Sedative-hypnotic/anxiolytic abuse - 3 292.89 Sedative-hypnotic/anxiolytic intoxication 2 3 292.00 Sedative-hypnotic/anxiolytic withdrawal 2 < 292.81 Sedative-hypnotic/anxiolytic intoxication delerium ; : 292.81 Sedative-hypnotic/anxiolytic withdrawal delerium 9 B 292.82 Sedative-hypnotic/anxiolytic-induced persisting dementia A K 292.83 Sedative-hypnotic/anxiolytic-induced persisting amnestic disorder J S 292.11 Sedative-hypnotic/anxiolytic-induced psychotic disorder, with delusions R X 292.12 Sedative-hypnotic/anxiolytic-induced psychotic disorder, with hallucinations W > 292.84 Sedative-hypnotic/anxiolytic-induced mood disorder = A 292.89 Sedative-hypnotic/anxiolytic-induced anxiety disorder @ C 292.89 Sedative-hypnotic/anxiolytic-induced sexual dysfunction B ? 292.89 Sedative-hypnotic/anxiolytic-induced sleep disorder > ; 292.90 Sedative-hypnotic/anxiolytic-related disorder NOS : Polysubstance-related disorder: $ 304.80 Polysubstance dependence # 0Other (or unknown) substance-related disorders: / 3 304.90 Other (or unknown) substance dependence 2 . 305.90 Other (or unknown) substance abuse - 5 292.89 Other (or unknown) substance intoxication 4 3 292.00 Other (or unknown) substance withdrawal 2 7 292.81 Other (or unknown) substance-induced delerium 6 B 292.82 Other (or unknown) substance-induced persisting dementia A K 292.83 Other (or unknown) substance-induced persisting amnestic disorder J S 292.11 Other (or unknown) substance-induced psychotic disorder, with delusions R X 292.12 Other (or unknown) substance-induced psychotic disorder, with hallucinations W > 292.84 Other (or unknown) substance-induced mood disorder = A 292.89 Other (or unknown) substance-induced anxiety disorder @ C 292.89 Other (or unknown) substance-induced sexual dysfunction B ? 292.89 Other (or unknown) substance-induced sleep disorder > ; 292.90 Other (or unknown) substance-related disorder NOS : ,Schizophrenia and Other Psychotic Disorders + . 295.10 Schizophrenia, disorganized type - + 295.20 Schizophrenia, catatonic type * * 295.30 Schizophrenia, paranoid type ) * 295.60 Schizophrenia, residual type ) 2 295.90 Schizophrenia, undifferentiated type 1 & 295.70 Schizoaffective disorder % ' 295.40 Schizophreniform disorder & 297.10 Delusional disorder $ 298.80 Brief psychotic disorder # 297.30 Shared psychotic disorder 4 293.81 Psychotic disorder with delusions due to 3 9 293.82 Psychotic disorder with hallucinations due to 8 298.90 Psychotic disorder NOS Mood Disorders Depressive disorders: 9 296.20 Major depression, single episode, unspecified 8 2 296.21 Major depression, single episode, mild 1 6 296.22 Major depression, single episode, moderate 5 P 296.23 Major depression, single episode, severe, without psychotic features O M 296.24 Major depression, single episode, severe, with psychotic features L B 296.25 Major depression, single episode, in partial remission A ? 296.26 Major depression, single episode, in full remission > 4 296.30 Major depression, recurrent, unspecified 3 - 296.31 Major depression, recurrent, mild , 1 296.32 Major depression, recurrent, moderate 0 K 296.33 Major depression, recurrent, severe, without psychotic features J H 296.34 Major depression, recurrent, severe, with psychotic features ' = 296.35 Major depression, recurrent, in partial remission < : 296.36 Major depression, recurrent, in full remission 9 300.40 Dysthymic disorder ! 311.00 Depressive disorder NOS Bipolar disorders: A 296.00 Bipolar I disorder, single manic episode, unspecified @ : 296.01 Bipolar I disorder, single manic episode, mild 9 > 296.02 Bipolar I disorder, single manic episode, moderate = X 296.03 Bipolar I disorder, single manic episode, severe, without psychotic features W U 296.04 Bipolar I disorder, single manic episode, severe, with psychotic features T J 296.05 Bipolar I disorder, single manic episode, in partial remission I G 296.06 Bipolar I disorder, single manic episode, in full remission F = 296.40 Bipolar I disorder, most recent episode hypomanic < F 296.40 Bipolar I disorder, most recent episode manic, unspecified E ? 296.41 Bipolar I disorder, most recent episode manic, mild > C 296.42 Bipolar I disorder, most recent episode manic, moderate B ] 296.43 Bipolar I disorder, most recent episode manic, severe, without psychotic features \ Z 296.44 Bipolar I disorder, most recent episode manic, severe, with psychotic features Y O 296.45 Bipolar I disorder, most recent episode manic, in partial remission N L 296.46 Bipolar I disorder, most recent episode manic, in full remission K J 296.50 Bipolar I disorder, most recent episode depressed, unspecified I C 296.51 Bipolar I disorder, most recent episode depressed, mild B G 296.52 Bipolar I disorder, most recent episode depressed, moderate F a 296.53 Bipolar I disorder, most recent episode depressed, severe, without psychotic features ` ^ 296.54 Bipolar I disorder, most recent episode depressed, severe, with psychotic features ] S 296.55 Bipolar I disorder, most recent episode depressed, in partial remission R P 296.56 Bipolar I disorder, most recent episode depressed, in full remission O F 296.60 Bipolar I disorder, most recent episode mixed, unspecified E ? 296.61 Bipolar I disorder, most recent episode mixed, mild > C 296.62 Bipolar I disorder, most recent episode mixed, moderate B ] 296.63 Bipolar I disorder, most recent episode mixed, severe, without psychotic features \ Z 296.64 Bipolar I disorder, most recent episode mixed, severe, with psychotic features Y O 296.65 Bipolar I disorder, most recent episode mixed, in partial remission N L 296.66 Bipolar I disorder, most recent episode mixed, in full remission K ? 296.70 Bipolar I disorder, most recent episode unspecified > 296.89 Bipolar II disorder 296.80 Bipolar disorder NOS 301.13 Cyclothymic disorder Anxiety disorders: - 300.01 Panic disorder, without agoraphobia , * 300.21 Panic disorder, with agoraphobia ) 7 300.22 Agoraphobia without history of panic disorder 6 300.29 Specific phobia 300.23 Social phobia ) 300.30 Obsessive-compulsive disorder ( ) 309.81 Posttraumatic stress disorder ( 308.30 Acute stress disorder & 300.02 Generalized anxiety disorder % # 293.89 Anxiety disorder 2 ... " 300.00 Anxiety disorder NOS )Mood disorders not elsewhere classified: ( 293.83 Mood disorder 2 296.90 Mood disorder NOS Somatoform Disorders 300.81 Somatization disorder . 300.81 Undifferentiated somatoform disorder - 300.11 Conversion disorder ? 307.80 Pain disorder associated with psychological factors > W 307.89 Pain disorder associated with psychological factors and a medical condition V 300.70 Hypochondriasis " 300.70 Body dysmorphic disorder ! 300.81 Somatoform disorder Factitious Disorders O 300.16 Factitious disorder with predominantly psychological signs & symptoms N J 300.19 Factitious disorder with predominantly physical signs & symptoms I U 300.19 Factitious disorder with combined psychological & physical signs & symptoms T ! 300.19 Factitious disorder NOS Dissociative Disorders 300.12 Dissociative amnesia 300.13 Dissociative fugue ( 300.14 Dissociative identity disorder ' $ 300.60 Depersonalization disorder # # 300.15 Dissociation disorder NOS " #Sexual & Gender Identity Disorders " Sexual dysfunctions: - 302.71 Hypoactive sexual desire disorder , $ 302.79 Sexual aversion disorder # * 302.72 Female sexual arousal disorder ) " 302.72 Male erectile disorder ! $ 302.73 Female orgasmic disorder # " 302.74 Male orgasmic disorder ! ! 302.75 Premature ejaculation 8 302.76 Dyspareunia (not due to a medical condition) 7 7 306.51 Vaginismus (not due to a medical condition) 6 7 625.80 Female hypoactive sexual desire disorder 2 6 5 608.89 Male hypoactive sexual desire disorder 2 0 0 % 607.84 Male erectile disorder 2 ! 625.00 Female dyspareunia 2 608.89 Male dyspareunia 2 . 625.80 Other female sexual dysfunction 2 ) ) , 608.89 Other male sexual dysfunction 2 ' ' 302.70 Sexual dysfunction NOS Paraphilias: 302.40 Exhibitionism 302.81 Fetishism 302.89 Frotteurism 302.20 Pedophilia 302.83 Sexual masochism 302.84 Sexual sadism ! 302.30 Transvestic fetishism 302.82 Voyeurism 302.90 Paraphilia NOS Gender identity disorders: 0 302.60 Gender identity disorder in children / = 302.85 Gender identity disorder in adolescents or adults < & 302.60 Gender identity disorder NOS % 302.90 Sexual disorder NOS Eating Disorders 307.10 Anorexia nervosa 307.51 Bulimia nervosa 307.50 Eating disorder NOS Sleep Disorders Dyssomnias: 307.42 Primary insomnia 307.44 Primary hypersomnia 347.00 Narcolepsy * 780.59 Breathing-related sleep disorder ) + 307.45 Circadian rhythm sleep disorder * 307.47 Dyssomnia NOS Parasomnias: 307.47 Nightmare disorder 307.46 Sleep terror disorder 307.46 Sleepwalking disorder 307.47 Parasomnia NOS 4Sleep disorders related to another mental disorder: 3 307.42 Insomnia related to ! 307.44 Hypersomnia related to Other sleep disorders: / 780.52 Sleep disorder, insomnia type, 2 ... . 2 780.54 Sleep disorder, hypersomnia type, 2 ... + + 1 780.59 Sleep disorder, parasomnia type, 2 ... * * , 780.59 Sleep disorder, mixed type, 2 ... % % 3Impulse-Control Disorders Not Elsewhere Classified 2 ) 312.34 Intermittent explosive disorder ( 312.32 Kleptomania 312.33 Pyromania 312.31 Pathological gambling 312.39 Trichotillomania & 312.30 Impulse-control disorder NOS % Adjustment Disorders 1 309.00 Adjustment disorder with depressed mood 0 * 309.24 Adjustment disorder with anxiety ) C 309.28 Adjustment disorder with mixed anxiety and depressed mood B 9 309.30 Adjustment disorder with disturbance of conduct 8 J 309.40 Adjustment disorder with mixed disturbance of emotions & conduct I ! 309.90 Adjustment disorder NOS Personality Disorders (Axis II) Cluster A: ' 301.00 Paranoid personality disorder & ' 301.20 Schizoid personality disorder & * 301.22 Schizotypal personality disorder ) Cluster B: ) 301.70 Antisocial personality disorder ( ) 301.83 Borderline personality disorder ( ) 301.50 Histrionic personality disorder ( + 301.81 Narcissistic personality disorder * Cluster C: ' 301.82 Avoidant personality disorder & ( 301.60 Dependent personality disorder ' 3 301.40 Obsessive-compulsive personality disorder 2 " 301.90 Personality disorder NOS ! ! V71.09 No diagnosis on axis II ' 799.90 Diagnosis deferred on axis II & ;Other Conditions That May Be a Focus of Clinical Attention : F 316.00 Psychological factors affecting medical condition [specify] E * 332.10 Neuroleptic-induced parkinsonism ) ( 332.92 Neuroleptic malignant syndrome ' , 333.70 Neuroleptic-induced acute dystonia + - 333.99 Neuroleptic-induced acute akathisia , 0 333.82 Neuroleptic-induced tardive dyskinesia / , 333.10 Medication-induced postural tremor + 2 333.90 Medication-induced movement disorder NOS 1 + 995.20 Adverse effects of medication NOS * V V61.90 Relational problem related to a mental disorder or general medical condition U ) V61.20 Parent-child relational problem ( $ V61.10 Partner relational problem # $ V61.80 Sibling relational problem # V62.81 Relational problem NOS ! V61.21 Physical abuse of child V61.21 Sexual abuse of child V61.21 Neglect of child R V61.10 Physical abuse of adult (code 995.81 if focus of attention is on victim) Q P V61.10 Sexual abuse of adult (code 995.81 if focus of attention is on victim) O & V15.81 Noncompliance with treatment % V65.20 Malingering # V71.01 Adult antisocial behavior " 1 V71.02 Child or adolescent antisocial behavior 0 @ V62.89 Borderline intellectual functioning (coded on axis II) ? ' 780.90 Age-related cognitive decline & V62.82 Bereavement V62.30 Academic problem V62.20 Occupational problem 313.82 Identity problem ( V62.89 Religious or spiritual problem ' V62.40 Acculturation problem V62.89 Phase of life problem 4 300.90 Unspecified mental disorder (nonpsychotic) 3 - V71.09 No diagnosis or condition on axis I , 3 799.90 Diagnosis or condition deferred on axis I 2 ` = DSMlbl H R , ; cREVTable currentview code cREVGeneral revUniqueID 1210818071818 code descriptionlbl H ,l K cREVTable currentvscroll 0 viewablerows 2currentxmouseloc 155currenthscroll 0currentymouseloc 51scrollbarwidth 20 cellyspacing 16viewablecolumns 9rightfieldloc 766numbertabstops 1 cellxspacing 75 leftfieldloc 138topfieldloc 42currentviewdescription
bottomfieldloc 61 cREVGeneral revUniqueID 1210818158400 description find Ex !on mouseUp doFind end mouseUp 7 7 ^ cREVGeneral scriptChecksum ' 1 bookmarks revUniqueID 1210818653865handlerList mouseUpscriptSelection char 14 to 13prevHandler mouseUptempScript scripton mouseUp
doFind
end mouseUp
findfields I cREVGeneral revUniqueID 1210824013101 findStr )x [on openfield find empty -- select text of me -- doesn't work! end openfield on returninfield put sr(me) into me select empty if me <> empty then send mouseup to btn "find" end if end returninfield on enterinfield put sr(me) into me select empty if me <> empty then send mouseup to btn "find" end if end enterinfield @ cREVGeneral scriptChecksum Uػvq|#handlerList $openfield returninfield enterinfieldbreakPoints scriptSelection char 65 to 64 bookmarks revUniqueID 1210818305326scripteditorvscroll 0scripteditorselection 0prevHandler enterinfieldtempScript scripton openfield
find empty
-- select text of me -- doesn't work!
end openfield
on returninfield
put sr(me) into me
select empty
if me <> empty then
send mouseup to btn "find"
end if
end returninfield
on enterinfield
put sr(me) into me
select empty
if me <> empty then
send mouseup to btn "find"
end if
end enterinfield
Rectangle K@ + cREVGeneral revUniqueID 1210947494749 RockSmooth @ X . d JFIF H H 6Exif MM * b j( 1 r2 i H H Adobe Photoshop CS Windows 2006:03:04 19:46:56 X &( . H H Photoshop 3.0 8BIM% 8BIM H H 8BIM&