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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: SDCO41

Package: Scheduling

Routine: SDCO41


Information

SDCO41 ;ALB/RMO - Diagnosis Cont. - Check Out;19 MAR 1993 9:15 am

Source Information

Source file <SDCO41.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
DRG Grouper 1 $$ICDDX^ICDCODE  
Registration 1 ($$LOWER,PAUSE)^VALM1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Scheduling 2 SDCO0  SDCO4  

Entry Points

Name Comments DBIA/ICR reference
DX(SDICDI,SDDXDT) ;Diagnosis Display Data
; Input -- SDICDI IDC Diagnosis IEN
; -- SDDXDT Date to screen against
; Output -- Diagnosis Display Data - Code Number^Diagnosis
DXHLP(SDCL) ;Diagnosis Help for Clinic
; Input -- SDCL Hospital Location file IEN
; Output -- Help
DXDEF(SDCL) ;Diagnosis Default for Clinic
; Input -- SDCL Hospital Location file IEN
; Output -- Default
DXHLPQ

External References

Name Field # of Occurrence
$$ICDDX^ICDCODE DX+5
$$LOWER^VALM1 DXHLP+5
PAUSE^VALM1 DXHLP+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The following diagnoses are associated with ",$$LOWER^VALM1($P($G(^SC(SDCL,0)),"^")),":"
  • Line Location: DXHLP+5
Function Call: WRITE
  • Prompt: !!,"Default Diagnosis: "
  • Line Location: DXHLP+6
Function Call: WRITE
  • Prompt: $S(SDDXDF:$P(SDDXDF,"^")_" "_$P(SDDXDF,"^",2),1:"[None]")
  • Line Location: DXHLP+6
Function Call: WRITE
  • Prompt: !!,"Other diagnoses: "
  • Line Location: DXHLP+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] DXHLP+4, DXHLP+5, DXHLP+8, DXDEF+4
^SC("ADDX" DXHLP+8, DXDEF+4

Label References

Name Line Occurrences
$$DX DXHLP+9, DXDEF+4
$$DXDEF DXHLP+6
DXHLPQ DXHLP+4

Naked Globals

Name Field # of Occurrence
^( DXHLP+8, DXDEF+4
^(0 DXHLP+8, DXDEF+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C DXHLP+3~, DXHLP+8*, DXHLP+9*, DXHLP+10, DXHLP+11, DXHLP+13
DIRUT DXHLP+3~, DXHLP+8, DXHLP+11
I DXHLP+3~, DXHLP+8*
>> ICDVDT DX+5
SDCL DXHLP~, DXHLP+4, DXHLP+5, DXHLP+6, DXHLP+8, DXDEF~, DXDEF+4
SDDXD DXHLP+3~, DXHLP+9*, DXHLP+12
SDDXDF DXHLP+3~, DXHLP+6*
SDDXDT DX~, DX+5
SDICDI DXHLP+3~, DXHLP+8*, DXHLP+9, DX~, DX+5
SDXINF DX+4~, DX+5*, DX+6
Y DXDEF+3~, DXDEF+4*, DXDEF+5, DX+4~, DX+6*, DX+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All