Routine: VENPCCU

Package	Total	Call Graph
VA Fileman	3	NOW^%DTC FILE^DICN ^DIR
PCC New Encounter Form	2	($$FIND,$$OPN,$$OTCP,CTCP)^VENPCCP ($$CFG,$$STRIP)^VENPCCU

Package

Total

Call Graph

VA Fileman

NOW^%DTC FILE^DICN ^DIR

PCC New Encounter Form

($$FIND,$$OPN,$$OTCP,CTCP)^VENPCCP ($$CFG,$$STRIP)^VENPCCU

Package	Total	Caller Graph
PCC New Encounter Form	47	VENPCC VENPCC1 VENPCC10 VENPCC1A VENPCC1C VENPCC1E VENPCC1G VENPCC1H VENPCC1K VENPCC1M VENPCC1P VENPCC25 VENPCC2A VENPCCA VENPCCC VENPCCG VENPCCG2 VENPCCG4 VENPCCIT VENPCCKG VENPCCM1 VENPCCM2 VENPCCM3 VENPCCM4 VENPCCMA VENPCCMB VENPCCMC VENPCCMD VENPCCME VENPCCMF VENPCCMG VENPCCMH VENPCCMI VENPCCMP VENPCCMX VENPCCP VENPCCP1 VENPCCP2 VENPCCP3 VENPCCQX VENPCCS2 VENPCCS3 VENPCCU VENPCCUR VENPCCW VENPCCX VENPCCYV
M Transfer	1	BMXRPC10

Package

Total

Caller Graph

PCC New Encounter Form

VENPCC  VENPCC1  VENPCC10  VENPCC1A  VENPCC1C  VENPCC1E  VENPCC1G  VENPCC1H
VENPCC1K  VENPCC1M  VENPCC1P  VENPCC25  VENPCC2A  VENPCCA  VENPCCC  VENPCCG
VENPCCG2  VENPCCG4  VENPCCIT  VENPCCKG  VENPCCM1  VENPCCM2  VENPCCM3  VENPCCM4
VENPCCMA  VENPCCMB  VENPCCMC  VENPCCMD  VENPCCME  VENPCCMF  VENPCCMG  VENPCCMH
VENPCCMI  VENPCCMP  VENPCCMX  VENPCCP  VENPCCP1  VENPCCP2  VENPCCP3  VENPCCQX
VENPCCS2  VENPCCS3  VENPCCU  VENPCCUR  VENPCCW  VENPCCX  VENPCCYV

M Transfer

BMXRPC10

Entry Points

Name	Comments	DBIA/ICR reference
CP(DEPTIEN)	; EP-RETURNS THE DEFAULT PROVIDER FOR A GIVEN CLINIC
VEN()	; EP-M VENDOR
FHPT
DUR(D0)	; EP-FROM DD 19707.2 ; COMPUTES THE CURRENT DURATION OF WAITING TIME
IEN(X)	; EP - RETURN THE IEN TO A SCHEMA FIELD
PGRP(DEPTIEN,HSFLAG,PGRP)	; EP-RETURN THE PRINTER GROUP
FILE	; EP-DO FILE^DICN
WAIT()	; EP-WAIT STATE
SETPIECE(VAL,STG,DEL,PCE)	; EP-ALTERNATIVE TO MSM'S FLAWED SETPIECE FUNCTION THAT CRASHES WITH VERY LONG STRINGS ; INSERT VAL INTO STRING "STG" AT PIECE "PCE" GIVEN DELIMITER "DEL"
CHART(CHART,LIEN)	; EP-GIVEN A LOCATION IEN AND PHS CHART # RETURN THE PATIENT DFN
FVICD(PIEN)	; EP-GIVEN V POV IEN, RETURN THE ICD CODE (OR NULL IF FOREIGN VISIT SCREEN IS APPLIED AND POSITIVE)
HEADER(DEFEF)	; EP-RETURN THIS TEMPLATE'S HEADER FILE MNEMONIC ; PATCHED BY GIS 10/24/03 ; PATCHED BY GIS/OIT 10/15/05 ; PCC+ 2.5 PATCH 1
STRIP(X)	; EP-STRIP BLANKS OFF BOTH ENDS OF A STRING
AQ(DA,X)	; EP-FROM THE DD TO CREATE A MUMPS XREF FOR VEN QUEUE
LEN(D0)	; EP-ELAPSED TIME, EXTERNAL FORMAT
GP(FILE)	; EP-RETURNS THE IEN OF THE LOCAL GENERIC PROVIDER
CHOP(TXT,LEN,TAB,CNT)	; EP - CHOP A TXT STRING INTO LINES
CONVERT(MN,SS)	; EP-CONVERT A HEADER FILE TO A XXX_HEADER FILE
PAUSE	; EP-PAUSE FOR USER
TIME(T1,T2)	; EP - TIMESTAMP DISPLAY
TT1
ICD(CODE)	; EP - GIVEN AN ICD CODE, RETURN THE ICD9 IEN OR NULL ; WORKS WITH BOTH OLD AND NEW "AB" INDEX!
PRV(PIEN)	; EP-CONVERTS FILE 16 IEN TO FILE 200 IEN
CSTOP(DEPTIEN)	; EP-GIVEN A DEPARTMENT IEN, RETURN THE CLINIC STOP
OS()	; EP-RETURNS THE LOCAL OPERATING SYSTEM
CLASS(IEN,X)	; EP-FROM DATA DICTIONARY 19707.93
SLASH(X)	; EP-PATH VALIDITY CHECKER INPUT TRANSFORM
MRP()	; EP - RETURN THE MEDICAL RECORDS PRINT GROUP
AQ1(DA)	; EP-FROM THE DD TO DELETE THE AQ XREF FOR VEN QUEUE
CLASS2(IEN,X)	; EP-FROM THE DD 19707.1. COMPUTES A TRIGGERED VALUE
ZOSF(R,L,X1,X2)	; EP-SCHEDULING PKG LINK
FHP(MN,MMF)	; EP-GIVEN A HEADER FILE MNEMONIC AND HEADER (OR PIECE), THIS FUNCTION RETURNS THE '^' PIECE (OR HEADER)
NOW()	; EP-FROM MULTIPLE ROUTINES
CFG()	; EP-RETURN THE CURRENT CONFIGURATION IEN
PAD(X,LEN)	; EP-PAD RIGHT END OF STRING WITH SPACES TO LENGTH LEN
W1
MAXNARR(DEFEF)	; EP-RETURN THE NAMIMUM LENGTH OF THE DX NARRATIVE ON THIS FORM ; PATCHED BY GIS 1/8/04
CLASS1(IEN,X)	; EP FROM THE DD. COMPUTES A TRIGGER VALUE
TESTTCP	; EP-TEST THE TCP SOCKET
PRV1(DFN)	; EP-CONVERT FILE 200 DFN TO FILE 16 IEN

Name	Field # of Occurrence
NOW^%DTC	NOW+2, DUR+6
FILE^DICN	FILE+2
^DIR	PAUSE+3, TT1
$$FIND^VENPCCP	HEADER+5
$$OPN^VENPCCP	CONVERT+5, CONVERT+8, FHP+5
$$OTCP^VENPCCP	TT1+3
CTCP^VENPCCP	TT1+5
$$CFG^VENPCCU	CONVERT+3, OS+1, VEN+1
$$STRIP^VENPCCU	CHOP+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PAUSE+4
Function Call: WRITE	Prompt: !! Line Location: TT1+0
Function Call: WRITE	Prompt: !,"Failed to open the TCP socket" Line Location: TT1+4
Function Call: WRITE	Prompt: !,"TCP socket opened successfully!" Line Location: TT1+6
Function Call: WRITE	Prompt: "<>" Line Location: WAIT+2
Function Call: READ	Timeout: $G(DTIME,300) Variable: % Line Location: W1+0
Function Call: WRITE	Prompt: $C(13),?79,$C(13) Line Location: W1+1
Function Call: WRITE	Prompt: "Press the <ENTER> key to keep scrolling or '^' to quit <>" Line Location: W1+3
Function Call: WRITE	Prompt: 22 Line Location: MAXNARR+4
Function Call: WRITE	Prompt: !,$$FHP("25","b1") Line Location: FHPT+0
Routine Call	DIR Line Location: PAUSE+3 TT1

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT("D"	CHART+5
^AUPNVPOV - [#9000010.07]	FVICD+2
^AUPNVSIT - [#9000010]	FVICD+6
^AUTTLOC - [#9999999.06]	CHART+1
^DD(9000010.06	PRV+1
^DPT - [#2]	GP+6
^ICD9 - [#80]	FVICD+3
^ICD9("AB"	ICD+4, ICD+6
^VA(200 - [#200]	PRV+1, PRV1+1
^VEN(7.1 - [#19707.1]	CLASS2+4
^VEN(7.2 - [#19707.2]	DUR+2, DUR+3, LEN+2, LEN+3, AQ+3, AQ+4*, AQ1+2, AQ1+3!
^VEN(7.4 - [#19707.4]	PGRP+3, PGRP+4, MRP+3, MRP+5
^VEN(7.41 - [#19707.41]	HEADER+6, MAXNARR+2, FVICD+5
^VEN(7.5 - [#19707.5]	CONVERT+3, GP+4, CFG+2, OS+1, VEN+1, PGRP+2, HEADER+3, FHP+4
^VEN(7.93 - [#19707.93]	CLASS+4
^VEN(7.94 - [#19707.94]	CLASS1+4
^VEN(7.95 - [#19707.95]	CP+2, PGRP+3, MRP+2, CSTOP+1

Name	Line Occurrences
$$CFG	GP+3, SLASH+1, HEADER+3, FHP+4
$$FHP	FHPT
$$MRP	PGRP+2
$$OS	SLASH+3
$$TIME	DUR+7, LEN+4
TT1	TT1+7
W1	W1+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CHART+3~, CHART+4, CHOP+4~, CONVERT+1~, CONVERT+6, GP+7, VEN+1~, VEN+2, CLASS+3~, CLASS+7* , CLASS+8, PAD+1~, PAD+4, PAD+5, NOW+1~, NOW+3, CLASS1+3~, CLASS1+7, CLASS1+8, DUR+1~ , DUR+4, DUR+6, TIME+1~, TIME+13, CP+1~, CP+2, CP+3, PGRP+1~, PGRP+2, PGRP+3* , PGRP+4, PGRP+5, ICD+3~, SLASH+2~, SLASH+3, WAIT+1~, W1, W1+2, W1+3, HEADER+2~ , HEADER+6, HEADER+7, HEADER+8, MAXNARR+1~, MAXNARR+2*, MAXNARR+3, MAXNARR+4, MAXNARR+5
%H	NOW+1~, DUR+1~
%I	NOW+1~, DUR+1~
A	ZOSF+1~, ZOSF+5*
B	ZOSF+1~, ZOSF+5*
C	ZOSF+1~, ZOSF+2*, ZOSF+4, ZOSF+5
CFIGIEN	GP+1~, GP+3, GP+4, CFG+1~, CFG+2, CFG+3, PGRP+2
CHART	CHART~, CHART+2, CHART+4*, CHART+5
CMD	ZOSF+1~, ZOSF+2*, ZOSF+3, ZOSF+5
CNT	CHOP~, CHOP+3, CHOP+12, CHOP+13, CHOP+15*, CHOP+16
CODE	ICD~, ICD+2, ICD+5*, ICD+6
D	FILE+3!, NOW+1~, NOW+3, NOW+4, TIME+1~, TIME+14, TIME+15
D0	FILE+3!, DUR~, DUR+2, DUR+3, LEN~, LEN+2, LEN+3
D1	FILE+3!, TIME+1~, TIME+2*, TIME+8
D2	TIME+1~, TIME+2, TIME+7, TIME+8
DA	FILE+3!, TT1!, AQ~, AQ+1, AQ+3, AQ+4, AQ1~, AQ1+2, AQ1+3, SLASH+1
DD	FILE+1!
DDER	FILE+3!
DEFEF	HEADER~, HEADER+6, MAXNARR~, MAXNARR+2, FVICD+5
DEL	SETPIECE~, SETPIECE+3, SETPIECE+5, SETPIECE+6, SETPIECE+7
DEPTIEN	CP~, CP+2, PGRP~, PGRP+3, MRP+2, CSTOP~, CSTOP+1
DFN	CHART+3~, CHART+5, CHART+6, GP+1~, GP+4, GP+5, GP+6, GP+7*, PRV1~, PRV1+1
DI	FILE+3!
DIADD	FILE+3!
DIC	FILE+3!
DICR	FILE+3!
DIE	FILE+3!
DINUM	FILE+3!
DIR	PAUSE+3!, TT1!
DIR("?"	TT1*
DIR("A"	PAUSE+3, TT1
DIR(0	PAUSE+3, TT1
DIRUT	PAUSE+5!
DLAYGO	FILE+3!
DO	FILE+1!
DQ	FILE+3!
DR	FILE+3!
DTIME	W1
DUR	TIME+1~, TIME+11*, TIME+12, TIME+13, TIME+14
DUZ(2	FVICD+7
FILE	CONVERT+1~, CONVERT+4, CONVERT+5, CONVERT+7, CONVERT+8, GP~, GP+2, GP+5, FHP+1~, FHP+3 , FHP+5
FLD	FHP+1~, FHP+7*
H	TIME+1~, TIME+13, TIME+14, TIME+15
H1	TIME+1~, TIME+4*, TIME+7, TIME+9
H2	TIME+1~, TIME+4, TIME+6, TIME+7*, TIME+9
H25	HEADER+2~, HEADER+3, HEADER+5, HEADER+7
HM1	TIME+1~, TIME+3*, TIME+4, TIME+5
HM2	TIME+1~, TIME+3*, TIME+4, TIME+5
HSFLAG	PGRP~, PGRP+2
ICD	FVICD+1~, FVICD+3*, FVICD+4, FVICD+5, FVICD+8
IEN	CLASS~, CLASS+4, CLASS1~, CLASS1+4, CLASS2~, CLASS2+4, ICD+3~, ICD+6, ICD+7, MRP+1~ , MRP+2, MRP+3*, MRP+4, MRP+5
IIEN	FVICD+1~, FVICD+3*
IO("S"	PAUSE+2
IOST	PAUSE+1
>> IOT	PAUSE+2
L	ZOSF~, ZOSF+4, FHP+1~, FHP+7*, FHP+8
LEN	CHOP~, CHOP+1, CHOP+7, CHOP+9, PAD~, PAD+3, PAD+4, PAD+5
LIEN	CHART~, CHART+1, CHART+5, FVICD+1~, FVICD+6*, FVICD+7
M	TIME+1~, TIME+13, TIME+14, TIME+15
M1	TIME+1~, TIME+5*, TIME+6, TIME+10
M2	TIME+1~, TIME+5, TIME+6, TIME+10
MMF	FHP~, FHP+6, FHP+8, FHP+9
MN	CONVERT~, CONVERT+4, CONVERT+7, FHP~, FHP+2, FHP+3
N	CONVERT+1~, CONVERT+6, SETPIECE+2~, SETPIECE+3, SETPIECE+4, SETPIECE+6
NAME	GP+1~, GP+6, GP+7, MRP+1~, MRP+5, MRP+6
OSF	ZOSF+1~, ZOSF+3, ZOSF+4, ZOSF+5
P1	SETPIECE+2~, SETPIECE+5*, SETPIECE+7
P2	SETPIECE+2~, SETPIECE+6*, SETPIECE+7
PATH	CONVERT+1~, CONVERT+3, CONVERT+5, CONVERT+8, HEADER+2~, HEADER+3, HEADER+4, HEADER+5, FHP+1~, FHP+4* , FHP+5
PCE	CHOP+4~, CHOP+6, CHOP+8, SETPIECE~, SETPIECE+5, SETPIECE+6, FHP+1~, FHP+8, FHP+10
PGRP	PGRP~, PGRP+4
PIEN	PRV~, PRV+1, PRV+2, FVICD~, FVICD+2
POP	CONVERT+1~, CONVERT+5, CONVERT+8, TESTTCP+1~, TT1+3, TT1+4, FHP+1~, FHP+5
R	ZOSF~, ZOSF+3, ZOSF+5
REC	CONVERT+1~, CONVERT+6*
S	CHOP+4~, CHOP+5, CHOP+6, CHOP+8, SLASH+2~, SLASH+3, SLASH+4, SLASH+5, SLASH+6, SLASH+7 , ZOSF+1~, ZOSF+2*, ZOSF+3, ZOSF+4, ZOSF+5
>> SPACE	CHOP+3*, CHOP+13, CHOP+16
SS	CONVERT~, CONVERT+2*, CONVERT+3
STAT	ICD+3~, ICD+4*, ICD+5
STG	SETPIECE~, SETPIECE+3, SETPIECE+4, SETPIECE+5, SETPIECE+6!, SETPIECE+7*, SETPIECE+8
T	NOW+1~, NOW+3*, NOW+4
T1	DUR+1~, DUR+5, DUR+7, TIME~, TIME+2, TIME+3, LEN+1~, LEN+2, LEN+4
T2	DUR+1~, DUR+6, DUR+7, TIME~, TIME+2, TIME+3, LEN+1~, LEN+3, LEN+4
TAB	CHOP~, CHOP+3*
TXT	CHOP~, CHOP+1, CHOP+6, CHOP+10, CHOP+13, CHOP+14, CHOP+16
TXT(	CHOP+13, CHOP+16
TYPE	ZOSF+1~, ZOSF+2*, ZOSF+3, ZOSF+4, ZOSF+5
U	CONVERT+6, GP+4, GP+6, GP+7, OS+1, VEN+1, CLASS+4, PRV1+1, CLASS1+4, CLASS2+4 , DUR+4, DUR+5, LEN+2, LEN+3, AQ+4, AQ1+3, CP+2, PGRP+2, PGRP+3, PGRP+4 , MRP+2, MRP+5, HEADER+6, MAXNARR+2, FVICD+3, FVICD+5, FVICD+6, CSTOP+1, FHP+6, FHP+7 , FHP+8
VAL	SETPIECE~, SETPIECE+7
VIEN	FVICD+1~, FVICD+3*, FVICD+6
X	CHART+3~, CHOP+4~, CHOP+6, CHOP+7, CHOP+8, CHOP+9, CHOP+10, CHOP+13, CLASS~, CLASS+1 , CLASS+7, STRIP~, STRIP+1, STRIP+2, PAD~, PAD+2, PAD+5, PAD+6, NOW+1~, CLASS1~ , CLASS1+1, CLASS1+7, CLASS2~, CLASS2+1, CLASS2+6, DUR+1~, DUR+3, DUR+4, DUR+5, TESTTCP+1~ , AQ~, AQ+1, AQ+4, SLASH~, SLASH+1, SLASH+3, SLASH+4, SLASH+5, SLASH+6, SLASH+7 , FVICD+1~, FVICD+2*, FVICD+3, FHP+1~, FHP+6, FHP+7, FHP+8, IEN~, IEN+1
X1	ZOSF~, ZOSF+5
X2	ZOSF~, ZOSF+5
XD	TIME+1~, TIME+8*, TIME+11
XH	TIME+1~, TIME+9*, TIME+11
XM	TIME+1~, TIME+10*, TIME+11
Y	CHOP+4~, CHOP+10, CHOP+11, CHOP+13, CLASS+3~, CLASS+4, CLASS+5, CLASS+6, CLASS1+3~, CLASS1+4 , CLASS1+5, CLASS1+6, CLASS2+3~, CLASS2+4, CLASS2+5, CLASS2+6, TESTTCP+1~, TT1+1, TT1+2, TT1+3 , AQ+3~, AQ+4, AQ1+1~, AQ1+2, AQ1+3, SLASH+2~, FHP+8, FHP+9
Z	CLASS+3~, CLASS+6, CLASS+7, CLASS1+3~, CLASS1+6, CLASS1+7, CLASS2+3~, CLASS2+6, CLASS2+7, SLASH+2~ , SLASH+3, SLASH+6, SLASH+7
>> ZTQUEUED	PAUSE+2

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCCU

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 48

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: