Routine: YSDX3A

Select the objects that you wish to see in the downloaded PDF

Info
Source
Entry Points
Interaction Calls
FileMan Files Accessed Via FileMan Db Call

Information

YSDX3A ;SLC/DJP - Entry of Axis 3 Diagnosis for the Mental Health Med Rec ; 17 Oct 2014 9:46 AM

Source file <YSDX3A.m>

Name	Comments	DBIA/ICR reference
AXIS3	;
QUES2	;Subroutine presents questions for Axis 3
QUES2B
DUPLCK	;Checks for and displays possible duplicate entries
CORR	;
FILE	;

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!!?10,"ENTRY OF DIAGNOSIS - Continued - ",$E(YSNM,1,25) Line Location: AXIS3+2
Function Call: WRITE	Prompt: !!,"ACTIVE ICD DIAGNOSES (Axis 3): ",! Line Location: AXIS3+2
Function Call: WRITE	Prompt: !!?3,"No active ICD diagnosis on file for ",YSNM,".",! Line Location: AXIS3+3
Function Call: WRITE	Prompt: !!,"You must hold correct security key to enter ",YSACS," diagnosis." Line Location: QUES2+5
Function Call: READ	Variable: X2 Timeout: DTIME Line Location: QUES2+10
Function Call: WRITE	Prompt: !!,"Invalid Diagnosis for DATE/TIME OF DIAGNOSIS that was entered." Line Location: CORR+3
Function Call: WRITE	Prompt: !!?10,YSW_" "_YSWN,!!,"Is this the ICD diagnosis you wish to select" Line Location: CORR+6
Function Call: WRITE	Prompt: !!,"""YES"" indicates the diagnosis entered applies to ",YSNM,"." Line Location: CORR+8