Sub-Field: 445.122

Parent File	Name	Number	Package
445.01	SUBSTITUTE ITEM(S)	445.122	IFCAP

Parent File

Name

Number

Package

SUBSTITUTE ITEM(S)

445.122

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SUBSTITUTE ITEM(S)	0;1	POINTER TO ITEM MASTER FILE (#441)	ITEM MASTER(#441) INPUT TRANSFORM: `S DINUM=X I DA(1)=X!('$D(^PRCP(445,DA(2),1,X,0))) K DINUM,X` LAST EDITED: `APR 01, 1993` DESCRIPTION: `This multiple field is used to store the items from within the warehouse inventory point which can be used to substitute for out of stock items when posting issue book requests.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `445.122^B` `1)= S ^PRCP(445,DA(2),1,DA(1),4,"B",$E(X,1,30),DA)=""` `2)= K ^PRCP(445,DA(2),1,DA(1),4,"B",$E(X,1,30),DA)`

SUBSTITUTE ITEM(S)

0;1

POINTER TO ITEM MASTER FILE (#441)

INPUT TRANSFORM: S DINUM=X I DA(1)=X!('$D(^PRCP(445,DA(2),1,X,0))) K DINUM,X
LAST EDITED: APR 01, 1993
DESCRIPTION:
This multiple field is used to store the items from within the warehouse inventory point which can be used to substitute for out of stock items when posting issue book requests.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 445.122^B
1)= S ^PRCP(445,DA(2),1,DA(1),4,"B",$E(X,1,30),DA)=""
2)= K ^PRCP(445,DA(2),1,DA(1),4,"B",$E(X,1,30),DA)