Routine: YSDXR

Information

YSDXR ;SLC/DKG/RWF/ASF/LJA,HIOFO/FT - (DSM-III) DIAGNOSIS REPORT ;9/20/11 16:37

Source file <YSDXR.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PR+5
Function Call: WRITE	Prompt: !,"DXLS (DSM-III): ",$P(^YSD(627.7,+$P(X(1),U,2),0),U,2) Line Location: PR+10
Function Call: WRITE	Prompt: " ON" Line Location: PR+11
Function Call: WRITE	Prompt: !,"DXLS (ICD9): ",$P(^ICD9($P(X(1),U,2),0),U) Line Location: PR+16
Function Call: WRITE	Prompt: " ON" Line Location: PR+17
Function Call: WRITE	Prompt: !,"'X' DIAGNOSIS (DSM-III): ",$P(^YSD(627.7,$P(X(1),U,4),0),U,2) Line Location: PR+22
Function Call: WRITE	Prompt: " ON" Line Location: PR+23
Function Call: WRITE	Prompt: !,"'X' DIAGNOSIS (ICD9): ",$P(^ICD9($P(X(1),U,4),0),U) Line Location: PR+28
Function Call: WRITE	Prompt: " ON" Line Location: PR+29
Function Call: WRITE	Prompt: !!,"DSM-III DIAGNOSES:" Line Location: PR+32
Function Call: WRITE	Prompt: " ",$P(^VA(200,X,0),U) Line Location: PR+61
Function Call: WRITE	Prompt: ", ",^(0) Line Location: PR+63
Function Call: WRITE	Prompt: !?20,"COMMENT: ",$P(X," ",1,I) Line Location: PR+67