Routine: XOBWPST

Information

XOBWPST ;ALB/MJK - HWSC - Post-Init ; 09/13/10 4:00pm

Source file <XOBWPST.m>

Package	Total	Call Graph
VA FileMan	3	FIELD^DID FILE^DIE (,ENALL)^DIK
Kernel	2	$$DEFDIR^%ZISH (BMES,MES)^XPDUTL
Web Services Client	2	$$SUPPORT^XOBWENV $$IMPORT^XOBWLIB1

Name	Comments	DBIA/ICR reference
EN	; -- main entry point for post-init
ENQ	;
DELETE()	; -- delete classes for clean slate and remove previous releases
INDEX()	; -- build indices if data exists but index not defined
DELIP()	; -- move IP ADDRESS to SERVER field if blank and delete IP ADDRESS (#.02)
DELIPQ	;
DELHP()	; -- remove HtttpProxy* fields and 2 node
DELFLD(XOBNUM,XOBLABEL)	; -- delete a field from WEB SERVER file
DELFLDQ	;
GETDIR()	; -- get directory where install files are located

Name	Field # of Occurrence
$$DEFDIR^%ZISH	GETDIR+1
FIELD^DID	DELIP+3, DELFLD+2
FILE^DIE	DELIP+18
^DIK	DELFLD+7
ENALL^DIK	INDEX+7, INDEX+14
$$SUPPORT^XOBWENV	EN+17, EN+21
$$IMPORT^XOBWLIB1	EN+17
BMES^XPDUTL	EN+19, DELETE+3, DELETE+6, INDEX+8, INDEX+15, DELIP+19, DELFLD+8
MES^XPDUTL	EN+20, EN+21, EN+22, EN+23, EN+25, EN+26, DELETE+7, DELIP+20

FileNo	Call Tags
^XOB(18.12 - [#18.12]	FIELD^DID

Name	Line Occurrences (* Changed, ! Killed)
^XOB(	INDEX+4
^XOB(18.12 - [#18.12]	INDEX+10, INDEX+11, DELIP+8, DELHP+9!

Name	Field # of Occurrence
^(	DELIP+8

Name	Field # of Occurrence
DA	INDEX+1~, DELFLD+1~, DELFLD+5*
DA(1	INDEX+11, INDEX+12, DELFLD+6
DIK	INDEX+1~, INDEX+5, INDEX+12, DELFLD+1~, DELFLD+4*
DIK(1	INDEX+6, INDEX+13
IP	DELIP+9~, DELIP+11*, DELIP+12, DELIP+16
SERVER	DELIP+9~, DELIP+10*, DELIP+16
XOBCNT	INDEX+1~, INDEX+11, INDEX+14, INDEX+15
XOBDA	DELIP+1~, DELIP+7, DELIP+8, DELIP+14, DELHP+7~, DELHP+8, DELHP+9
XOBDA0	DELIP+1~, DELIP+8*, DELIP+10, DELIP+11
XOBERR	DELIP+1~, DELIP+13~, DELFLD+1~
XOBFDA	DELIP+13~
XOBFDA(	DELIP+16, DELIP+17
XOBFILE	INDEX+1~, INDEX+3*, INDEX+4, INDEX+5, INDEX+8
XOBIENS	DELIP+13~, DELIP+14*, DELIP+16, DELIP+17
XOBLABEL	DELFLD~, DELFLD+3, DELFLD+8
XOBNUM	DELFLD~, DELFLD+2, DELFLD+5, DELFLD+8
XOBSTAT	EN+1~, EN+16~, EN+17, EN+18, EN+22, DELETE+1~, DELETE+5, DELETE+6
XOBX	DELHP+1~
XOBY	DELIP+1~, DELFLD+1~
XOBY("LABEL"	DELIP+4, DELFLD+3
>> XPDQUES("POSXMLDIR"	GETDIR+1