Routine: VENPCCM1

Package	Total	Call Graph
PCC New Encounter Form	3	(HDR,TSYNC)^VENPCCM2 ($$FIND,$$OTCP,CTCP)^VENPCCP ($$CFG,$$VEN,$$WAIT)^VENPCCU

Package	Total	Caller Graph
PCC New Encounter Form	4	VENPCCM2 VENPCCM3 VENPCCMC VENPCCP1

Entry Points

Name	Comments	DBIA/ICR reference
QQ	; S (IP,IPA)="161.223.80.111" ; CROW TEST
PS1(PSN,IP)	; EP-PRINT SERVICE PRINT GROUPS
PSYNC(IP,IPA)	; EP-PRINT GRP SYNC
VAR()	; EP-CREATE LOCAL VARIABLES
GET(IP,SOCK,MSG,TMP)	; EP-GET DATA FROM PRINT SERVER AND STORE IT IN TMP
PSA	; ANALYZE PRINT GROUPS
SYNC	; EP-START SPECIAL PRINT SERVICE FUNCTIONS ; RUNS IN BACKGROUND
SMSG	; EP-ANALYZE SYNC MESSAGE
TEST
PSM(PSN)	; EP-STATUS MESSAGE
HEADER	; EP-SYNC HEADER FILES
PG	; EP-PRINT GROUP SYNCHRONIZATION
TEMPLATE	; EP-TEMPLATE SYNCHRONIZATION
HDR(X,Y)	; EP-COMPARE HEADER FILES ; DEAD CODE
PS2	; RPMS PRINT GROUPS
RUN()	; EP-REQUEST SPECIAL PRINT SERVICE FUNCTIONS
FIN

External References

Name	Field # of Occurrence
HDR^VENPCCM2	HDR+7
TSYNC^VENPCCM2	TEMPLATE+4
$$FIND^VENPCCP	HEADER+6
$$OTCP^VENPCCP	GET+4
CTCP^VENPCCP	GET+7, GET+8, GET+9, GET+11, GET+13
$$CFG^VENPCCU	HEADER+2, VAR+2
$$VEN^VENPCCU	GET+3
$$WAIT^VENPCCU	PSM+1, PSM+9, PSM+15

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Unable to find the Path to the header files on the RPMS Server!" Line Location: HEADER+4
Function Call: WRITE	Prompt: !,"Header file ",HF," has been validated" Line Location: HEADER+6
Function Call: WRITE	Prompt: !,"Header file '",HF,"'can not be located in ",PATH Line Location: HEADER+7
Function Call: WRITE	Prompt: !!,"Checking encounter form header files....." Line Location: HEADER+10
Function Call: WRITE	Prompt: !!,"Checking health summary header file......." Line Location: HEADER+12
Function Call: WRITE	Prompt: !!,"Accessing information..." Line Location: RUN+3
Function Call: WRITE	Prompt: "." Line Location: RUN+4
Function Call: WRITE	Prompt: !,"Unable to get required information from the Print Server(s). Request terminated!" Line Location: RUN+5
Function Call: WRITE	Prompt: !,"Unable to get required information from Print Server #",A," (",B,")" Line Location: RUN+7
Function Call: WRITE	Prompt: MSG Line Location: GET+5
Function Call: WRITE	Prompt: ! Condition for execution: CACHE Line Location: GET+5
Function Call: READ	Timeout: 30 Variable: ACK Line Location: GET+6
Function Call: READ	Timeout: 30 Variable: ACK Line Location: GET+10
Function Call: READ	Timeout: 2 Variable: ACK Line Location: GET+11
Function Call: WRITE	Prompt: -1 Line Location: GET+11
Function Call: WRITE	Prompt: ! Condition for execution: CACHE Line Location: GET+11
Function Call: READ	Timeout: 2 Variable: ACK Line Location: GET+12
Function Call: WRITE	Prompt: 0 Line Location: GET+12
Function Call: WRITE	Prompt: ! Condition for execution: CACHE Line Location: GET+12
Function Call: WRITE	Prompt: !!,"Checking files in Print Server #",PSN," (",$S(PSN=1:IP,1:IPA),")" Line Location: PSM+2
Function Call: WRITE	Prompt: !?5,"The VEN EHP PRINTER GROUP FILE is empty! At least 1 printer group must exist." Line Location: PSM+3
Function Call: WRITE	Prompt: !?5,"There are no Printer Groups registered on the Print Server!",!," At least 1 Printer Group must exist." Line Location: PSM+4
Function Call: WRITE	Prompt: !?5,"PRINTER GROUP(S) properly synchronized on the RPMS and Print Servers:" Line Location: PSM+6
Function Call: WRITE	Prompt: !?10,$P(OK,U,I) Line Location: PSM+7
Function Call: WRITE	Prompt: ?5,"PRINTER GROUP(S) entered in the VEN EHP PRINTER GROUP file, but",!?5,"not registered on the Print Server:" Line Location: PSM+10
Function Call: WRITE	Prompt: !?10,$P(BAD,U,I) Line Location: PSM+11
Function Call: WRITE	Prompt: !?5,"Either remove GROUP(S) from VEN EHP PRINTER GROUP file OR",!?5,"add GROUP(S) to the PCC+ Print Service. TO AVOID CRASHES, DO THIS NOW!" Line Location: PSM+12
Function Call: WRITE	Prompt: ?5,"PRINTER GROUP(S) registered in the PCC+ Print Service but not",!?5,"in the VEN EHP PRINTER GROUP file:" Line Location: PSM+16
Function Call: WRITE	Prompt: !?10,$P(WARN,U,I) Line Location: PSM+17
Function Call: WRITE	Prompt: !?5,"This will not cause any tech problems, but you will not be able to access",!?5,"a PRINTER GROUP unless it is entered in the VEN EHP PRINTER GROUP file" Line Location: PSM+18

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP("VEN MSG"	PG+3!, TEMPLATE+3!, HDR+5!, RUN+4, RUN+5, RUN+7, FIN+1!
^TMP("VEN PSYNC"	PSYNC+4!, PS1+2
^TMP("VEN SYNC"	PG+3, TEMPLATE+3, HDR+5*, SYNC+3, SYNC+4
^TMP("VEN TASK"	RUN+2, FIN!
^VEN(7.4 - [#19707.4]	PS2+1
^VEN(7.5 - [#19707.5]	HEADER+3, VAR+3, VAR+4, QQ+1

Label References

Name	Line Occurrences
$$RUN	PG+4, TEMPLATE+4, HDR+7
$$VAR	PG+2, TEMPLATE+2, HDR+3, SYNC+2
FIN	RUN+5
GET	SMSG+4, SMSG+5, SMSG+6, SMSG+11, TEST
HDR	HEADER+11, HEADER+13
PS1	PSYNC+3
PSM	PSYNC+3
PSYNC	PG+4

Naked Globals

Name	Field # of Occurrence
^(	SYNC+4!, PS1+2
^("OK"	RUN+7
^(2	SMSG+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RUN+1~, RUN+7, SYNC+1~, SMSG+4, SMSG+10, SMSG+11, GET+10
A	RUN+1~, RUN+7*
ACK	GET+1~, GET+6, GET+7, GET+8, GET+9, GET+10, GET+11, GET+12!
B	RUN+1~, RUN+7*
BAD	PSYNC+1~, PS1+1, PSA+3, PSA+4*, PSM+3, PSM+9, PSM+11
BYTES	GET+1~, GET+2, GET+10, GET+11
CACHE	GET+1~, GET+3*, GET+5, GET+10, GET+11, GET+12
CFIGIEN	HEADER+1~, HEADER+2, HEADER+3, VAR+1~, VAR+2, VAR+3, VAR+4, QQ+1
>> CFLG	PSM+13*
COMP	SYNC+1~
FUNC	SYNC+1~, SMSG+1, SMSG+2, SMSG+3*, SMSG+7, SMSG+9, SMSG+13
GBL	SYNC+1~, SMSG+13*, SMSG+15, SMSG+16, SMSG+17
HF	HEADER+1~, HEADER+5*, HEADER+6, HEADER+7
I	RUN+1~, RUN+4, PSYNC+1~, PS1+3, PSA+1, PSA+6, PSM+7, PSM+11, PSM+17*
IP	PG+1~, PG+4, TEMPLATE+1~, TEMPLATE+4, HDR+2~, HDR+7, VAR+3*, VAR+4, SYNC+1~, SMSG+8 , SMSG+10, SMSG+15, GET~, GET+4, PSYNC~, PSYNC+3, PS1~, PSM+2
IPA	PG+1~, PG+4, TEMPLATE+1~, TEMPLATE+4, HDR+2~, HDR+7, VAR+4*, SYNC+1~, SMSG+8, SMSG+10 , SMSG+15, PSYNC~, PSYNC+3, PSM+2
J	SYNC+1~, SYNC+3*, SYNC+4, SMSG+4, SMSG+5, SMSG+6, SMSG+9, SMSG+13
LEN	GET+1~, GET+9*, GET+11
MSG	SYNC+1~, SYNC+4*, SMSG+1, SMSG+2, SMSG+3, SMSG+4, SMSG+5, SMSG+6, SMSG+11, GET~ , GET+5
OK	PSYNC+1~, PS1+1, PSA+2, PSM+3, PSM+4, PSM+5, PSM+7
OUT	RUN+1~, RUN+6, FIN+2
PATH	HEADER+1~, HEADER+3*, HEADER+4, HEADER+6, HEADER+7
PCE	PSYNC+1~, PS1+1, PS1+2
PHDR	HDR+2~, HDR+6*, HDR+7
PIEN	PSYNC+1~, PS2+1*
POP	HEADER+1~, SYNC+1~, GET+1~, GET+4*
PS1	PSYNC+1~, PS1+1, PS1+4, PS1+5*, PSA+2, PSA+6
PS2	PSYNC+1~, PS1+1, PS1+4, PS1+6*, PSA+6
PSN	SYNC+1~, SMSG+8, SMSG+9, SMSG+10, PSYNC+1~, PSYNC+3, PS1~, PS1+2, PSM~, PSM+1 , PSM+2
RPMS	PSYNC+1~, PS1+1, PS2+2, PS2+3*, PSA+1, PSA+6
RSTG	HEADER+1~
SOCK	PG+1~, TEMPLATE+1~, HDR+2~, QQ+1*, SYNC+1~, SMSG+11, GET~, GET+4
START	RUN+1~, RUN+2*, FIN
STG	PSYNC+1~, PS1+1, PS1+2, PS1+3
STOP	PSYNC+1~, PSYNC+2, PSYNC+3, PSM+1, PSM+9, PSM+15
TMP	SYNC+1~, SMSG+9, SMSG+11, SMSG+13, SMSG+14, SMSG+15, SMSG+16, GET~, GET+4, GET+6 , GET+7, GET+8, GET+9, GET+10, GET+11, GET+12
TOT	GET+1~, GET+2, GET+10
U	HDR+5, VAR+3, VAR+4, QQ+1, RUN+2, RUN+7, SMSG+3, SMSG+4, SMSG+5, SMSG+6 , GET+9, PS1+3, PS1+4, PS2+1, PS2+2, PSA+1, PSA+2, PSA+3, PSA+6, PSM+7 , PSM+11, PSM+17
WARN	PSYNC+1~, PS1+1, PSA+6, PSM+4, PSM+15, PSM+17
X	HDR~, HDR+4, HDR+5, HDR+6, PSYNC+1~, PS1+3, PS1+5, PS1+6, PS2+1, PS2+3 , PSA+1, PSA+2, PSA+4, PSA+6*
Y	HDR~, HDR+7, PSYNC+1~, PSA+6*

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCCM1

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: