Global: ^PSI(58.5

Information

FileMan FileNo	FileMan Filename	Package
58.5	AR/WS STATS FILE	Auto Replenishment Ward Stock

This file contains the data necessary to generate the AMIS statistics for AR/WS. This data is accumulated automatically by a queued nightly job. *** NOTE *** There are two cross-references that exist under this file that are created in the Pharmacy AOU Stock file (#58.1). The xref names are "AMIS" and "AMISERR", if you create any local xrefs for this file (#58.5) DO NOT use these names as it will overwrite the existing xrefs.

Package	Total	Routines
Auto Replenishment Ward Stock	20	PSGWRI PSGWUAS ^PSI(58.5 AMIS INPATIENT SITE PSGWAP PSGWAR PSGWAR1 PSGWBO PSGWCAD PSGWCL PSGWCLP PSGWEDI PSGWODRN PSGWOND PSGWONDM PSGWRA PSGWUTL PSGWXREF RECALCULATE AMIS
Drug Accountability	1	PSARWS
Pharmacy Benefits Management	1	PSUAR1

Package	Total	Routines
Auto Replenishment Ward Stock	2	PSGWAP PSGWCAD

Package	Total	FileMan Files
Auto Replenishment Ward Stock	1	INPATIENT SITE(#59.4)[#58.501(.01)]
Pharmacy Data Management	1	DRUG(#50)[#58.52(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DATE	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X` LAST EDITED: `MAR 02, 1990` DESCRIPTION: This contains the date for which AMIS data is collected. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `58.5^B` 1)= S ^PSI(58.5,"B",$E(X,1,30),DA)="" 2)= K ^PSI(58.5,"B",$E(X,1,30),DA)
1	INPATIENT SITE	S;0	POINTER Multiple #58.501	58.501 SCREEN: `S DIC("S")="I $P(^(0),""^"",26)"` EXPLANATION: `Enter only sites that are selectable for AR/WS.`

DATE

0;1

DATE

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

DESCRIPTION:

This contains the date for which AMIS data is collected.

CROSS-REFERENCE: 58.5^B

1)= S ^PSI(58.5,"B",$E(X,1,30),DA)=""

2)= K ^PSI(58.5,"B",$E(X,1,30),DA)

INPATIENT SITE

S;0

POINTER Multiple #58.501

Name	Field # of Occurrence
^%DT	.01+1

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