Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: VENPCCU

Package: PCC New Encounter Form

Routine: VENPCCU


Information

VENPCCU ; IHS/OIT/GIS - VEN UTILITIES ; 29 Dec 2009 2:02 PM

Source Information

Source file <VENPCCU.m>

Call Graph

Call Graph Total: 5

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  

Caller Graph

Caller Graph Total: 48

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  

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

External References

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

Global Variables Directly Accessed

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

Label References

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All