Global: ^PSI(58.16

FileMan FileNo	FileMan Filename	Package
58.16	AOU INVENTORY TYPE	Auto Replenishment Ward Stock

Directly Accessed By Routines, Total: 17

Package	Total	Routines
Auto Replenishment Ward Stock	10	PSGWAIO ^PSI(58.16 PSGWADE1 PSGWADP1 PSGWLSI1 PSGWPIG ^PS(59.4 PSGWPAW1 PSGWPI1 PSGWPSI1
Controlled Substances	7	PSDBALI PSDGPR PSDLSTK1 PSDOPTI PSDPLOG1 PSDPSTK1 PSDRLOG1

Package	Total	Routines
Controlled Substances	1	PSDOPTI

Package	Total	FileMan Files
Auto Replenishment Ward Stock	3	PHARMACY AOU STOCK(#58.1)[#58.13(.01)] PHARMACY AOU INVENTORY(#58.19)[#58.25(.01)] AOU INVENTORY GROUP(#58.2)[#58.22(.01), #58.291(.01)]
Drug Accountability	1	DRUG ACCOUNTABILITY STATS(#58.8)[#58.800116(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` HELP-PROMPT: `Answer must be 3-30 characters in length` DESCRIPTION: `This contains the name of an inventory type, i.e. injections, external, internal, oral liquid, or oral solid. This will be used to group items in each Area of Use.` DELETE TEST: `1,0)= I $P(^PSI(58.16,DA,0),"^",1)="ON-DEMAND" W !,"This entry cannot be deleted, it is a requirement of the software."` CROSS-REFERENCE: `58.16^B` `1)= S ^PSI(58.16,"B",$E(X,1,30),DA)=""` `2)= K ^PSI(58.16,"B",$E(X,1,30),DA)`
1	TYPE DESCRIPTION	1;0	WORD-PROCESSING #58.18	DESCRIPTION: `This contains information that describes this inventory type. This is purely for documentation of the scheme you have adopted at your site.` LAST EDITED: `JUN 19, 1984` DESCRIPTION: `This contains information that describes this inventory type. This is purely for documentation of the scheme you have adopted at your site.`

NAME

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
HELP-PROMPT: Answer must be 3-30 characters in length
DESCRIPTION:
This contains the name of an inventory type, i.e. injections, external, internal, oral liquid, or oral solid. This will be used to group items in each Area of Use.
DELETE TEST: 1,0)= I $P(^PSI(58.16,DA,0),"^",1)="ON-DEMAND" W !,"This entry cannot be deleted, it is a requirement of the software."
CROSS-REFERENCE: 58.16^B
1)= S ^PSI(58.16,"B",$E(X,1,30),DA)=""
2)= K ^PSI(58.16,"B",$E(X,1,30),DA)

TYPE DESCRIPTION

1;0

WORD-PROCESSING #58.18

DESCRIPTION:
This contains information that describes this inventory type. This is purely for documentation of the scheme you have adopted at your site.
LAST EDITED: JUN 19, 1984
DESCRIPTION:
This contains information that describes this inventory type. This is purely for documentation of the scheme you have adopted at your site.

Name	Line Occurrences (* Changed, ! Killed)
^PSI(58.16 - [#58.16]	.01DEL1+1, .01(XREF 1S), .01(XREF 1K)

Name	Field # of Occurrence
>> DA	.01DEL1+1, .01(XREF 1S), .01(XREF 1K)
X	.01+1!, .01(XREF 1S), .01(XREF 1K)