Sub-Field: 50.0212

Parent File	Name	Number	Package
DRUG(#50)	ATC CANISTER	50.0212	Pharmacy Data Management

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	WARD GROUP FOR ATC CANISTER	0;1	POINTER TO WARD GROUP FILE (#57.5)	WARD GROUP(#57.5) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),""^"",2)=""P""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `NOV 11, 1990` HELP-PROMPT: `Enter a Pharmacy ward group for which pick lists will be sent to the ATC.` DESCRIPTION: `This is a ward group that has pick lists for this drug to be sent to the ATC dispensing machine.` SCREEN: `S DIC("S")="I $P(^(0),""^"",2)=""P"""` EXPLANATION: `ONLY PHARMACY WARD GROUPS ARE SELECTABLE.` GROUP: `PSJU` CROSS-REFERENCE: `50.0212^B` `1)= S ^PSDRUG(DA(1),212,"B",$E(X,1,30),DA)=""` `2)= K ^PSDRUG(DA(1),212,"B",$E(X,1,30),DA)`
1	ATC CANISTER	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>800)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `MAY 19, 2000` HELP-PROMPT: `Type a number between 1 and 800, 0 Decimal Digits. Use numbers 213-500 only if your site is using the ATC Profile, and numbers 213-800 if your site is using either the FDS 330 or the FDS 520 machine.` DESCRIPTION: `This should be the number of the canister from the Baxter ATC dispensing machine that contains this drug. If no number is entered here, the Unit Dose package will assume that this drug is NOT currently in the ATC.` GROUP: `PSJU` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `50.0212^AC^MUMPS` `1)= S ^PSDRUG(DA(1),212,"AC",+^PSDRUG(DA(1),212,DA,0),X,DA)=""` `2)= K ^PSDRUG(DA(1),212,"AC",+^PSDRUG(DA(1),212,DA,0),X,DA)` `Sets ATC Canister sub-field ATC Canister (1) cross-ref. In the form of: ^PSDRUG(DA(1),212,"AC",+^PSDRUG(DA(1),212,DA,0),X,DA)`

.01

WARD GROUP FOR ATC CANISTER

0;1

POINTER TO WARD GROUP FILE (#57.5)

WARD GROUP(#57.5)

INPUT TRANSFORM: S DIC("S")="I $P(^(0),""^"",2)=""P""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: NOV 11, 1990
HELP-PROMPT: Enter a Pharmacy ward group for which pick lists will be sent to the ATC.
DESCRIPTION:
This is a ward group that has pick lists for this drug to be sent to the ATC dispensing machine.
SCREEN: S DIC("S")="I $P(^(0),""^"",2)=""P"""
EXPLANATION: ONLY PHARMACY WARD GROUPS ARE SELECTABLE.
GROUP: PSJU
CROSS-REFERENCE: 50.0212^B
1)= S ^PSDRUG(DA(1),212,"B",$E(X,1,30),DA)=""
2)= K ^PSDRUG(DA(1),212,"B",$E(X,1,30),DA)

ATC CANISTER

0;2

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>800)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 19, 2000
HELP-PROMPT: Type a number between 1 and 800, 0 Decimal Digits. Use numbers 213-500 only if your site is using the ATC Profile, and numbers 213-800 if your site is using either the FDS 330 or the FDS 520 machine.
DESCRIPTION:
This should be the number of the canister from the Baxter ATC dispensing machine that contains this drug. If no number is entered here, the Unit Dose package will assume that this drug is NOT currently in the ATC.
GROUP: PSJU
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 50.0212^AC^MUMPS
1)= S ^PSDRUG(DA(1),212,"AC",+^PSDRUG(DA(1),212,DA,0),X,DA)=""
2)= K ^PSDRUG(DA(1),212,"AC",+^PSDRUG(DA(1),212,DA,0),X,DA)
Sets ATC Canister sub-field ATC Canister (1) cross-ref. In the form of: ^PSDRUG(DA(1),212,"AC",+^PSDRUG(DA(1),212,DA,0),X,DA)

Customize PDF page

Package: Pharmacy Data Management

DRUG(#50)-->50.0212

Sub-Field: 50.0212

Information

Details