Routine: INHUTC3

Package	Total	Call Graph
VA Fileman	3	^DIC ^DICN ^DIE
IHS Generic Interface System	1	$$DIC^INHSYS05
Kernel	1	$$CDATASC^%ZTFDT

Package

Total

Call Graph

VA Fileman

^DIC ^DICN ^DIE

IHS Generic Interface System

$$DIC^INHSYS05

Kernel

$$CDATASC^%ZTFDT

Package	Total	Caller Graph
IHS Generic Interface System	2	INHUTC7 INTSTO1

Package

Total

Caller Graph

IHS Generic Interface System

INHUTC7 INTSTO1

Entry Points

Name	Comments	DBIA/ICR reference
RMSGSTDT	;;24.05;REL AUX DATE 1
MSGSTDT	;;15.01;TRANS START DATE;INMSGSTART;S X=$$CVTDT^INHUTC3(X)
TEXT	;;9;SEARCH STRING;INTEXT;S X=INOPT("INSRCH","INTEXT",X)
DIRECT	;;6;DIRECTION;INDIR;S X=$$CVTCODE^INHUTC3(X,4001.1,6)
USER	;;24.04;USER NAME;INUSER;S Y=$P($G(^DIC(3,X,0)),U) S:$L(Y) X=Y
EXPAND	;;12;EXPANDED DISPLAY;INEXPAND;S X=$$CVTCODE^INHUTC3(X,4001.1,12)
TTYPE1	;;7;ORIGINATING TRANSACTION TYPE;INORIG;S Y=$P($G(^INRHT(X,0)),U) S:$L(Y) X=Y
PATIENT	;;8;PATIENT;INPAT;S Y=$P($G(^DPT(X,0)),U) S:$L(Y) X=Y
MSGENDT	;;15.02;TRANS END DATE;INMSGEND;S X=$$CVTDT^INHUTC3(X)
STAT1	;;3;STATUS;INSTAT;S X=$$CVTCODE^INHUTC3(X,4001.1,3)
FIELDS	; All tags below this are used as a field table for 4001.1 file ; field numbers less than 1 are control fields and cannot be passed in. ; The tag line is the mnemonic. The values in the line are:
SOURCE	;;5;SOURCE;INSOURCE
ARRAY(INDA,INA)	; update entry in criteria file with array of parms passed in
RMGSENDT	;;24.06;REL AUX DATE 2
DIV1	;;24.03;DIVISION;INDIV;S Y=$P($G(^DG(40.8,X,0)),U) S:$L(Y) X=Y
STATUS	;;33;STATUSES;MULTISTAT;S X=$$CVTCODE^INHUTC3(X,4001.15,.01)
DIVISION	;;34;DIVISIONS;MULTIDIV;S Y=$P($G(^DG(40.8,X,0)),U) S:$L(Y) X=Y
DEST	;;32;DESTINATIONS;MULTIDEST;S Y=$P($G(^INRHD(X,0)),U) S:$L(Y) X=Y
MSGID	;;4;MESSAGE ID;INID
ENDDT	;;1.1;END DATE;INEND;S X=$$CVTDT^INHUTC3(X)
RELSTDT	;;24.01;RELATIVE START DATE
DEST1	;;2;DESTINATION;INDEST;S Y=$P($G(^INRHD(X,0)),U) S:$L(Y) X=Y
ERRRES	;;15.04;ERROR RESOLUTION STATUS;INERSTAT;S X=$$CVTCODE^INHUTC3(X,4001.1,15.04)
ERRLOC	;;15.03;ERROR LOCATIONS;INERLOC;S Y=$P($G(^INTHERL(X,0)),U) S:$L(Y) X=Y
DEVICE	;;28;DEVICE
TTYPE	;;31;TRANSACTION TYPES;MULTIORIG;S Y=$P($G(^INRHT(X,0)),U) S:$L(Y) X=Y
MATCH	;;10;FIELD MATCH TYPE;INTYPE;S X=$$CVTCODE^INHUTC3(X,4001.1,10)
CVTDT(X)	; make external view of date
NAME	;;.04;CRITERIA NAME;NAME;
LISTORD	;;11;LISTING ORDER;INORDER;S X=$$CVTCODE^INHUTC3(X,4001.1,11)
CVTCODE(X,FILE,FLD)
STARTDT	;;1;START DATE;INSTART;S X=$$CVTDT^INHUTC3(X+.0000001)
RELENDT	;;24.02;RELATIVE END DATE

Name	Field # of Occurrence
$$CDATASC^%ZTFDT	CVTDT+7
^DIC	ARRAY+38
^DICN	ARRAY+36
^DIE	ARRAY+41
$$DIC^INHSYS05	ARRAY+34

Name	Line Occurrences (* Changed, ! Killed)
^DD(	ARRAY+34, CVTCODE+4
^DD(4001.1	ARRAY+18, ARRAY+22
^DIZ(4001.1 - [#4001.1]	ARRAY+10, ARRAY+24!

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CVTCODE+3~, CVTCODE+5*, CVTCODE+6
C	CVTCODE+3~, CVTCODE+5*, CVTCODE+6
DA	ARRAY+9~, ARRAY+26~, ARRAY+41*
DA(1	ARRAY+27*
DIC	ARRAY+9~, ARRAY+26~, ARRAY+27*
DIC("P"	ARRAY+27*
DIC(0	ARRAY+27*
DIE	ARRAY+9~, ARRAY+41*
DINUM	ARRAY+26~
DLAYGO	ARRAY+26~, ARRAY+27*, ARRAY+34
DO	ARRAY+26~
DR	ARRAY+9~, ARRAY+26~, ARRAY+41*
FILE	CVTCODE~, CVTCODE+2, CVTCODE+4
FLD	CVTCODE~, CVTCODE+2, CVTCODE+4
H	CVTDT+1~, CVTDT+3, CVTDT+5, CVTDT+6
INA	ARRAY~, ARRAY+10, ARRAY+12, ARRAY+16, ARRAY+18, ARRAY+20, ARRAY+24, ARRAY+29, ARRAY+31, ARRAY+36 , ARRAY+38, ARRAY+41
INDA	ARRAY~, ARRAY+10, ARRAY+24, ARRAY+27, ARRAY+41
INFN	ARRAY+9~, ARRAY+22*, ARRAY+27, ARRAY+33
INX	ARRAY+9~, ARRAY+12*, ARRAY+14, ARRAY+16, ARRAY+18, ARRAY+20, ARRAY+24, ARRAY+29, ARRAY+31, ARRAY+36 , ARRAY+38, ARRAY+41
INY	ARRAY+9~, ARRAY+14*, ARRAY+16, ARRAY+18, ARRAY+20, ARRAY+22, ARRAY+24, ARRAY+27, ARRAY+41
INZ	ARRAY+26~, ARRAY+29*, ARRAY+31, ARRAY+36, ARRAY+38
M	CVTDT+1~, CVTDT+3, CVTDT+5, CVTDT+6
S	CVTCODE+3~, CVTCODE+4, CVTCODE+5, CVTDT+1~, CVTDT+3, CVTDT+5*, CVTDT+6
T	CVTDT+1~, CVTDT+3*, CVTDT+4
U	ARRAY+22, ARRAY+34, CVTCODE+4, CVTCODE+5
X	ARRAY+26~, ARRAY+31, ARRAY+34, CVTCODE~, CVTCODE+2, CVTCODE+5, CVTCODE+6, CVTCODE+7, CVTDT~, CVTDT+3 , CVTDT+6, CVTDT+7, CVTDT+8
Y	ARRAY+26~, ARRAY+36, ARRAY+38, ARRAY+41

Customize PDF page

Package: IHS Generic Interface System

Routine: INHUTC3

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Local Variables

Legend:

Marked Items