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 |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: INHUTC3

Package: IHS Generic Interface System

Routine: INHUTC3


Information

INHUTC3 ;bar; 22 May 97 12:08; API to error search and reporting functions

Source Information

Source file <INHUTC3.m>

Call Graph

Call Graph Total: 5

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Generic Interface System 2 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

External References

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

Global Variables Directly Accessed

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

Legend:

>> 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

Marked Items

Name Field # of Occurrence
$T(@INX ARRAY+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All