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 |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: XUXTADSSE

Package: Kernel

Routine: XUXTADSSE


Information

XUXTADSSE ;ESL/JAC/CM - Service/Section Edit ; JUN 26, 2020@9:30

Source Information

Source file <XUXTADSSE.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 $$ASKYESNO^XUXTADASK1  CONTINUE^XUXTADPRT1  (SHOWGOAL,SHOWOPT)^XUXTADPRT2  
VA FileMan 2 ^DDS  ^DIC  

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
Kernel 1 XUXTAD SERVICE/SECTION EDIT  

Entry Points

Name Comments DBIA/ICR reference
SHOWOPT(AXUXTADOPTION)
SHOWGOAL(XUXTADRTN)
CONTINUE(AXUXTADLF,AXUXTADTYPE)
ASKYESNO(AYESNOPROMPT,AXUXTADDEF)
FMDIC
SMDDS
GOAL ;; Display the goal of this routine.
ENTER ; Allow the ADPAC to update CHIEF of the SERVICE/SECTION file (#49)
PROMPT ; Begin & loopback entry point
START ; Call the FM ScreenMan SERVICE/SECTION EDIT form
EXIT ; Exit option
ASKGOAL ;Prompt to determine if user want to see purpose/goal of option
DDSERR ; Display FM ScreenMan error(s)
EDIT(XUXTADXUFILE,XUXTADXUDA) ; Edit SERVICE/SECTION ScreenMan form
GETSVC(XUXTADXUFILE) ; Ask/prompt for SERVICE/SECTION using DIC utility call

External References

Name Field # of Occurrence
^DDS SMDDS
^DIC FMDIC
$$ASKYESNO^XUXTADASK1 ASKYESNO
CONTINUE^XUXTADPRT1 CONTINUE
SHOWGOAL^XUXTADPRT2 SHOWGOAL
SHOWOPT^XUXTADPRT2 SHOWOPT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PROMPT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKGOAL+13
Function Call: WRITE
  • Prompt: @IOF,!!
  • Line Location: DDSERR+4
Function Call: WRITE
  • Prompt: !,?1,^TMP("DIERR",$J,1,"TEXT",XUXTADNUM)
  • Line Location: DDSERR+8
Routine Call
  • DDS
  • Line Location:
    • SMDDS
Routine Call
  • DIC
  • Line Location:
    • FMDIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("DIERR" DDSERR+7, DDSERR+8, DDSERR+12!
^TMP("SS" EXIT+1!

Label References

Name Line Occurrences
$$ASKYESNO ASKGOAL+14
ASKGOAL ENTER+11
CONTINUE DDSERR+10
DDSERR EDIT+22
EDIT START+2
EXIT ENTER+11, PROMPT+3
FMDIC GETSVC+14
GETSVC PROMPT+3
PROMPT START+2, START+4
SHOWGOAL ENTER+12
SHOWOPT ENTER+10, PROMPT+2
SMDDS EDIT+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EDIT+7~, GETSVC+6~
AXUXTADDEF ASKYESNO~
AXUXTADLF CONTINUE~
AXUXTADOPTION SHOWOPT~
AXUXTADTYPE CONTINUE~
AYESNOPROMPT ASKYESNO~
C GETSVC+6~
D GETSVC+6~
D0 GETSVC+6~
DA EDIT+7~, EDIT+11*, GETSVC+6~
DBT GETSVC+6~
DDH GETSVC+6~
DDSCHANG EDIT+7~
DDSFILE EDIT+7~, EDIT+10*
DDSPAGE EDIT+7~, EDIT+20*
DDSPARM EDIT+7~, EDIT+19*
DDSSAVE EDIT+7~
DG GETSVC+6~
DIC GETSVC+6~, GETSVC+10*
DIC("A" GETSVC+12*
DIC(0 GETSVC+11*
DIERR EDIT+7~, EDIT+22
DILN GETSVC+6~
DILOCKTM EDIT+8~
DIMSG EDIT+7~
DINUM EDIT+8~, GETSVC+6~
DIPGM GETSVC+6~
DISYS GETSVC+7~
DIY GETSVC+7~
DR EDIT+8~, EDIT+12*
DST GETSVC+7~
DTOUT EDIT+8~, GETSVC+7~
DUOUT GETSVC+7~
DUTOUT EDIT+8~
DZ GETSVC+7~
I EDIT+8~, GETSVC+7~
IOF DDSERR+4
IOPAR EDIT+8~
IOUPAR EDIT+8~
U GETSVC+17
X GETSVC+7~, GETSVC+15
XUXTADDEF ASKGOAL+8~, ASKGOAL+12*, ASKGOAL+14
XUXTADGOAL ENTER+4~, ENTER+12, ASKGOAL+11, ASKGOAL+14*, ASKGOAL+15
XUXTADNUM DDSERR+2~, DDSERR+6*, DDSERR+7*, DDSERR+8
XUXTADOPTION ENTER+4~, ENTER+6*, ENTER+10, PROMPT+2, EDIT+12
XUXTADQUIT ENTER+4~, ENTER+7*, ENTER+11, PROMPT+3, START+2, ASKGOAL+10*, ASKGOAL+15*, EDIT+22*, GETSVC+15*, GETSVC+16*
XUXTADRTN SHOWGOAL~
XUXTADSSFILE ENTER+4~, ENTER+8*, PROMPT+3, START+2
XUXTADXUDA ENTER+4~, START+2, EDIT~, EDIT+11, GETSVC+9!, GETSVC+17*
XUXTADXUFILE EDIT~, EDIT+10, GETSVC~, GETSVC+10
Y GETSVC+7~, GETSVC+16, GETSVC+17

Marked Items

Name Field # of Occurrence
$T( ENTER+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All