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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DG531095P

Package: Registration

Routine: DG531095P


Information

DG531095P ;ALB/CC - ADD COMPACT TO DGEEWEBSVC CLASS ; Mar 22, 2023@14:22:39

Source Information

Source file <DG531095P.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 $$FIND1^DIC  (FILE,UPDATE)^DIE  DT^DILF  $$GET1^DIQ  
Kernel 3 ($$DEFDIR,$$LIST)^%ZISH  (BMES,MES)^XPDUTL  $$ENCRYP^XUSRB1  
Web Services Client 1 $$GENPORT^XOBWLIB  

Entry Points

Name Comments DBIA/ICR reference
HELP ; Help for ?? on Installation Question POS1 (use direct writes in env check routine)
PRE ; PRE-INSTALL Main entry point
; This routine contains the pre-install check which gets executed
; before patch DG*5.3*1095 is allowed to install.
; - Check that the wsdl file is accessible
CHK ; Check for existence of WSDL file.
GETPATH(DGBWSDL) ; - Get the location of the DGBWSDL file
; Return the path of the file. If not found, give error message and return NULL
POST ; POST-INSTALL Main entry point
; ICRs:
; 10141 : BMES^XPDUTL
; : MES^XPDUTL
; 5421 : GENPORT^XOBWLIB
; 7190 : R/W access to file 18.02
; 7191 : R/W access to file 18.12
; 2240 : $$ENCRYP^XUSRB1
; 10096 : ^%ZSOF("DEL")
; 3352 : DIEZ^DIKCUTL3
POST1 ; Setup DG EE SUMMARY SERVER and SERVICE
SERVICE ; from wsdl, create/compile classes and set up service
SERVER ; set up web server
DISABLE ; Disable DG EE SUMMARY server if it exists - update of server will set it back to enabled (except for Pre-prod)
POST2 ; Cleanup of routines generated by WSDL compilation
ROU ; WSDL routines compiled
TYPEMAP ; Map the system type to the SERVER endpoint, Password and Port values

External References

Name Field # of Occurrence
$$DEFDIR^%ZISH GETPATH+31
$$LIST^%ZISH GETPATH+16, GETPATH+24, GETPATH+28, GETPATH+32
$$FIND1^DIC SERVER+12, DISABLE+2
FILE^DIE SERVER+37, DISABLE+6
UPDATE^DIE SERVER+38, SERVER+51
DT^DILF PRE+17
$$GET1^DIQ SERVER+46
$$GENPORT^XOBWLIB SERVICE+7
BMES^XPDUTL PRE+12, PRE+25, PRE+28, CHK+2, GETPATH+18, GETPATH+34, POST+11, POST+14, POST1+2, SERVICE+8
SERVER+40, SERVER+41, SERVER+53, DISABLE+7, POST2+1
MES^XPDUTL PRE+26, PRE+27, CHK+6, GETPATH+19, GETPATH+20, GETPATH+35, GETPATH+36, SERVER+7, SERVER+52
$$ENCRYP^XUSRB1 SERVER+35

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Enter 1 if patch is being installed in a Pre-Production (Mirror) system."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"Enter 2 if patch is being installed in a Software Quality Assurance system."
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !,"Enter 3 if patch is being installed in a Development system."
  • Line Location: HELP+3
Routine Call
  • DIC
  • Line Location:
    • SERVER+12
    • DISABLE+2
Routine Call
  • DIE
  • Line Location:
    • SERVER+37
    • DISABLE+6
Routine Call
  • DIE
  • Line Location:
    • SERVER+38
    • SERVER+51

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XOB(18.02 - [#18.02] GET1^DIQ
^XOB(18.12 - [#18.12] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("DEL" POST2+5, POST2+8
^XOB(18.12 - [#18.12] SERVER+45
^XTMP("DG531095" PRE+16!, PRE+18*, PRE+19*, PRE+20*, GETPATH+6, GETPATH+7

Label References

Name Line Occurrences
$$GETPATH CHK+3, SERVICE+2
CHK PRE+23
DISABLE POST1+7
POST1 POST+12
POST2 POST+13
SERVER POST1+9
SERVICE POST1+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DGARR SERVICE+1~, SERVICE+7
DGARR("CACHE PACKAGE NAME" , SERVICE+4*
DGARR("WEB SE RVICE NAME" , SERVICE+5*
DGARR("WSDL F ILE" , SERVICE+3*
DGBFILE GETPATH+2~
DGBFILE( GETPATH+9*
DGBPATH CHK+1~, CHK+3*, CHK+5, CHK+6, GETPATH+2~, GETPATH+14, GETPATH+15*, GETPATH+16, GETPATH+19, GETPATH+21*
, GETPATH+23*, GETPATH+24, GETPATH+27*, GETPATH+28, GETPATH+31*, GETPATH+32, GETPATH+35, GETPATH+37*, GETPATH+38, SERVICE+1~
SERVICE+2*, SERVICE+3
DGBSTAT GETPATH+2~, GETPATH+16*, GETPATH+17, GETPATH+24*, GETPATH+25, GETPATH+28*, GETPATH+29, GETPATH+32*, GETPATH+33
DGBWSDL GETPATH~, GETPATH+9, GETPATH+18, GETPATH+19, GETPATH+34, GETPATH+35
DGCOUNT SERVER+1~, SERVER+10*, POST2+2~, POST2+3*
DGDATA SERVER+1~, SERVER+10*, SERVER+11, POST2+2~, POST2+3*, POST2+5, POST2+7, POST2+8
DGDATEB PRE+15~, PRE+17, PRE+18
DGDATEE PRE+15~, PRE+17, PRE+18
DGEPT SERVER+1~, SERVER+11*, SERVER+20
DGERR02 SERVER+2~
DGERR02("DIERR" SERVER+52, SERVER+53
DGERR12 SERVER+2~, DISABLE+1~
DGERR12("DIERR" SERVER+40, SERVER+41
DGEXIT SERVER+1~, SERVER+8*, SERVER+10, SERVER+11*
DGFDAI SERVER+2~, SERVER+39, SERVER+48!
DGFDAI(1 SERVER+39
DGIEN SERVER+2~, DISABLE+1~
DGIEN("SRV" SERVER+12*, SERVER+13, SERVER+37, SERVER+38, SERVER+39*, SERVER+45, DISABLE+2*, DISABLE+3, DISABLE+5
DGIENS SERVER+2~
DGIENS("SRC" SERVER+43*, SERVER+46*, SERVER+47, SERVER+49, SERVER+50
DGIENS("SRV" SERVER+13*, SERVER+14*, SERVER+16, SERVER+18, SERVER+20, SERVER+23, SERVER+25, SERVER+27, SERVER+29, SERVER+31
SERVER+33, SERVER+35, SERVER+39*, SERVER+49, SERVER+50
DGPORT SERVER+1~, SERVER+11*, SERVER+18, SERVER+31
DGPW SERVER+1~, SERVER+11*, SERVER+35
DGSERVER SERVER+2~, DISABLE+1~
DGSERVER( SERVER+16*, SERVER+18*, SERVER+20*, SERVER+23*, SERVER+25*, SERVER+27*, SERVER+29*, SERVER+31*, SERVER+33*, SERVER+35*
DISABLE+5*
DGSERVICE SERVER+2~, SERVER+48!
DGSERVICE( SERVER+49*, SERVER+50*
DGSRVC POST1+1~, POST1+4*, SERVICE+5, SERVER+46, SERVER+49, SERVER+53
DGSRVIEN SERVER+2~, SERVER+44*, SERVER+45*, SERVER+46
DGSRVR POST1+1~, POST1+3*, SERVER+12, SERVER+16, SERVER+40, SERVER+41, DISABLE+2, DISABLE+7
DGSTAT SERVICE+1~, SERVICE+7*, SERVICE+8
DGTYPE GETPATH+2~, GETPATH+11*, GETPATH+14, SERVER+1~, SERVER+4*, SERVER+6*, SERVER+7, SERVER+11, SERVER+23
U PRE+18
X POST2+2~, POST2+5*, POST2+8*
>> XPDABORT PRE+24, CHK+5*
>> XPDQUES("POS1" GETPATH+6*, GETPATH+11, SERVER+4
>> XPDQUES("POS2" GETPATH+7*, GETPATH+15
>> XPDQUES("PRE1" PRE+19
>> XPDQUES("PRE2" PRE+20

Marked Items

Name Field # of Occurrence
$T(ROU+DGCOUNT POST2+3
$T(TYPEMAP+DGCOUNT SERVER+10
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All