Global: ^PS(52.51

FileMan FileNo	FileMan Filename	Package
52.51	PHARMACY EXTERNAL INTERFACE	Outpatient Pharmacy

Directly Accessed By Routines, Total: 10

Package	Total	Routines
Outpatient Pharmacy	9	PSOEXBCH PSOEXREF PSOEXRST PSOHLDIS PSOHLDS PSOHLSG PSOHLSG4 PSORELDT PSOUTLA1
IHS Electronic Health Record	1	BEHORXRT

Accessed By FileMan Db Calls, Total: 6

Package	Total	Routines
Outpatient Pharmacy	5	PSOHLDS PSOHLSG PSOHLSG4 PSONDCV PSORELDT
IHS Electronic Health Record	1	BEHORXRT

Pointer To FileMan Files, Total: 4

Package	Total	FileMan Files
Outpatient Pharmacy	2	OUTPATIENT SITE(#59)[15] PRESCRIPTION(#52)[.01]
Kernel	1	NEW PERSON(#200)[4]
Registration	1	VA PATIENT(#2)[2]

Fields, Total: 15


This field is the pointer to the Prescription file.
This field is the pointer to the Patient file.
This is the Date/Time of the transmission to the External Interface.
This is the pointer to File 200.
This indicates whether the label was a Reprint.
Stores external interface site parameter.
This is the name of the External Interface device.
This indicates whether the Fill was a regular or partial fill.
This indicates which fill was being printed.
This is the Message Server ID of the Transmission.
This is the Client Server ID of the Transmission.
This is the Error Code for an Unsuccessful Transmission.
These are Comments for a Transmission.
This is the Status of the Transmission.
This is the Division where the label information was submitted.

Field #	Name	Loc	Type	Details
.01	RX #	0;1	POINTER TO PRESCRIPTION FILE (#52)	**********************REQUIRED FIELD********************** PRESCRIPTION(#52) LAST EDITED: `FEB 06, 1997` DESCRIPTION: This field is the pointer to the Prescription file. CROSS-REFERENCE: `52.51^B` 1)= S ^PS(52.51,"B",$E(X,1,30),DA)="" 2)= K ^PS(52.51,"B",$E(X,1,30),DA)
2	PATIENT	0;2	POINTER TO VA PATIENT FILE (#2)	**********************REQUIRED FIELD********************** VA PATIENT(#2) LAST EDITED: `FEB 06, 1997` DESCRIPTION: This field is the pointer to the Patient file.
3	TRANSMISSION DATE/TIME	0;3	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 07, 1997` DESCRIPTION: This is the Date/Time of the transmission to the External Interface. CROSS-REFERENCE: `52.51^AS^MUMPS` 1)= D SDATE^PSOEXREF 2)= D KDATE^PSOEXREF This cross reference is used to update the AS batch cross reference. It sets the global ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="". CROSS-REFERENCE: `52.51^AC1` 1)= S ^PS(52.51,"AC1",$E(X,1,30),DA)="" 2)= K ^PS(52.51,"AC1",$E(X,1,30),DA)
4	PERSON	0;4	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `MAR 07, 1997` DESCRIPTION: This is the pointer to File 200. CROSS-REFERENCE: `52.51^AS2^MUMPS` 1)= D SPER^PSOEXREF 2)= D KPER^PSOEXREF This is used to keep the AS batch cross reference up to date. It sets the global ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="".
5	REPRINT	0;5	SET	'1' FOR REPRINT; LAST EDITED: `FEB 06, 1997` DESCRIPTION: This indicates whether the label was a Reprint.
6	SITE PARAMETER	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `FEB 13, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Stores external interface site parameter.
7	DISPENSE DEVICE	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `FEB 13, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: This is the name of the External Interface device.
8	FILL TYPE	0;8	SET	'F' FOR REGULAR FILL; 'P' FOR PARTIAL FILL; LAST EDITED: `FEB 06, 1997` DESCRIPTION: This indicates whether the Fill was a regular or partial fill.
9	FILL NUMBER	0;9	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `FEB 06, 1997` HELP-PROMPT: `Type a Number between 0 and 99, 0 Decimal Digits` DESCRIPTION: This indicates which fill was being printed.
10	MESSAGE SERVER ID	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAR 07, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: This is the Message Server ID of the Transmission. CROSS-REFERENCE: `52.51^AM^MUMPS` 1)= D SMES^PSOEXREF 2)= D KMES^PSOEXREF This maintains the Message Server ID/Division cross reference. It sets the global ^PS(52.51,"AM",Message Server ID,Division,DA)="".
11	CLIENT SERVER ID	1;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `FEB 13, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: This is the Client Server ID of the Transmission.
12	ERROR CODE	1;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `FEB 06, 1997` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: This is the Error Code for an Unsuccessful Transmission.
13	COMMENTS	1;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>50!($L(X)<1) X` LAST EDITED: `FEB 06, 1997` HELP-PROMPT: `Answer must be 1-50 characters in length.` DESCRIPTION: These are Comments for a Transmission.
14	TRANSMISSION STATUS	0;10	SET	'1' FOR PROCESSING; '2' FOR PROCESSED; '3' FOR PROCESS FAILED; '4' FOR RESUBMISSION; LAST EDITED: `FEB 10, 1997` DESCRIPTION: This is the Status of the Transmission.
15	DIVISION	0;11	POINTER TO OUTPATIENT SITE FILE (#59)	OUTPATIENT SITE(#59) LAST EDITED: `MAR 07, 1997` DESCRIPTION: This is the Division where the label information was submitted. CROSS-REFERENCE: `52.51^AS1^MUMPS` 1)= D SDIV^PSOEXREF 2)= D KDIV^PSOEXREF This is used to keep the AS batch cross reference up to date. It sets the global ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="". CROSS-REFERENCE: `52.51^AM1^MUMPS` 1)= D SDIVM^PSOEXREF 2)= D KDIVM^PSOEXREF This maintains the Message Server ID/Division cross reference. It sets the global ^PS(52.51,"AM",Message Server ID,Division,DA)="".

Customize PDF page

Package: Outpatient Pharmacy

Global: ^PS(52.51

Information

Description

Directly Accessed By Routines, Total: 10

Accessed By FileMan Db Calls, Total: 6

Pointer To FileMan Files, Total: 4

Fields, Total: 15