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: YSDX3UA

Package: Mental Health

Routine: YSDX3UA


Information

YSDX3UA ;SLC/DJP/LJA,HIOFO/FT - Utilities for Dx Entry in MH Med Rec (cont.) ;10 May 2013 2:25 PM

Source Information

Source file <YSDX3UA.m>

Entry Points

Name Comments DBIA/ICR reference
DSMLK ; Called by routine YSDX3
; Keywork lookup for DSM
LK1 ;
DSMP ; Called by routine YSDX3
ICDLK ; Called from YSDX3A
; Lookup on the ICD9 File
ICD1 ;
ICDP ; Called by routine YSDX3A
DXLS
DXLSQ
DUPL ; Called by routine YSDX3, YSDX3A
; Print out information concerning duplicate entry
DUPLP ;
FILE ; Called from routines YSDX3, YSDX3A
FILEQ ;
CHECK ;
DELETE ; Called by routine YSDX3UB
EOR ;YSDX3UA - Utilities for Diagnosis Entry in the MH Medical Record (cont.) ;4/16/92 11:17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ?? "
  • Line Location: DSMP+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DSMP+2
Function Call: WRITE
  • Prompt: !!,"This diagnosis has been entered as follows: "
  • Line Location: DUPLP+3
Function Call: WRITE
  • Prompt: !!?5,"DIAGNOSIS: ",?15,YSDXND_" "_YSDXD,!?5,"STATUS:"
  • Line Location: DUPLP+4
Function Call: WRITE
  • Prompt: ?13,W6,!?5,"BY:",?13,$E(W3,1,25)_" on "_W4,!
  • Line Location: DUPLP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: FILE+3
Function Call: WRITE
  • Prompt: !!?18,"Incomplete information."
  • Line Location: FILE+12
Function Call: WRITE
  • Prompt: !!," Do you want to record this diagnosis"
  • Line Location: FILEQ+3
Function Call: WRITE
  • Prompt: !!,"NO will delete this entry. YES will file it under the patient's name."
  • Line Location: FILEQ+5
Function Call: WRITE
  • Prompt: !!?18,"Incomplete information."
  • Line Location: CHECK+3
Function Call: WRITE
  • Prompt: !!?15,"< This diagnosis deleted. >"
  • Line Location: DELETE+4

FileMan Files Accessed Via FileMan Db Call

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