Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | Found Entries | All

Print Page as PDF

Global: ^BYIMRT

Package: IHS Immunizations Interface

Global: ^BYIMRT

Information

FileMan FileNo	FileMan Filename	Package
90480.2	IZ REAL-TIME QUERY	IHS Immunizations Interface

Description

Directly Accessed By Routines, Total: 1

Package	Total	Routines
IHS Immunizations Interface	1	BYIMRT

Accessed By FileMan Db Calls, Total: 1

Package	Total	Routines
IHS Immunizations Interface	1	BYIMRT

Pointer To FileMan Files, Total: 2

Package	Total	FileMan Files
IHS Generic Interface System	1	UNIVERSAL INTERFACE(#4001)[.07]
Registration	1	VA PATIENT(#2)[.04]

Fields, Total: 9

Field #	Name	Loc	Type	Details
.01	QUERY FILE NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>50!($L(X)<3) X` LAST EDITED: `MAR 30, 2012` HELP-PROMPT: `Answer must be 3-50 characters in length.` CROSS-REFERENCE: `90480.2^B` 1)= S ^BYIMRT("B",$E(X,1,50),DA)="" 2)= K ^BYIMRT("B",$E(X,1,50),DA)
.02	EXPORT OR IMPORT	0;2	SET	'E' FOR EXPORT; 'I' FOR IMPORT; LAST EDITED: `APR 05, 2012` CROSS-REFERENCE: `90480.2^ACT^MUMPS` 1)= I DA,X]"" S ^BYIMRT("ACT",$P(^BYIMRT(DA,0),U),X,DA)="" 2)= I DA,X]"" K ^BYIMRT("ACT",$P(^BYIMRT(DA,0),U),X,DA)
.03	FILE PATH	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>50!($L(X)<3) X` LAST EDITED: `MAR 26, 2012` HELP-PROMPT: `Answer must be 3-50 characters in length.`
.04	PATIENT	0;4	POINTER TO VA PATIENT FILE (#2)	VA PATIENT(#2) LAST EDITED: `JUN 25, 2012` CROSS-REFERENCE: `90480.2^PAT` 1)= S ^BYIMRT("PAT",$E(X,1,30),DA)="" 2)= K ^BYIMRT("PAT",$E(X,1,30),DA) CROSS-REFERENCE: `90480.2^PAT2^MUMPS` 1)= I DA,X,$P($G(^DPT(X,0)),U)]"" S ^BYIMRT("PAT",$P(^DPT(X,0),U),DA)="" 2)= I DA,X,$P($G(^DPT(X,0)),U)]"" K ^BYIMRT("PAT",$P(^DPT(X,0),U),DA)
.05	MESSAGE DATE/TIME	0;5	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 02, 2012` CROSS-REFERENCE: `90480.2^DT` 1)= S ^BYIMRT("DT",$E(X,1,30),DA)="" 2)= K ^BYIMRT("DT",$E(X,1,30),DA)
.06	MESSAGE ID	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<3) X` LAST EDITED: `APR 05, 2012` HELP-PROMPT: `Answer must be 3-20 characters in length.` CROSS-REFERENCE: `90480.2^MID` 1)= S ^BYIMRT("MID",$E(X,1,30),DA)="" 2)= K ^BYIMRT("MID",$E(X,1,30),DA)
.07	INTHU IEN	0;7	POINTER TO UNIVERSAL INTERFACE FILE (#4001)	UNIVERSAL INTERFACE(#4001) LAST EDITED: `JUN 26, 2012`
.08	TRANSMISSION STATUS	0;8	SET	'0' FOR COMPLETE; '1' FOR FAIL; LAST EDITED: `DEC 07, 2012` CROSS-REFERENCE: `90480.2^STAT` 1)= S ^BYIMRT("STAT",$E(X,1,30),DA)="" 2)= K ^BYIMRT("STAT",$E(X,1,30),DA)
1	HL7 MESSAGE	1;0	Multiple #90480.21	90480.21

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | Found Entries | All