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

Package: Scheduling

Routine: SDAMOCC


Information

SDAMOCC ;IOFIO BAYPINES/TEH - AM Mgt Reports ; 12/1/91

Source Information

Source file <SDAMOCC.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Scheduling 4 CLINIC^SDAMO0  STATS^SDAMOC  $$RANGE^SDAMQ  ASK2^SDDIV  
VA FileMan 2 ^%DT  ^DIR  
Registration 1 FIRST^VAUTOMA  

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

Package Total Caller Graph
Scheduling 3 SDAM CANCELLED CLINIC RPT  SDAMOC  SDAMOC0  

Entry Points

Name Comments DBIA/ICR reference
EN ; main entry point
EN1
ASKBDT ;
ASKEDT ;
ENQ
INIT() ; -- init vars
RANGE() ; select date range
; input: none
; output: SDBEG := begin date
; SDEND := end date
; return: was selection made [ 1|yes 0|no]
SELECT() ; -- get selection criteria
; input: none
; output: SDSEL := criteria selected
; return: was selection made [ 1|yes 0|no]
DIV() ; -- get division data
; input: none
; output: VAUTD := divs selected (VAUTD=1 for all)
; return: was selection made [ 1|yes 0|no]
CLINIC() ; -- get clinic data
; input: VAUTD := divisions selected
; output: VAUTC := clinic selected (VAUTC=1 for all)
; return: was selection made [ 1|yes 0|no]
CLINICQ
STOP() ; -- get stop code data
; output: VAUTC := stop codes selected (VAUTC=1 for all)
; return: was selection made [ 1|yes 0|no]
STOPQ
LINE(STR) ; -- print line
; input: STR := text to insert
; output: none
; return: text to use

External References

Name Field # of Occurrence
^%DT ASKBDT+3, ASKEDT+2
^DIR SELECT+10
CLINIC^SDAMO0 CLINIC+6
STATS^SDAMOC ASKEDT+10
$$RANGE^SDAMQ RANGE+7
ASK2^SDDIV DIV+6
FIRST^VAUTOMA STOP+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$$LINE("Date Range Selection"),!
  • Line Location: ASKBDT+1
Function Call: WRITE
  • Prompt: !!,"Invalid Date!",!
  • Line Location: ASKBDT+5
Function Call: WRITE
  • Prompt: !!,"Invalid Date!",!
  • Line Location: ASKEDT+4
Function Call: WRITE
  • Prompt: !!,"Ending Date must be equal to or greater than Beginning Date."
  • Line Location: ASKEDT+5
Function Call: WRITE
  • Prompt: !!,$$LINE("Date Range Selection")
  • Line Location: RANGE+6
Function Call: WRITE
  • Prompt: !!,$$LINE("Statisitcs Criteria")
  • Line Location: SELECT+5
Function Call: WRITE
  • Prompt: !!,$$LINE("Clinic Selection")
  • Line Location: CLINIC+5
Function Call: WRITE
  • Prompt: !!,$$LINE("Stop Codes Selection")
  • Line Location: STOP+4
Routine Call
  • DIR
  • Line Location:
    • SELECT+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(40.7 - [#40.7] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(43 - [#43] DIV+5

Label References

Name Line Occurrences
$$INIT EN1
$$LINE ASKBDT+1, RANGE+6, SELECT+5, DIV+5, CLINIC+5, STOP+4
ASKBDT ASKBDT+5
ASKEDT ASKEDT+4, ASKEDT+5
ENQ EN1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT ASKBDT+2*, ASKBDT+6!, ASKEDT+1*, ASKEDT+6!
%DT("A" ASKBDT+2*, ASKEDT+1*
DIC EN+1~, STOP+5*
DIR SELECT+10!
DIR("A" SELECT+9*
DIR("B" SELECT+9*
DIR(0 SELECT+9*
DIRUT EN+1~, SELECT+10
IOM LINE+7
SDAMLIST EN+1~
SDBEG EN+1~, ASKBDT+3*, ASKEDT+5, RANGE+7
SDEND EN+1~, ASKEDT+2*, ASKEDT+5, RANGE+7
SDSEL EN+1~, ASKEDT+8*, ASKEDT+9*, SELECT+10*, SELECT+11
SDSORT EN+1~
STR LINE~, LINE+6*, LINE+7, LINE+8
U DIV+5
VAUTC EN+1~, CLINIC+7!, CLINICQ, STOP+7!, STOPQ
VAUTD EN+1~, DIV+6!, DIV+7
VAUTNI EN+1~, STOP+5*
VAUTSTR EN+1~, STOP+5*
VAUTVB EN+1~, STOP+5*
X ASKBDT+4, ASKEDT+3, SELECT+6*, SELECT+7*, SELECT+8*, SELECT+9, LINE+5~, LINE+7*, LINE+8
Y EN+1~, ASKBDT+3, ASKBDT+5, ASKBDT+6!, ASKEDT+2, ASKEDT+4, ASKEDT+6!, SELECT+10, DIV+6, CLINIC+7
, STOP+7
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