Select the objects that you wish to see in the downloaded PDF
S DINUM=X
AUG 31, 1993
Enter items which make up this case cart or instrument kit.
This is the disposable item which makes up the case cart or instrument kit.
This field is internally set by the assembly of a case cart or instrument kit routines.
S DIC("S")="I $D(^PRCP(445,D0,1,+Y,0)),$D(^PRC(441,+Y,0))",PRCPSET="I 1"
Item must be a purchaseable item that is in your inventory file.
XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
445.121^B
1)= S ^PRCP(445,DA(2),1,DA(1),8,"B",$E(X,1,30),DA)=""
2)= K ^PRCP(445,DA(2),1,DA(1),8,"B",$E(X,1,30),DA)
K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
Enter the quantity needed to assemble one case cart or instrument kit.
This is the quantity of the disposable item used to assemble the case cart or instrument kit.