Routine: VENPCC

Package	Total	Call Graph
PCC New Encounter Form	3	(,QSIG)^VENPCCA $$COUNT^VENPCCP ($$CFG,$$NOW)^VENPCCU
IHS VA Utilities	2	^XBCLS ^XBFMK
VA Fileman	2	^DIC YN^DICN
Kernel	1	($$FMADD,$$FMTE)^XLFDT

Package

Total

Call Graph

PCC New Encounter Form

(,QSIG)^VENPCCA $$COUNT^VENPCCP ($$CFG,$$NOW)^VENPCCU

IHS VA Utilities

^XBCLS ^XBFMK

VA Fileman

^DIC YN^DICN

Kernel

($$FMADD,$$FMTE)^XLFDT

Package	Total	Caller Graph
PCC New Encounter Form	5	VENPCC25 VENPCCA VENPCCP2 VENPCCW VENPCCX

Package

Total

Caller Graph

PCC New Encounter Form

VENPCC25 VENPCCA VENPCCP2 VENPCCW VENPCCX

Entry Points

Name	Comments	DBIA/ICR reference
NOTASK	; EP-NO TASK, DEBUG, NO VISIT
CKONLY	; EP-CHECKIN ONLY
DEMO	; EP-FROM VEN MENU OPTION ; DEMO MODE - NO VISIT CREATED
DEMODATA	; EP-CREATE A DEMO DATA FILE IN THE TEMP DIRECTORY ; ASSUMES THAT DEMODATA ALREADY HAS A VALUE = DEMO FILE NAME
PGRP(CIEN)	; EP-RETURN THE SPECIAL PRINTER GROUP (SPGRP) ; ONLY FOR HS ONLY, TELEPHONE TRIAGE, OR CHART REV ; PATCHED BY GIS/OIT 1/15/06 ; PCC+ 2.5 PATCH 2
EFNOTASK	; EP-NO TASK (FOREGROUND MODE), DEBUG, NO VISIT, ENCOUNTER FORM ONLY
PACK()	; EP-TO PACK UP ENVIRONMENTAL VARIABLES
CKIN	; EP-TO GENERATE AN EF AND HS DURING A NON-ILC CHECK-IN
REPRINT	; EP-FROM THE MENU OPTION ; REPRINT THE EF
DNCI
EHR	; EP - USE THE VISIT CREATED BY THE EHR
DOCS
OGONLY	; EP-FROM VEN MENU OPTION ; OUTGUIDE ONLY
EFONLY	; EP-FROM VEN MENU OPTION ; PRINT THE EF ONLY
QUEUE(VISIT,DEPTIEN,OGFLAG,TRFLAG,UPDEM,PRVIEN)	; EP-LEGACY SIGNATURE EP FOR ANMC
DEBUG	; EP-FOR DEBUG MODE - NO VISIT CREATED AND RECORD SENT TO FILE NOT TCP SOCKET
PATIENT	; EP-CHECK IN PATIENT
DREG	; FROM HERE ON, POSSIBLE MATCH EXISTS BUT IT IS A REG VISIT - NOT AN NCI VISIT
HSONLY	; EP-FROM VEN MENU OPTION ; PRINT THE HS ONLY
HSNOTASK	; EP-NO TASK (FOREGROUND MODE), HEALTH SUMMARY ONLY
PGRP0
PGRP1
NCI	; EP-NURSE CHECK IN
DUP(DFN,DIEN)	; EP-GIVEN A DFN AND DEPT STOP IEN RETURN A '1' IF DUPLICATE VISIT
PIMS(PIMSDFN)	; EP - PRINTS A PCC+ FORM VIA USUAL DIALOG. CALLED DURING PIMS SCHEDULING ; PATIENT DFN IS KNOWN BUT NO VISIT WILL BE CREATED ; PATCHED BY GIS/OIT 6/15/06 ; PCC+ 2.5 PATCH 5

Name	Field # of Occurrence
^DIC	PGRP1
YN^DICN	DNCI+9, DREG+3
^VENPCCA	PATIENT+1
QSIG^VENPCCA	QUEUE+1
$$COUNT^VENPCCP	DOCS+2
$$CFG^VENPCCU	CKIN+5
$$NOW^VENPCCU	DUP+5
^XBCLS	CKIN+3
^XBFMK	PGRP1, PGRP1+2
$$FMADD^XLFDT	DUP+5
$$FMTE^XLFDT	DNCI+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Welcome to the PATIENT CHECK-IN MODULE...." Line Location: CKIN+4
Function Call: WRITE	Prompt: !,"Unable to find configuration parameters! Notify the site manager...",!! Line Location: CKIN+5
Function Call: WRITE	Prompt: !,"There are now ",%," documents in the print queue" Line Location: DOCS+3
Function Call: WRITE	Prompt: !,"There is one document in the print queue" Line Location: DOCS+4
Function Call: WRITE	Prompt: !,"PCC+ can't locate a valid EHR visit! Request cancelled.." Line Location: DUP+12
Function Call: WRITE	Prompt: !,"A new VISIT will be created for this encounter" Line Location: DUP+13
Function Call: WRITE	Prompt: !,"PCC+ has successfully located the EHR visit!" Line Location: DUP+15
Function Call: WRITE	Prompt: !,"This patient checked into a """,CS,""" clinic ",TIME Line Location: DNCI+6
Function Call: WRITE	Prompt: !,"Want to link your check-in measurements to this existing" Line Location: DNCI+7
Function Call: WRITE	Prompt: !,"visit (Answer NO only if you want to create a new visit!)" Line Location: DNCI+8
Function Call: WRITE	Prompt: !,"OK, a new visit will be created to contain your check-in measurements" Line Location: DNCI+11
Function Call: WRITE	Prompt: !,"This patient had a visit in this clinic within the past 6 hours..." Line Location: DREG+1
Function Call: WRITE	Prompt: !,"Want to create another visit" Line Location: DREG+2
Routine Call	DIC Line Location: PGRP1

FileNo	Call Tags
^VEN(7.95 - [#19707.95]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	DUP+7, DNCI+1, DNCI+4
^AUPNVSIT("AC"	DUP+6
^DIC(40.7 - [#40.7]	PGRP+4, DNCI+2
^DPT - [#2]	DUP+1, PIMS+3
^VEN(7.5 - [#19707.5]	DOCS+1
^VEN(7.95 - [#19707.95]	PGRP1+1, DUP+2, DUP+10

Name	Line Occurrences
CKIN	DEBUG+3, NCI+3, DEMO+2, DEMODATA+6, EFONLY+2, HSONLY+2, CKONLY+2, PIMS+6
PGRP0	PGRP+3
VENPCC	NOTASK+2, HSNOTASK+3, OGONLY+2, EHR+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CKIN+1~, DOCS~, DOCS+2, DOCS+3, PACK+1~, PACK+2, PACK+3, DUP+3~, DNCI+4, DNCI+5 , DNCI+9, DNCI+10, DREG+2*, DREG+4
%1	CKIN+2~
%DT	CKIN+2~
%H	CKIN+1~
%I	CKIN+1~
%Q	CKIN+1~
%T	CKIN+2~
%Y	CKIN+1~, DUP+3~
AGE	CKIN+2~
APPT	CKIN+1~
AUPNDAYS	CKIN+1~
AUPNDOB	CKIN+1~
AUPNDOD	CKIN+1~
AUPNPAT	CKIN+1~
AUPNSEX	CKIN+1~
CFIGIEN	CKIN+1~, CKIN+5*, DOCS+1
CHECKIN	CKONLY+1~*
CIEN	PGRP~, PGRP+4
CLINIC	CKIN+1~
CNAME	PGRP+2~, PGRP+4*, PGRP+5
CS	DUP+3~, DUP+10, DNCI+2, DNCI+6
CSIEN	DUP+3~, DNCI+1*, DNCI+2
DDH	CKIN+2~
DEFEF	CKIN+1~
DEFHS	CKIN+1~
>> DEMODATA	DEMODATA+3, DEMODATA+4*
DEPT	DUP+3~
DEPTIEN	CKIN+1~, QUEUE~
DFN	CKIN+2~, DUP~, DUP+1, DUP+6
DIC	CKIN+1~, PGRP+2~, PGRP0*
DIC("A"	PGRP0*
DIC("S"	PGRP0+1*
DIC(0	PGRP0*
DIEN	DUP~, DUP+2, DUP+10
DIFF	DUP+3~
DIPGM	CKIN+1~
DISYS	CKIN+2~
DOB	CKIN+2~
DTOUT	CKIN+1~, PGRP+2~
DUOUT	CKIN+1~, PGRP+2~
EFONLY	EFNOTASK+1~, DEMODATA+2~, DEMODATA+5, EFONLY+1~*
EHRFLAG	EHR+1~, EHR+2*, DUP+12, DUP+15
ELIG	CKIN+2~
EXT	CKIN+2~
HSONLY	HSNOTASK+1~, HSNOTASK+2, HSONLY+1~, PGRP+3
I	PACK+1~, PACK+3*
IO	PACK+2
JOB	PACK+1~, PACK+2*
LIM	DUP+3~, DUP+5*, DUP+9
LOC	CKIN+1~, PGRP+2~
NCCANCEL	CKIN+1~
NCIFLAG	NCI+1~, NCI+2*, DNCI
NOTASK	DEBUG+1~, DEBUG+2, NOTASK+1~, HSNOTASK+1~, HSNOTASK+2, DEMODATA+2~, DEMODATA+5
NOVISIT	PIMS+4~, PIMS+5*
NOW	CKIN+1~
OGFLAG	CKIN+2~, QUEUE~
OGONLY	OGONLY+1~*
PATH	DOCS~, DOCS+1*, DOCS+2
PATIENT	CKIN+1~
PGRP	PGRP+2~, PGRP1+1*, PGRP1+3
PIMSDFN	PIMS~, PIMS+3
POP	CKIN+1~
PRVIEN	CKIN+1~, QUEUE~
QIEN	DUP+3~
REPRINT	REPRINT+1~*
RESULT	CKIN+1~
SEX	CKIN+2~
SSN	CKIN+2~
STOP	DUP+3~, DUP+5, DUP+6, DUP+10
TIME	DUP+3~, DNCI+3, DNCI+5, DNCI+6
TRFLAG	QUEUE~
TYPE	CKIN+1~
U	PGRP+4, PGRP1+1, PACK+3, DUP+10, DNCI+1, DNCI+2
UPDEM	CKIN+2~, QUEUE~
V	DUP+3~, DUP+6*
VCN	CKIN+1~
VDT	DUP+3~, DUP+8*, DUP+9
VENDEBUG	DEBUG+1~
VENDEMO	DEBUG+1~, DEBUG+2, NOTASK+1~, DEMO+1~, DEMODATA+2~, DEMODATA+5, HSONLY+1~, OGONLY+1~
VENDEV	PACK+1~, PACK+2*
VENNOTCP	DEBUG+1~, DEBUG+2*
VIEN	CKIN+1~, DUP+3~, DUP+5, DUP+10, DUP+12, DUP+13, DUP+15, DNCI, DNCI+1, DNCI+2 , DNCI+4, DNCI+12*, DREG+4
VISIT	DUP+3~, DUP+5, DUP+6, DUP+7, DUP+10, QUEUE~
VPFLAG	CKIN+1~
X	CKIN+1~, PGRP+2~, PACK+1~, PACK+3, DUP+3~, DUP+7, DUP+8, DUP+10
Y	CKIN+1~, PGRP+2~, PGRP1, PGRP1+1, PACK+1~, PACK+2, PACK+3, PACK+4

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCC

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: