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
Print Page as PDF
Routine: YSDX3R1

Package: Mental Health

Routine: YSDX3R1


Information

YSDX3R1 ;SLC/DJP/LJA - Print of DXLS History for Mental Health Med Rec ;10 May 2013 4:05 PM

Source Information

Source file <YSDX3R1.m>

Entry Points

Name Comments DBIA/ICR reference
ENTRY ;
DEVICE ;
ENPR ;Entry to core of print program.
PR ;
END ;
DXLS ;
AUTH ;
COMMENT ;
FINISH ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ENTRY+2
Function Call: WRITE
  • Prompt: !!?IOM-$L("DXLS HISTORY")\2," DXLS HISTORY ",!!
  • Line Location: ENTRY+2
Function Call: WRITE
  • Prompt: !!?10,"No history on file for ",YSNM
  • Line Location: ENTRY+4
Function Call: WRITE
  • Prompt: !!,"Prinicipal Diagnosis (DXLS): "
  • Line Location: PR+3
Function Call: WRITE
  • Prompt: !!?3,YSDXCSTX,?12,YSDXLS_" "_$E(YSDXLSN,1,56)
  • Line Location: AUTH+8
Function Call: WRITE
  • Prompt: !?9,"Comments: ",!
  • Line Location: COMMENT+3
Function Call: WRITE
  • Prompt: !?9,"Entered by: ",YSAUTH,!?9,"Dated ",YSDXLSD,!
  • Line Location: COMMENT+7
Info |  Source |  Entry Points |  Interaction Calls