Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: YSDX3A

Package: Mental Health

Routine: YSDX3A


Information

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

Source Information

Source file <YSDX3A.m>

Entry Points

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

Interaction Calls

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YSD(627.8 - [#627.8] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call