Global: ^BOP(90355.1

FileMan FileNo	FileMan Filename	Package
90355.1	BOP QUEUE	IHS Omnicell Pyxis Interface

Package	Total	Routines
IHS Omnicell Pyxis Interface	16	BOPCAP BOPCLN BOPCP2 BOPMTR BOPOBS BOPRNEW BOPRNEW1 BOPROC BOPSET BOPSHO BOPSLK BOPT1 BOPT2 BOPT3 BOPTBS BOPTU

Package	Total	Routines
IHS Omnicell Pyxis Interface	4	BOPCAP BOPOBS BOPRNEW BOPT1

Package	Total	FileMan Files
IHS Omnicell Pyxis Interface	2	BOP RECEIVE DRUG(#90355.2)[.09] BOP TRANSFER TO DRUG(#90355.44)[.03]

Package	Total	FileMan Files
Pharmacy Data Management	2	IV ADDITIVES(#52.6)[#90355.121(.01)] IV SOLUTIONS(#52.7)[#90355.12(.01)]
Registration	1	MEDICAL CENTER DIVISION(#40.8)[.12]

Fields, Total: 141

Field #	Name	Loc	Type	Details
.01	DATE/TIME LOGGED	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:X<1 X` LAST EDITED: `NOV 15, 2004` HELP-PROMPT: `(No range limit on date)` AUDIT: `YES, ALWAYS` DELETE AUTHORITY: # WRITE AUTHORITY: # READ AUTHORITY: # CROSS-REFERENCE: `90355.1^B` 1)= S ^BOP(90355.1,"B",$E(X,1,30),DA)="" 2)= K ^BOP(90355.1,"B",$E(X,1,30),DA)
.02	EVENT TYPE CODE	0;2	SET	**********************REQUIRED FIELD********************** 'A01' FOR A01; 'A02' FOR A02; 'A03' FOR A03; 'A04' FOR A04; 'A06' FOR A06; 'A07' FOR A07; 'A08' FOR A08; 'A11' FOR A11; 'A18' FOR A18; 'A23' FOR A23; 'A34' FOR A34; 'A35' FOR A35; 'O01' FOR O01; 'P03' FOR P03; 'ORM' FOR ORM; 'A13' FOR A13; LAST EDITED: `NOV 22, 1997` HELP-PROMPT: DESCRIPTION: `Field 1 of EVN Segment. Second Component of Field 9 of MSH Segment` A01 Admit patient A03 Discharge patient A04 Register patient A06 Transfer outpatient to inpatient A07 Transfer inpatient to outpatient A08 Update patient information A11 Cancel admit A13 Cancel discharge A18 Merge patient information A23 Delete patient A34 Merge patient ID only A35 Merge account number only O01 Order message ORM Pharmacy dispense message P03 Post detail financial transaction
.03	DATE/TIME OF EVENT	0;3	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAY 17, 1998` HELP-PROMPT: DESCRIPTION: Field 2 of EVN Segment. Date/time the event was entered into the system. CROSS-REFERENCE: `90355.1^AD` 1)= S ^BOP(90355.1,"AD",$E(X,1,30),DA)="" 2)= K ^BOP(90355.1,"AD",$E(X,1,30),DA)
.04	MESSAGE TYPE	0;4	SET	**********************REQUIRED FIELD********************** 'ACK' FOR ACK; 'ADT' FOR ADT; 'DFT' FOR DFT; 'RDE' FOR RDE; 'RAS' FOR RAS; 'MFN' FOR MFN; LAST EDITED: `APR 10, 1999` HELP-PROMPT: DESCRIPTION: `First Component of Field 9 in MSH Segment.` ACK General Acknowledgement ADT ADT Message RDE Pharmacy Dispense Order RAS Pharmacy Treatment Administration
.05	DATE/TIME OF MESSAGE	0;5	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 1997` DESCRIPTION: Field 7 of MSH Segment. Date/time that sending system created message.
.06	RECEIVING APPLICATION	0;6	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `NOV 01, 1997` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: Field 5 of MSH Segment
.07	MESSAGE CONTROL ID	0;7	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 05, 1998` HELP-PROMPT: DESCRIPTION: Field 10 of MSH Segment.
.08	PROCESSING ID	0;8	SET	**********************REQUIRED FIELD********************** 'D' FOR D; 'P' FOR P; 'T' FOR T; LAST EDITED: `NOV 13, 1997` DESCRIPTION: Field 11 of MSH Segment.
.09	VERSION ID	0;9	SET	**********************REQUIRED FIELD********************** '2.2' FOR 2.2; '2.3' FOR 2.3; LAST EDITED: `NOV 01, 1997` DESCRIPTION: Field 12 of MSH Segment.
.1	MESSAGE STATUS	0;10	SET	'0' FOR Ready to Send; '1' FOR Sent/Waiting ACK; '2' FOR Received ACK; '3' FOR Error; '9' FOR Closed; '99' FOR Message FROM Client; LAST EDITED: `OCT 20, 1998` CROSS-REFERENCE: `90355.1^AS` 1)= S ^BOP(90355.1,"AS",$E(X,1,30),DA)="" 2)= K ^BOP(90355.1,"AS",$E(X,1,30),DA)
.11	ERROR COUNT	0;11	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `APR 19, 1998` HELP-PROMPT: `Type a Number between 0 and 99, 0 Decimal Digits`
.12	RECEIVING FACILITY	0;12	POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)	MEDICAL CENTER DIVISION(#40.8) LAST EDITED: `JUL 27, 1998` HELP-PROMPT:
.21	A08 ITEM NUMBER	0;21	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `MAR 08, 1999` HELP-PROMPT: `Type a Number between 1 and 9, 0 Decimal Digits` DESCRIPTION: `this field is used by the a08 xaction to determine which records to send` used in both VEFSPCP2 and VEFSPT1,4
.41	BCMA STATUS	0;41	SET	'0' FOR NOT PROCESSED; '1' FOR PROCESSING COMPLETE; 'E' FOR ERROR OCCURED DURING PROCESSING; LAST EDITED: `JUL 17, 2003` DESCRIPTION: `This piece will be nill or zero until it is processed into the patients Medical Admin Record. When it is processed into the MAR the field will be set to 1. Records should not be purged until they have been processed into` the MAR or 90 days after creation
.5	FORMULARY	0;50	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `MAR 25, 1999` DESCRIPTION: This is the formulary indicator for HL7 pharmacy message.
1.01	PATIENT DFN	1;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAY 13, 1999` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: IEN of Patient file. CROSS-REFERENCE: `90355.1^ADFN` 1)= S ^BOP(90355.1,"ADFN",$E(X,1,30),DA)="" 2)= K ^BOP(90355.1,"ADFN",$E(X,1,30),DA) patient internal dfn
1.02	PATIENT ID (INTERNAL ID)	1;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: Component 1, Field 3 of PID Segment.
1.03	PATIENT NAME	1;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `JUN 03, 1999` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Field 5 of PID Segment. CROSS-REFERENCE: `90355.1^ANAME^MUMPS` 1)= Q:X="" N A,B S A=$P(X,",",1),B=$P(X,",",2,999) S:(A'=""&(B'="")) ^BOP(90355.1,"ANAME",A,B,DA)="" K A,B 2)= Q:X="" N A,B S A=$P(X,",",1),B=$P(X,",",2,999) K:(A'=""&(B'="")) ^BOP(90355.1,"ANAME",A,B,DA) K A,B
1.04	DATE OF BIRTH	1;4	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 14, 1997` DESCRIPTION: Field 7 of PID segment.
1.05	SEX	1;5	SET	**********************REQUIRED FIELD********************** 'M' FOR M; 'F' FOR F; 'O' FOR O; 'U' FOR U; LAST EDITED: `NOV 14, 1997` DESCRIPTION: Field 8 of PID Segment.
1.06	RACE	1;6	SET	**********************REQUIRED FIELD********************** 'A' FOR A; LAST EDITED: `NOV 14, 1997` DESCRIPTION: Field 10 of PID Segment. This is a 'user-defined' table. Definition is incomplete.
1.07	STREET ADDRESS	1;7	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>35!($L(X)<3) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 3-35 characters in length.` DESCRIPTION: Part of Field 11 of PID Segment.
1.08	CITY	1;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: Part of Field 11 of PID Segment.
1.09	STATE	1;9	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: Part of Field 11 of PID Segment.
1.1	ZIP	1;10	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>5!($L(X)<5) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 5 characters in length.` DESCRIPTION: Part of Field 11 of PID Segment.
1.11	FACILITY ID	1;11	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-6 characters in length.` DESCRIPTION: Component 4, Field 3 of PID Segment.
1.12	PHONE NUMBER - HOME	1;12	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: Field 13 of PID Segment.
1.13	PHONE NUMBER - WORK	1;13	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: Field 14 of PID Segment.
1.14	PATIENT ACCOUNT NUMBER	1;14	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: Field 18 of PID Segment.
1.15	SSN - PATIENT	1;15	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: Field 19 of PID segment.
2.1	ORDER CONTROL CODE	2;1	SET	**********************REQUIRED FIELD********************** 'NW' FOR NW; 'OC' FOR OC; 'OD' FOR OD; 'OH' FOR OH; 'OR' FOR OR; 'XX' FOR XX; LAST EDITED: `NOV 01, 1997` DESCRIPTION: `Field 1 of ORC Segment` NW New Order OC Order Canceled OH Order Held OR Order Released XX Order Changed
2.2	PLACER ORDER NUMBER	2;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `NOV 13, 1997` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `Field 2 of ORC Segment` Order number for Connect Rx Orders and dispense requests.
2.3	ORDER STATUS	2;3	SET	**********************REQUIRED FIELD********************** 'CA' FOR CA; 'CM' FOR CM; 'DC' FOR DC; 'OH' FOR OH; 'IP' FOR IP; 'RP' FOR RP; 'SC' FOR SC; LAST EDITED: `NOV 01, 1997` DESCRIPTION: `Field 5 of ORC Segment` CA Order canceled CM Order completed OH Order on hold IP Order in process RP Order replaced SC order in process, scheduled
2.4	POSTING DATE/TIME	2;4	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 1997` DESCRIPTION: `Field 9 of ORC Segment.` Time and date when the current transaction enters the order application.
2.5	ENTERED BY	2;5	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3) X` LAST EDITED: `NOV 01, 1997` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `Field 10 of ORC Segment.` Name of person keying request into application. CRx max=25 char.
2.6	VERIFIED BY	2;6	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3) X` LAST EDITED: `NOV 01, 1997` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `Field 11 of ORC Segment.` Name of person who verified accuracy of entered request. CRx max=25 char.
2.7	ORDERING PROVIDER	2;7	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3) X` LAST EDITED: `NOV 01, 1997` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `Field 12 of ORC Segment.` Name of person responsible for creating request. CRx max=25 char.
2.8	ORDER-DRUG#	2;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `APR 02, 1998` HELP-PROMPT: `Answer must be 1-15 characters in length.`
3.1	Q/T FREQUENCY	3;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3) X` LAST EDITED: `NOV 01, 1997` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: Component 2, Field 1 of RXE Segment
3.11	IV ORDER FLAG	3;11	SET	'0' FOR NOT IV ORDER; '1' FOR IV ORDER; LAST EDITED: `JUL 17, 2003` DESCRIPTION: This is a flag to tell the interface queue that it is an iv order
3.2	Q/T DURATION	3;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `NOV 01, 1997` HELP-PROMPT: `Answer must be 1 character in length.` DESCRIPTION: Component 3, Field 1 of RXE Segment
3.3	Q/T ORDER START DATE/TIME	3;3	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 1997` DESCRIPTION: Component 4, Field 1 of RXE Segment
3.4	Q/T ORDER END DATE/TIME	3;4	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 1997` DESCRIPTION: Component 5, Field 1 of RXE Segment.
3.5	Q/T ORDER TYPE	3;5	SET	**********************REQUIRED FIELD********************** 'S' FOR S; 'P' FOR P; 'T' FOR T; 'O' FOR O; LAST EDITED: `APR 24, 1998` DESCRIPTION: `Component 6, Field 1 of RXE Segment. S Scheduled P PRN T Stat Order`
3.6	Q/T CONDITION PARAMETERS	3;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `NOV 01, 1997` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: Component 7, Field 1 of RXE Segment.
3.7	Q/T ADMINISTRATION TIMES	3;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `NOV 02, 1997` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: Component 10, Field 1 of RXE Segment.
3.8	IV INFUSION RATE	3;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `JUL 17, 2003` HELP-PROMPT: `This is the infusion rate from 55 file node 0 piece 8`
4.01	GIVE CODE IDENTIFIER	4;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>50!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-50 characters in length.` DESCRIPTION: Component 1, Field 2 of RXE Segment. Medication identifier.
4.02	GIVE CODE TEXT	4;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>50!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-50 characters in length.` DESCRIPTION: Component 2, Field 2 of RXE Segment. Medication Description.
4.03	GIVE AMOUNT MINIMUM	4;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: Field 3 of RXE Segment.
4.04	GIVE AMOUNT MAXIMUM	4;4	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: Field 4 of RXE Segment.
4.05	GIVE UNIT IDENTIFIER	4;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Component 1, Field 5 of RXE Segment. CRx uses this Component if not null; otherwise,it uses Component 2 of Field 5.
4.06	GIVE UNIT TEXT	4;6	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Component 2, Field 5 of RXE Segment.
4.07	GIVE DOSAGE FORM	4;7	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>40!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-40 characters in length.` DESCRIPTION: Field 6 of RXE Segment. Manner in which medication is aggregate for dispensing. CRx max=26 char.
4.08	CONTROLLED SUBSTANCE	4;8	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 17, 2003` HELP-PROMPT: `This is the DEA number from ^PSDRUG node 0 piece 3`
5.1	PROVIDERS ADMIN INSTRUCTIONS	5;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `NOV 02, 1997` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: Field 7 of RXE Segment. Connect Rx uses 2nd Component of this field. CRx max=80 char.
5.2	DISPENSE AMOUNT	5;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 02, 1997` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: Field 10 of RXE Segment. Number of units to dispense.
6.1	SPECIAL INSTRUCTIONS	6;1	SET	'PATIENTSOWN' FOR PATIENTSOWN; 'SELFADMIN' FOR SELFADMIN; 'CONTROLLED' FOR CONTROLLED; 'CONTINUOUS' FOR CONTINUOUS; LAST EDITED: `NOV 02, 1997` HELP-PROMPT: DESCRIPTION: `Component 1, Field 21 (repeating) of RXE Segment. If null, Component 2 is a dispense instruction. PATIENTSOWN Patient will supply own med. SELFADMIN Patient will give own med. CONTINUOUS Product to be as a continuous` infustion.
6.2	DISPENSE INSTRUCTIONS	6;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `NOV 02, 1997` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: Component 2, Field 21 (repeating) of RXE Segment. Used if 1st Component is null. Truncated to 64 char by CRx.
7.1	GIVE RATE AMOUNT	7;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 02, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Field 23 of RXE Segment. Rate at which substance should be administered - usually for IV's. CRx max=28 char.
7.2	GIVE RATE UNIT IDENTIFIER	7;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: Component 1, Field 24 of RXE Segment.For IV use. CRx uses this component if not null. Otherwise uses 2nd Component (Give Rate Unit Text). CRx max=20 char. for BOTH components.
7.3	GIVE RATE UNIT TEXT	7;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: Component 2, Field 24 of RXE Segment. Defines actual rate of administration - generally for IV's. Used if 1st Component (Give Rate Unit Identifer) is null. CRx max=20 char. for BOTH components.
7.4	GIVE STRENGTH	7;4	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Field 25 of RXE Segment. For IV use. CRx max char=40 for Fields 25 and 26.
7.5	GIVE STRENGTH UNIT IDENTIFIER	7;5	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Component 1, field 26 of RXE Segment. For IV's. CRx uses first component if not null; otherwise uses second component. CRx max char.=40 for Fields 25 and 26.
7.6	GIVE STRENGTH TEXT	7;6	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Component 2, Field 26 of RXE Segment. IV use. CRx uses second component if first is null. CRx max=40 char. for Fields 25 and 26.
7.7	GIVE INDICATION	7;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: Field 27 of RXE Segment. IV use. CRx max=64 char.
8.1	ROUTE	8;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>25!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-25 characters in length.` DESCRIPTION: Field 1 of RXR Segment. CRx max=25 char.
8.2	DISPENSE CODE	8;2	SET	**********************REQUIRED FIELD********************** 'N' FOR N; 'F' FOR F; 'B' FOR B; LAST EDITED: `NOV 14, 1997` DESCRIPTION: `Field 1 of ZRX Segment.` N New/Initial Dispense request (Initial dose) F Batch Fill Dispense Request (Batch fill)
8.3	CYCLE DATE/TIME	8;3	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 14, 1997` DESCRIPTION: Field 2 of ZRX Segment.
8.6	TYPE OF ORDER	8;6	SET	'0' FOR REGULAR UNIT DOSE ORDER; '1' FOR IV ORDER; LAST EDITED: `JUN 02, 2003` DESCRIPTION: this is set by the VEFSOV* routines for IV
9.1	PATIENT HEIGHT	9;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<0)!(X?.E1"."4N.N) X` LAST EDITED: `MAR 12, 1999` HELP-PROMPT: `Type a Number between 0 and 999, 3 Decimal Digits` DESCRIPTION: patient height in cm
9.2	PATIENT WEIGHT	9;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<0)!(X?.E1"."4N.N) X` LAST EDITED: `MAR 12, 1999` HELP-PROMPT: `Type a Number between 0 and 9999, 3 Decimal Digits` DESCRIPTION: patient weight in kg
10.1	PATIENT CLASS	10;1	SET	**********************REQUIRED FIELD********************** 'E' FOR E; 'I' FOR I; 'O' FOR O; 'P' FOR P; 'R' FOR R; 'B' FOR B; LAST EDITED: `NOV 14, 1997` DESCRIPTION: Field 2 of PV1 Segment.
10.2	NURSING UNIT	10;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Component 1, Field 3 of PV1 Segment.
10.3	ROOM-BED	10;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: Components 2 and 3, Field 3 of PV1 Segment. VA data may contain Bldg., e.g.,ROOM-BED-BLDG.
10.4	ATTENDING DOCTOR	10;4	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Field 7 of PV1 Segment.
10.41	CONSULTING DOCTOR	10;20	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAR 12, 1999` HELP-PROMPT: `Answer must be 1-30 characters in length.`
10.5	HOSPITAL SERVICE	10;5	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>3!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-3 characters in length.` DESCRIPTION: Field 10 of PV1 Segment.
10.6	ADMIT DATE/TIME	10;6	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 14, 1997` DESCRIPTION: Field 44 of PV1 Segment.
10.7	DISCHARGE DATE/TIME	10;7	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 14, 1997` DESCRIPTION: Field 45 of PV1 Segment.
10.8	ACCOUNT STATUS	10;8	SET	**********************REQUIRED FIELD********************** 'A' FOR A; LAST EDITED: `NOV 14, 1997` DESCRIPTION: Field 41 of PV1 Segment
10.9	PRIOR PATIENT ACCOUNT NUMBER	10;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: Field 3 of MRG Segment. Reflects previous PATIENT ACCOUNT NUMBER after a change.
11	ALLERGY	11;0	Multiple #90355.111	90355.111
12	ADMIT DIAGNOSIS SHORT	12;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>60!($L(X)<1) X` LAST EDITED: `MAR 12, 1999` HELP-PROMPT: `Answer must be 1-60 characters in length.` DESCRIPTION: patient admit diagnosis short
20	SOLUTIONS	20;0	POINTER Multiple #90355.12	90355.12
21	ADDITIVE	21;0	POINTER Multiple #90355.121	90355.121
49.1	DRUG TRANS CODE	49;1	SET	'A' FOR ADD; 'E' FOR EDIT; 'D' FOR DELETE; LAST EDITED: `APR 01, 1999`
49.2	DRUG ID	49;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `MAY 13, 1999` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: This DRUG ID is the internal entry number of the drug file # 50. CROSS-REFERENCE: `90355.1^ADRUG` 1)= S ^BOP(90355.1,"ADRUG",$E(X,1,30),DA)="" 2)= K ^BOP(90355.1,"ADRUG",$E(X,1,30),DA) internal drug number from ^PSDRUG file 50
50.1	PZFM FORMULARY TRANS CODE	50;1	SET	'A' FOR ADD; 'C' FOR CHANGE; 'D' FOR DELETE; LAST EDITED: `MAR 30, 1999` HELP-PROMPT: DESCRIPTION: PYXIS INTERFACE HL7 ZFM MESSAGE.
50.11	PZFM STRENGTH UNITS	50;11	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-10 characters in length.`
50.12	PZFM VOLUME	50;12	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-8 characters in length.`
50.13	PZFM VOLUME UNITS	50;13	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>5!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-5 characters in length.`
50.14	PZFM ALTERNATE MED ID2	50;14	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-15 characters in length.`
50.15	PZFM THERAPEUTIC CLASS	50;15	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-10 characters in length.`
50.16	PZFM COST	50;16	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-8 characters in length.`
50.17	PZFM CHARGE	50;17	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-8 characters in length.`
50.2	PZFM MEDICATION ID	50;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-15 characters in length.`
50.3	PZFM GENERIC NAME	50;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-30 characters in length.`
50.4	PZFM MEDICATION CALSS	50;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1 character in length.`
50.5	PZFM ALTERNATE MED ID	50;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-15 characters in length.`
50.6	PZFM FACILITY CODE	50;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-15 characters in length.`
50.7	PZFM BRAND NAME	50;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-30 characters in length.`
50.8	PZFM DOSAGE FORM	50;8	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-10 characters in length.`
50.9	PZFM STRENGTH	50;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>12!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-12 characters in length.`
51.1	PZFM MANUFACTURER	51;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-15 characters in length.`
51.2	PZFM UNITS OF ISSUE TO MED	51;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-15 characters in length.`
51.3	PZFM ORDER UNIT FROM SUPPLIER	51;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-15 characters in length.`
51.4	PZFM DISPLAY OPTION	51;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1 character in length.`
51.5	PZFM PICK AREA	51;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-10 characters in length.`
51.6	PZFM BILLABLE	51;6	SET	'0' FOR NOT BILLABLE; '1' FOR BILLABLE; LAST EDITED: `MAR 29, 1999`
51.7	PZFM MEDICATION NAME	51;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: This medication name is for System 1000 compatiblity.
55.1	OZMI MASTER ITEM FILE ENTRY	55;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>49!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-49 characters in length.` DESCRIPTION: This the Omnicell/Pyxis System drug master file HL7 message.
55.11	OZMI UNIT OF ISSUE	55;11	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-4 characters in length.`
55.12	OZMI CONV STOCK TO ISSUE UNIT	55;12	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-6 characters in length.`
55.13	OZMI NORMAL REORDER SOURCE	55;13	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>16!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-16 characters in length.`
55.14	OZMI NORMAL REORDER BIN LOC	55;14	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: This is the noraml re-order bin location of part # for non-stock.
55.15	OMFE RECORD LEVEL EVENT CODE	55;15	SET	'A' FOR ADD; 'C' FOR CHANGE; 'D' FOR DELETE; LAST EDITED: `MAR 30, 1999`
55.16	OZFO NDC	55;16	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `OCT 08, 2002` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: NDC # FROM PSDRUG
55.17	OZFO NDC NAME	55;17	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `OCT 08, 2002` HELP-PROMPT: `Answer must be 1-20 characters in length.`
55.2	OZMI LOCATION	55;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: This is the Omnicell/Pyxis Supplier name, or '*' for all.
55.3	OZMI CHARGE ID	55;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>16!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-16 characters in length.`
55.4	OZMI BRAND NAME OF DRUG	55;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>32!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-32 characters in length.`
55.5	OZMI PAR LEVEL	55;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-6 characters in length.`
55.6	OZMI REORDER POINT	55;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-6 characters in length.`
55.7	OZMI CRITICALLY LOW LEVEL	55;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-6 characters in length.`
55.8	OZMI QUANTITY ON HAND	55;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-4 characters in length.`
55.9	OZMI UNIT OF RE-STOCK	55;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-4 characters in length.`
56.1	OZMI CRITICAL LOW REORD SOURCE	56;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>16!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-16 characters in length.`
56.11	OZMI DEA SCHEDULE	56;11	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1 character in length.` DESCRIPTION: The DEA schedule # 0,1-5 is OTC, 6 is NON-SCHEDULED PRESCRIPTION.
56.12	OZMI MANUFACTURER ID/NAME	56;12	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>33!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-33 characters in length.`
56.2	OZMI CRITI LOW REORD BIN LOC	56;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-20 characters in length.`
56.3	OZMI BILLABLE	56;3	SET	'B' FOR BILLABLE; 'N' FOR NON-BILLABLE; LAST EDITED: `MAR 29, 1999`
56.4	OZMI ITEM COST	56;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: This is the item cost per unit of issue.
56.5	OZMI ITEM PRICE	56;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: This is the item price per unit issue.
56.6	OZMI UNIT DOSE STRENGTH	56;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>12!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-12 characters in length.`
56.7	OZMI UNIT DOSE VOLUME	56;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>14!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-14 characters in length.`
56.8	OZMI TOTAL VOLUME	56;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-11 characters in length.`
56.9	OZMI UNIT DOSE DRUG FORM	56;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<1) X` LAST EDITED: `MAR 29, 1999` HELP-PROMPT: `Answer must be 1-3 characters in length.`
99	SEND OR FILE	99;1	SET	'0' FOR SEND; '1' FOR FILE; LAST EDITED: `SEP 01, 1998` HELP-PROMPT: `The entry is either ready to be sent, or if received, ready to file.` DESCRIPTION: `This field is for the background processing. Entries come into this file to be transmitted (SEND flag) or because they have been received and need to be file (File flag). The processes that SEND and FILE use this field` to determine what to do.
99.1	MED USAGE MESSAGE STATUS	99;2	SET	'0' FOR Ready to process; '1' FOR Incomplete receipt; '9' FOR Processed; LAST EDITED: `OCT 22, 1998` HELP-PROMPT: DESCRIPTION: `This field is for post processing of transactions received from the Omnicell/Pyxis system. When the data is being received, the value is 1, "incomplete receipt". When the data is completely received, the record is marked` "0", "ready to process". When it has been processed, it is marked 9, "processed". CROSS-REFERENCE: `90355.1^AC` 1)= S ^BOP(90355.1,"AC",$E(X,1,30),DA)="" 2)= K ^BOP(90355.1,"AC",$E(X,1,30),DA)
100	DATA	DATA;0	WORD-PROCESSING #90355.11

Customize PDF page

Package: IHS Omnicell Pyxis Interface

Global: ^BOP(90355.1

Information

Description

Directly Accessed By Routines, Total: 16

Accessed By FileMan Db Calls, Total: 4

Pointed To By FileMan Files, Total: 2

Pointer To FileMan Files, Total: 3

Fields, Total: 141