Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: YSDX3UA0

Package: Mental Health

Routine: YSDX3UA0


Information

YSDX3UA0 ;DALISC/LJA - Continuation of YSDX3UA0 code... ;8/17/94 08:22

Source Information

Source file <YSDX3UA0.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 DD^%DT  YN^DICN  ^DIE  
DRG Grouper 1 $$ICDDATA^ICDXCODE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health 1 YSDX3UA  

Entry Points

Name Comments DBIA/ICR reference
DXLS ;This subroutine looks up and displays the diagnosis for Length of Stay (DXLS)
DXLSQ ;
EOR ;YSDX3UA0 - Continuation of YSDX3UA0 code... ;8/17/94

External References

Name Field # of Occurrence
DD^%DT DXLS+8
YN^DICN DXLSQ+5
^DIE DXLSQ+14
$$ICDDATA^ICDXCODE DXLS+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The following diagnosis has been noted as the DXLS: "
  • Line Location: DXLS+27
Function Call: WRITE
  • Prompt: !!?3,YSDXLS_" "_$E(YSDXLSN,1,48)," dated ",YSDXLSD
  • Line Location: DXLS+28
Function Call: WRITE
  • Prompt: !!,"Is "_YSW_" "_$E(YSWN,1,45),!?5," the DXLS"
  • Line Location: DXLSQ+3
Function Call: WRITE
  • Prompt: !!,"This is the diagnosis accounting the largest % of length of stay for this "
  • Line Location: DXLSQ+8
Function Call: WRITE
  • Prompt: !,"admission. There may only be ONE DXLS (DSM or ICD) per admission."
  • Line Location: DXLSQ+9
Routine Call
  • DIE
  • Line Location:
    • DXLSQ+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YSD(627.8 - [#627.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^YSD(627.7 - [#627.7] DXLS+17
^YSD(627.8 - [#627.8] DXLS+2, DXLS+3, DXLS+4, DXLS+5, DXLS+6, DXLS+8, DXLSQ+13, DXLSQ+15

Label References

Name Line Occurrences
DXLSQ DXLSQ+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DXLSQ+4*, DXLSQ+6, DXLSQ+7
>> C2 DXLSQ+2
>> DA DXLSQ+12*, DXLSQ+13, DXLSQ+15
>> DIE DXLSQ+12*
>> DR DXLSQ+12*
>> J DXLS+3*, DXLS+4
>> J1 DXLS+4*, DXLS+5, DXLS+6, DXLS+8, DXLSQ+11, DXLSQ+12
>> J2 DXLS+6*, DXLS+10, DXLS+11
>> J3 DXLS+10*, DXLS+12, DXLS+16, DXLS+21
>> J4 DXLS+11*, DXLS+12, DXLS+17, DXLS+22
>> J5 DXLS+12*, DXLS+13
>> J50 DXLS+13*, DXLS+18
U DXLS+5, DXLS+6, DXLS+8, DXLS+18, DXLS+23, DXLS+24
>> Y DXLS+8*
>> YSDFN DXLS+2, DXLS+3, DXLS+4
YSDXDATA DXLS+22~*, DXLS+23, DXLS+24
>> YSDXLS DXLS+17*, DXLS+23*, DXLS+26, DXLS+28
>> YSDXLSD DXLS+8*, DXLS+28
YSDXLSD2 DXLS+7~, DXLS+8*, DXLS+22
>> YSDXLSN DXLS+18*, DXLS+24*, DXLS+28
>> YSDXLX DXLSQ+2*, DXLSQ+6*, DXLSQ+10*
>> YSW DXLSQ+3
>> YSWN DXLSQ+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All