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

Package: Registration

Routine: DGTSSET


Information

DGTSSET ;ALB/LM - TREATING SPECIALTY SETUP & INITIALIZATION ; 4-1-93

Source Information

Source file <DGTSSET.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 4 C^%DTC  ^DIC  ^DIE  EN1^DIP  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DG TREATING PRINT  DG TREATING SETUP  

Entry Points

Name Comments DBIA/ICR reference
PR ;
FTS ; Facility Treating Specialty File
END
C ; Treating Specialty Multiple
; Census Multiple
NOTE ; note to be displayed;
START
DV ; Medical Center Division File
TSR ; Day before TSR Initialiation Date

External References

Name Field # of Occurrence
C^%DTC TSR+5
^DIC FTS+2, DV+3
^DIE FTS+5, C+2
EN1^DIP PR+2
$$FMTE^XLFDT TSR+4, TSR+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"I cannot run this program until you specify an early date",!,"to run the G&L in the site parameters.",!!,*7,*7
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"I cannot run this program until you set up your Medical Center's",!,"Division File",!!,*7,*7
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !
  • Line Location: FTS+1
Function Call: WRITE
  • Prompt: !!?5,"The information for the ",DGTS," treating specialty"
  • Line Location: NOTE+1
Function Call: WRITE
  • Prompt: !?5,"should be entered ",$S($D(DGTSDIV):"by Medical Center Division",1:"")," as of midnight on "
  • Line Location: NOTE+2
Function Call: WRITE
  • Prompt: !?5,DGTSDT," to properly initialize the Treating Specialty Report!",!!
  • Line Location: NOTE+3
Function Call: WRITE
  • Prompt: ?5,"Following any new entries to or revisions of this data, "
  • Line Location: NOTE+4
Function Call: WRITE
  • Prompt: !?5,"the G&L MUST BE recalculated back to ",DGTSINDT,".",!!
  • Line Location: NOTE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTE+7
Function Call: WRITE
  • Prompt: !!,"This report should be printed on 132 columns.",!
  • Line Location: PR+1
Routine Call
  • DIE
  • Line Location:
    • FTS+5
    • C+2
Routine Call
  • DIC
  • Line Location:
    • FTS+2
    • DV+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(40.8 - [#40.8] Classic Fileman Calls
^DIC(45.7 - [#45.7] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] START+5, DV+5
^DG(43 - [#43] START, START+1, TSR+1
^DIC(45.7 - [#45.7] FTS+5, NOTE+8

Label References

Name Line Occurrences
DV C+6
END START+3, START+5, FTS+2
FTS DV+3, C+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA FTS+5*, FTS+7!, DV+3*, DV+5*, C+4!, END!
DGEGL START*, START+3, START+5*, FTS+7!, END!
DGTS FTS+5*, NOTE+1, NOTE+8, END!
DGTSDIV START+1*, NOTE+2, DV+3, DV+5, C+6, C+8, END!
DGTSDT TSR+7*, NOTE+3, END!
DGTSDV DV+3*, DV+5*, END!
DGTSIEN FTS+5*, END!
DGTSIF NOTE+8*, END!
DGTSIN TSR+1*, TSR+3*, TSR+4, TSR+5*, TSR+7, END!
>> DGTSINDT TSR+4*, NOTE+5
DGTSPT END!
>> DHD PR+2*
DIC FTS+2*, FTS+5, FTS+7!, DV+1*, C+4!, PR+2*, END!
DIC(0 FTS+2*, DV+1*
DIE FTS+5*, FTS+7!, C+2*, C+4!, END!
>> DLAYGO FTS+2*
DR FTS+5*, FTS+7!, C+2*, C+4!, END!
>> FLDS PR+2*
>> L PR+2*
X TSR+5, FTS+7!, C+4!, END!
X1 TSR+5*, FTS+7!, END!
X2 TSR+5*, FTS+7!, END!
Y FTS+2, FTS+5, FTS+7!, DV+3, C+4!
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