Routine: VENPCCQ7

Package	Total	Call Graph
VA Fileman	5	^DIC YN^DICN ^DIE (,IX)^DIK ^DIR
IHS VA Utilities	1	^XBFMK

Package	Total	Caller Graph
PCC New Encounter Form	2	VENPCCQ6 VENPCCQ8

Entry Points

Name	Comments	DBIA/ICR reference
CKVOBJ(BLD,OK)	; EP - CHECK REGISTERED VUECENTRIC OBJECTS ; TARGET SERVER
VOR(IEN)	; EP - FILTER PCC+ COMPONENTS IN THE VUECENTRIC OBJECT REGISTRY FOR KIDS BUILD ; USED ON SOURCE SERVER
DEP
ACT1
POP
ACT	; EP - MANAGE WCM DOMIANS: MAKE THEM ACTIVE OR INCATIVE
POSTINIT	; ------------------- EPs FOR POST INIT ------------------------ ;
KBM(START,END,ERR)	; EP - GIVEN START AND END IENs, ADD ITEMS TO VEN EHP KB ITEMS FILE FROM THE VEN EHP KB MASTER FILE ; TARGET SERVER
CIABMX(OK)	; EP - IF NECESSARY, ADD THE RPC CIABMX TO THE CIAV VUECENTRIC OPTION
HOLD(KEYS,UTYPE)	; EP - ALLOCATE PACKAGE KEYS TO MANAGERS AND USERS ; TARGET SERVER
UMO(MIEN,GMIEN)	; EP - ADD VEN_GUIMGR OPTION TO A MENU
ADDKEY(SELF,KIENS,STOP)	; EP - ALLOCATE KEY
DEVEL	; --------------- DEVELOPER UTILITIES -------------------
POF	; POPULATE THE VEN OBJECTS FILE
ABP	; ASSIGN BMX BROKER PRIVELEGES TO THE RECIPIENT
UKEY
AUTODFRM	; AUTOMATE DIFROM SO NO USER INTERVENTION IS NECESSARY
MD
HOLD1
LISTHLDR
PATH(PATH)	; ALERT THE USER OF THE PATH TO THE WCM DLLS
ACTL	; EP - SHOW IF DOMAIN IS ACTIVE
AK1	; GIVE ALL OTHER KEYS TO THE RECIPIENT
LOOP

External References

Name	Field # of Occurrence
^DIC	DEP+7, ADDKEY+4, AK1+4, ABP+7, UMO+8, CIABMX+8, POF+4, LOOP+1, POP+5, POP+11 , AUTODFRM+12
YN^DICN	LISTHLDR+14, LISTHLDR+19, UKEY+2, ADDKEY+9, LOOP+5, AUTODFRM+8, AUTODFRM+14, ACT+5
^DIE	AK1+6, ABP+9, UMO+10, ACT1+4
^DIK	KBM+12, ADDKEY+11, LOOP+8
IX^DIK	KBM+16
^DIR	AUTODFRM+2, ACT1+1
^XBFMK	KBM+19, ADDKEY+9, ADDKEY+11, ABP+10, UMO+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?5,"Knowledgebase file missing! Post init terminated...",!!! Line Location: KBM+3
Function Call: WRITE	Prompt: "." Line Location: KBM+8
Function Call: WRITE	Prompt: !?5,"The VueCentric Object '"_NAME_" is missing" Line Location: CKVOBJ+14
Function Call: WRITE	Prompt: !?5,"The VueCentric Object '"_NAME_" is missing" Line Location: CKVOBJ+23
Function Call: WRITE	Prompt: !,"Dependency failure: ",IEN,",",TIEN Line Location: DEP+8
Function Call: WRITE	Prompt: !?7,"Unable to enter all VueCentric Objects and dependencies",! Line Location: DEP+11
Function Call: WRITE	Prompt: !?5,"The Security Key ",%," is missing!!!" Line Location: HOLD+7
Function Call: WRITE	Prompt: !?5,"You currently lack priveleges to distribute keys for this package! Try again later... " Line Location: HOLD+13
Function Call: WRITE	Prompt: !?5,"Holders:" Line Location: LISTHLDR+2
Function Call: WRITE	Prompt: !?20,NAME Line Location: LISTHLDR+5
Function Call: WRITE	Prompt: !?5,"Currently no site managers or CACs hold the GUI management keys!" Line Location: LISTHLDR+12
Function Call: WRITE	Prompt: !?5,"Want to assign them to yourself" Line Location: LISTHLDR+13
Function Call: WRITE	Prompt: !?8,"You must own this key to proceed! Try again later..." Line Location: LISTHLDR+15
Function Call: WRITE	Prompt: !!?2,"Want to assign the GUI Management Keys to IT personnel or CACs" Line Location: LISTHLDR+18
Function Call: WRITE	Prompt: !!,"Currently no users hold the ",KEY," key" Line Location: UKEY+0
Function Call: WRITE	Prompt: !!?2,"Want to assign this key to any other users" Line Location: UKEY+1
Function Call: WRITE	Prompt: !,"This user already holds this key!",!,"Want to de-allocate the key" Line Location: ADDKEY+8
Function Call: WRITE	Prompt: " <- Key de-allocated" Line Location: ADDKEY+12
Function Call: WRITE	Prompt: " <- Key allocated" Line Location: AK1+8
Function Call: WRITE	Prompt: !?5,"The RPC 'CIABMX' is missing",! Line Location: CIABMX+3
Function Call: WRITE	Prompt: !?5,"The Option 'CIAV VUECENTRIC' is missing",! Line Location: CIABMX+5
Function Call: WRITE	Prompt: !?5,"The RPC CIABMX is not registered in broker option CIAV VUECENTRIC" Line Location: CIABMX+9
Function Call: WRITE	Prompt: !!!,"Enter the VueCentric objects included in this build...",!! Line Location: POF+2
Function Call: WRITE	Prompt: !?3,OBJ," is already in the build",!?3,"Want to remove it" Line Location: LOOP+4
Function Call: WRITE	Prompt: !! Line Location: LOOP+16
Function Call: WRITE	Prompt: " ??",!! Line Location: AUTODFRM+5
Function Call: WRITE	Prompt: !,"Want to delete the data global before running DIFROM" Line Location: AUTODFRM+7
Function Call: WRITE	Prompt: !,"Are you sure you want to delete it" Line Location: AUTODFRM+13
Function Call: WRITE	Prompt: !?5,"Can't find the routine ",ROOT,"INI1... Request terminated!" Line Location: AUTODFRM+21
Function Call: WRITE	Prompt: !?5,"Already modified... Request terminated!" Line Location: AUTODFRM+22
Function Call: WRITE	Prompt: !?5 Line Location: MD+2
Function Call: WRITE	Prompt: "DIFROM modified successfully!" Line Location: MD+3
Function Call: WRITE	Prompt: "Unable to modify DIFROM" Line Location: MD+4
Function Call: WRITE	Prompt: !!,"Checking Knowledgebase domains... ",! Line Location: ACT+2
Function Call: WRITE	Prompt: !!,"Want to change the status of any of these elements" Line Location: ACT+4
Function Call: WRITE	Prompt: !! Line Location: ACT1+6
Routine Call	DIE Line Location: AK1+6 ABP+9 UMO+10 ACT1+4
Routine Call	DIC Line Location: DEP+7 ADDKEY+4 AK1+4 ABP+7 UMO+8 CIABMX+8 POF+4 LOOP+1 POP+5 POP+11 AUTODFRM+12
Routine Call	DIR Line Location: AUTODFRM+2 ACT1+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VEN(7.12 - [#19707.12]	Classic Fileman Calls
^VEN(7.13 - [#19707.13]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^CIAVOBJ(19930.2 - [#19930.2]	VOR+1, VOR+5, CKVOBJ+6, LOOP+12, LOOP+13
^DIC - [#1]	AUTODFRM+16
^DIC(19 - [#19]	ABP+2, UMO+4, UMO+10, CIABMX+4
^DIC(19.1 - [#19.1]	HOLD+7
^VA(200 - [#200]	HOLD+12, LISTHLDR+4, ADDKEY+6, AK1+6, ABP+3, ABP+9
^VEN(7.12 - [#19707.12]	KBM+2, KBM+5, KBM+18*
^VEN(7.13 - [#19707.13]	ACT1+4, ACTL+2, ACTL+3
^VEN(7.17 - [#19707.17]	KBM+2, KBM+7, KBM+14
^VEN(7.26 - [#19707.26]	VOR+4, VOR+6, CKVOBJ+5, CKVOBJ+6, LOOP+3
^XTV(8989.5 - [#8989.5]	PATH+5, PATH+6, PATH+8
^XTV(8989.51 - [#8989.51]	PATH+3
^XUSEC(	LISTHLDR, LISTHLDR+3
^XUSEC("XUMGR"	HOLD+12
^XWB(8994 - [#8994]	CIABMX+2

Label References

Name	Line Occurrences
ACT1	ACT1+6
ACTL	ACT+3, ACT1+5
ADDKEY	LISTHLDR+16, HOLD1+1
AK1	ADDKEY+2
AUTODFRM	AUTODFRM+5
HOLD1	LISTHLDR+9
LOOP	LOOP+3, LOOP+16
POP	LOOP+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	KBM+4~, CKVOBJ+4~, HOLD+3~, HOLD+5, HOLD+6, HOLD+7, LISTHLDR+14, LISTHLDR+15, LISTHLDR+19, LISTHLDR+20 , UKEY+2, UKEY+3, ADDKEY+1~, ADDKEY+9, CIABMX+1~, PATH+1~, PATH+6, PATH+7, POF+1~, LOOP+5 , LOOP+6, AUTODFRM+5, AUTODFRM+8, AUTODFRM+9, AUTODFRM+13, AUTODFRM+15, AUTODFRM+21, AUTODFRM+22, MD+3, ACT+1~ , ACT+4, ACT+5
%Y	ACT+1~
A	CKVOBJ+4~
>> ARR(	LOOP+10, LOOP+14, POP+2, POP+4, POP+9, POP+10
>> ARR(0	POP
B	CKVOBJ+4~
BIEN	VOR+3~, VOR+4, VOR+6, CKVOBJ+4~, CKVOBJ+5, CKVOBJ+8, CKVOBJ+10, CKVOBJ+18, CKVOBJ+19, POF+1~ , POF+5*, LOOP+3, LOOP+7, POP+3, POP+6
BLD	CKVOBJ~, CKVOBJ+2, CKVOBJ+5
C	CKVOBJ+4~
D	CKVOBJ+4~
D0	ABP+1~, ABP+4, UMO+3~, UMO+5
DA	KBM+4~, KBM+6, KBM+7, KBM+8, KBM+10, KBM+11, KBM+14, KBM+15, ADDKEY+1~, ADDKEY+10* , AK1+5, ABP+1~, ABP+8, ABP+9, UMO+3~, UMO+9, UMO+10, POF+1~, LOOP+2, LOOP+3* , ACT+1~, ACT1+2*, ACT1+4
DA(1	DEP+3, ADDKEY+10, AK1+1, AK1+6, ABP+4, UMO+5, CIABMX+6, LOOP+7, POP+3, POP+6* , POP+7
DA(2	POP+6*, POP+7
>> DELGBL	AUTODFRM+6, AUTODFRM+18, AUTODFRM+24
DFN	HOLD+3~, LISTHLDR+2, LISTHLDR+3, LISTHLDR+4, LISTHLDR+6
DIC	KBM+4~, DEP+3, ADDKEY+1~, ADDKEY+3, AK1+1, AK1+5, ABP+1~, ABP+4, ABP+8, UMO+3~ , UMO+5, UMO+9, CIABMX+1~, CIABMX+6, POF+1~, POF+3, LOOP, POP+3, POP+7, AUTODFRM+11* , ACT+1~
DIC("A"	ADDKEY+3, POF+3, LOOP, AUTODFRM+10
DIC("P"	DEP+3, AK1+1, ABP+5, UMO+6, CIABMX+6, POP+3, POP+7*
DIC(0	DEP+3, ADDKEY+3, AK1+1, ABP+4, UMO+5, CIABMX+6, POF+3, LOOP, POP+3, POP+7 , AUTODFRM+11*
DIE	KBM+4~, ADDKEY+1~, AK1+5, ABP+1~, ABP+8, UMO+3~, UMO+9, POF+1~, ACT+1~, ACT1+3
DIEN	CKVOBJ+4~, CKVOBJ+18, CKVOBJ+19, POF+1~, LOOP+11, LOOP+12, LOOP+13, LOOP+14, POP+8, POP+9* , POP+10, ACT+1~, ACTL+1, ACTL+2, ACTL+3, ACTL+5
DIK	KBM+4~, KBM+5, ADDKEY+10, LOOP+7*
DIR	ACT+1~
DIR("A"	AUTODFRM+1, ACT+6, ACT1+6*
DIR(0	AUTODFRM+1, ACT1
DLAYGO	DEP+3, AK1+1, ABP+1~, ABP+5, UMO+3~, UMO+6, CIABMX+1~, CIABMX+6, POF+1~, POF+3 , POP+3, POP+7
DNAME	CKVOBJ+4~, CKVOBJ+19*, CKVOBJ+21, CKVOBJ+26
DNM	CKVOBJ+4~, CKVOBJ+17, CKVOBJ+18, CKVOBJ+21, CKVOBJ+23, POF+1~, LOOP+13*, LOOP+14
DR	KBM+4~, ADDKEY+1~, AK1+5, ABP+1~, ABP+8, UMO+3~, UMO+9, POF+1~, ACT+1~, ACT1+3
DS	CKVOBJ+4~
DSTG	CKVOBJ+4~
DUZ	HOLD+12, LISTHLDR+6, ADDKEY+2
DUZ(0	HOLD+12
END	KBM~, KBM+2, KBM+7, KBM+18
ERR	KBM~, KBM+1, KBM+20
GBL	KBM+4~, KBM+5, KBM+10, KBM+11, KBM+14, KBM+15, CKVOBJ+4~, CKVOBJ+6*, CKVOBJ+12, CKVOBJ+21 , DEP+2, ABP+1~, UMO+3~
GMIEN	UMO~, UMO+4, UMO+7
IEN	VOR~, VOR+1, VOR+5, CKVOBJ+4~, CKVOBJ+11, CKVOBJ+12, CKVOBJ+13, CKVOBJ+17, CKVOBJ+26, CKVOBJ+28* , DEP, DEP+1, DEP+2, DEP+3, DEP+5, DEP+8, ABP+1~, UMO+3~, POF+1~, LOOP+2 , LOOP+10, LOOP+12, LOOP+14, POP+1, POP+2, POP+4, POP+9, POP+10
IX	CKVOBJ+4~
IX(	CKVOBJ+17, CKVOBJ+26, DEP, DEP+1, DEP+5
IXD	CKVOBJ+4~
IXX	CKVOBJ+4~
IXX(	CKVOBJ+14, CKVOBJ+23
KEY	HOLD+3~, HOLD+4*, HOLD+12, LISTHLDR, LISTHLDR+3, UKEY
KEYFLAG	HOLD+3~, HOLD+11, LISTHLDR+1, LISTHLDR+11, UKEY
KEYS	HOLD~, HOLD+1, HOLD+4, HOLD+5, HOLD+6
KIEN	HOLD+3~, HOLD+11, HOLD+12, LISTHLDR+16, ADDKEY+1~, AK1+2, AK1+3
KIENS	HOLD+3~, HOLD+4, HOLD+8, HOLD+9*, HOLD+11, HOLD1+1, ADDKEY~, ADDKEY+6, AK1+2
>> LINE	AUTODFRM+24*
MIEN	UMO~, UMO+1, UMO+4, UMO+5, UMO+10
MN	ABP+1~, ABP+8, UMO+3~, UMO+9
NAME	CKVOBJ+4~, CKVOBJ+10, CKVOBJ+12, CKVOBJ+14, CKVOBJ+17, CKVOBJ+23, HOLD+3~, LISTHLDR+4, LISTHLDR+5
NM	CKVOBJ+4~, CKVOBJ+7, CKVOBJ+8, CKVOBJ+12, CKVOBJ+14, POF+1~
>> OBJ	LOOP+2*, LOOP+3, LOOP+4, LOOP+10
OIEN	CIABMX+1~, CIABMX+4*, CIABMX+5, CIABMX+6
OK	CKVOBJ~, CKVOBJ+1, CKVOBJ+5, CKVOBJ+15, CKVOBJ+24, DEP+8, DEP+11, CIABMX~, CIABMX+3, CIABMX+5* , CIABMX+9*
OPT	ABP+1~, ABP+2*, ABP+3, ABP+6
PATH	PATH~, PATH+2, PATH+5, PATH+8
PCE	CKVOBJ+4~, HOLD+3~, HOLD+5, HOLD+6, AK1+2
PIEN	PATH+1~, PATH+3*, PATH+7
PRIV	HOLD+3~, HOLD+11, LISTHLDR+6
RIEN	CIABMX+1~, CIABMX+2*, CIABMX+3, CIABMX+7
>> ROOT	AUTODFRM+6*, AUTODFRM+20, AUTODFRM+21, AUTODFRM+25, MD+1
>> RT	AUTODFRM+25*, AUTODFRM+26
SCIEN	ADDKEY+1~, ADDKEY+6*, ADDKEY+7, ADDKEY+10
SELF	ADDKEY~, ADDKEY+2
START	KBM~, KBM+2, KBM+6
STG	CKVOBJ+4~
STOP	HOLD+3~, HOLD+11, LISTHLDR+16, HOLD1, HOLD1+1, ADDKEY~, ADDKEY+4*
TIEN	CKVOBJ+4~, CKVOBJ+20, CKVOBJ+21, CKVOBJ+22, CKVOBJ+26, DEP+4, DEP+5, DEP+6, DEP+8
TODAY	ADDKEY+1~
TOT	ACT+1~, ACT+3!, ACT1, ACTL+1, ACTL+5, ACTL+6
TOT(	ACT1+2, ACTL+5*
U	VOR+5, KBM+11, KBM+15, KBM+18, CKVOBJ+10, CKVOBJ+12, CKVOBJ+19, CKVOBJ+21, HOLD+4, HOLD+5 , HOLD+6, HOLD+8, LISTHLDR+4, AK1+2, PATH+6, LOOP+2, LOOP+3, LOOP+13, AUTODFRM+4, ACTL+4 , ACTL+5
USER	ADDKEY+1~, ADDKEY+2, ADDKEY+5, AK1+1, ABP+3, ABP+4, ABP+9
UTYPE	HOLD~, HOLD+1, LISTHLDR+9
VGBL	CKVOBJ+4~, CKVOBJ+6*, CKVOBJ+8, CKVOBJ+10, CKVOBJ+18, CKVOBJ+19
VIEN	CKVOBJ+4~, CKVOBJ+8*, CKVOBJ+10, CKVOBJ+18, CKVOBJ+19
X	VOR+3~, KBM+4~, CKVOBJ+4~, DEP+6, HOLD+3~, HOLD+7, HOLD+9, ADDKEY+1~, AK1+3, ABP+6 , UMO+7, CIABMX+1~, CIABMX+7, PATH+1~, PATH+4, PATH+5, PATH+6, PATH+8, POF+1~, POP+4* , POP+10, AUTODFRM+26, MD, ACT+1~, ACTL+3*, ACTL+4, ACTL+5
XIEN	POF+1~, POP+6*
XSTOP	HOLD+3~, LISTHLDR+9, LISTHLDR+10, LISTHLDR+20
>> XUSEC(	HOLD+12
Y	VOR+3~, VOR+5, VOR+6, KBM+4~, CKVOBJ+4~, DEP+8, HOLD+3~, ADDKEY+4, ADDKEY+5, ADDKEY+6 , ADDKEY+10, AK1+4, AK1+5, ABP+7, ABP+8, UMO+8, UMO+9, CIABMX+1~, CIABMX+9, PATH+1~ , POF+1~, POF+4, POF+5, LOOP+1, LOOP+2, POP+5, POP+6, AUTODFRM+3, AUTODFRM+4, AUTODFRM+5 , AUTODFRM+6, AUTODFRM+9, AUTODFRM+12, AUTODFRM+16, ACT+1~, ACT1+1, ACT1+2, ACTL+4*, ACTL+6
Z	KBM+4~, KBM+9!, KBM+11, KBM+15, CKVOBJ+4~, HOLD+3~, CIABMX+1~, PATH+1~, POF+1~, AUTODFRM+16 , AUTODFRM+17, AUTODFRM+18, AUTODFRM+23, ACT+1~, ACTL+5*, ACTL+6

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCCQ7

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: