STANDARD DATA DICTIONARY #445 -- GENERIC INVENTORY FILE 6/27/25 PAGE 1 STORED IN ^PRCP(445, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.1) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file contains descriptive and inventory information for any entity that wants to maintain a perpetual inventory, automate their item distribution function, and automatically generate stock replenishment orders based on inventory needs. There are three types of inventory points that can be on this file: Warehouses, Primary Distribution Points (locations that are allowed to order directly from supply), or Secondary Distribution Points (locations that must order through a Primary Distribution Point). FILE SCREEN (SCR-node) : I $D(DIS(0))!($G(PRCPPRIV)) DD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ IDENTIFIED BY: "WRITE": W ?35,@("$P($P($C(59)_$S($D(^DD(445,.7,0)):$P(^(0),U,3),1:0)_$E("_DIC_"Y,0),0),$C(59)_$P(^(0),U,3)_"":"",2),$C(59),1 )") POINTED TO BY: *PRIMARY INVENTORY POINT field (#11) of the DRUG ACCOUNTABILITY STATS File (#58.8) PRIMARY INVENTORY POINT(S) field (#.01) of the PRIMARY INVENTORY POINT(S) sub-field (#58.8445) of the DRUG ACCOUNTABILITY STATS File (#58.8) INVENTORY DISTRIBUTION POINT field (#4) of the CONTROL POINT ACTIVITY File (#410) INVENTORY/DISTRIBUTION POINT field (#3) of the REPETITIVE ITEM LIST File (#410.3) ** INVENTORY DISTRIBUTION POINT field (#17) of the CONTROL POINT NAME sub-field (#420.01) of the FUND CONTROL POINT File (#420) INVENTORY POINT field (#.01) of the INVENTORY POINT sub-field (#420.07) of the CONTROL POINT NAME sub-field (#420.01) of the FUND CONTROL POINT File (#420) SET/PACK ASSEMBLED BY field (#13) of the ITEM MASTER File (#441) INVENTORY/DISTRIBUTION POINT field (#11) of the 2237 REFERENCE NUMBER sub-field (#442.14) of the PROCUREMENT & ACCOUNTING TRANSACTIONS File (#442) LINE INVENTORY POINT field (#.01) of the LINE INVENTORY POINT sub-field (#442.147) of the ITEM sub-field (#442.01) of the PROCUREMENT & ACCOUNTING TRANSACTIONS File (#442) INVENTORY/DISTRIBUTION POINT field (#11) of the REQUEST WORKSHEET File (#443) *PARAMETERS CAN BE EDITED BY field (#13) of the GENERIC INVENTORY File (#445) PRE-CONVERSION STOCKED BY field (#19.7) of the GENERIC INVENTORY File (#445) MANDATORY OR REQUESTED SOURCE field (#.4) of the INVENTORY ITEM sub-field (#445.01) of the GENERIC INVENTORY File (#445) DISTRIBUTION POINT field (#.01) of the DISTRIBUTION POINT sub-field (#445.03) of the GENERIC INVENTORY File (#445) PROCUREMENT SOURCE field (#.01) of the PROCUREMENT SOURCE sub-field (#445.07) of the INVENTORY ITEM sub-field (#445.01) of the GENERIC INVENTORY File (#445) INVENTORY POINT field (#.01) of the INVENTORY BALANCES File (#445.1) INVENTORY POINT field (#.01) of the INVENTORY TRANSACTION File (#445.2) OTHER INVENTORY POINT AFFECTED field (#14) of the INVENTORY TRANSACTION File (#445.2) PRIMARY INVENTORY POINT field (#1) of the INTERNAL DISTRIBUTION ORDER/ADJ. File (#445.3) SECONDARY INVENTORY POINT field (#2) of the INTERNAL DISTRIBUTION ORDER/ADJ. File (#445.3) INVENTORY/DISTRIBUTION POINT field (#1) of the STORAGE LOCATION File (#445.4) INVENTORY/DISTRIBUTION POINT field (#1) of the GROUP CATEGORY File (#445.6) INVENTORY POINT field (#2) of the CASE CARTS File (#445.7) INVENTORY POINT field (#2) of the INSTRUMENT KITS File (#445.8) DISTRIBUTED TO field (#.01) of the DISTRIBUTION/USAGE HISTORY File (#446) DISTRIBUTED FROM field (#2) of the DISTRIBUTION/USAGE HISTORY File (#446) FROM INVENTORY POINT field (#4) of the INVENTORY DISTRIBUTED PATIENT SUPPLIES File (#446.1) INVENTORY POINT field (#29) of the RECORD OF PROS APPLIANCE/REPAIR File (#660) INVENTORY POINT field (#11) of the PROS RETURNED/CONDEMNED File (#660.1) INVENTORY POINT field (#11) of the PROSTHETICS RE-ISSUE ITEM File (#660.2) INVENTORY POINT field (#18) of the ITEM sub-field (#664.16) of the PROSTHETIC 2529-3 File (#664.1) INVENTORY POINT field (#4) of the MATERIALS USED sub-field (#664.22) of the PROSTHETIC WORK ORDER File (#664.2) CROSS REFERENCED BY: DISTRIBUTION POINT(AB), TYPE OF INVENTORY POINT(AC), INVENTORY USER(AD), ITEM NO.(AE), ABBREVIATED NAME(AF), KEEP PERPETUAL INVENTORY?(AG), TYPE OF INVENTORY POINT(AH), SS PROVIDER(AH), ITEM NO.(AH), NORMAL STOCK LEVEL (U OF I)(AH), SS PROVIDER(AI), SPECIAL INVENTORY POINT TYPE(ASPEC), INVENTORY POINT(B), INVENTORY POINT(C), ABBREVIATED NAME(CAB) INDEXED BY: ON-DEMAND USER (AJ) 445,.01 INVENTORY POINT 0;1 FREE TEXT (Required) INPUT TRANSFORM: D START^PRCIREC1 LAST EDITED: FEB 14, 2008 HELP-PROMPT: Name of any Inventory/Distribution Point (30 char.max.) Can be the Warehouse, a Primary (can order from supply), or a Secondary (stocked by a Primary). (Preceded by Site No. and a dash [-] internally) DESCRIPTION: This is the name of a warehouse, primary, or secondary inventory point. The name of the inventory point must be preceded with the station number and must be an unique name not already used. DELETE TEST: 1,0)= D DELETE^PRCIREC1 2,0)= D KILL^PRCPUINV(DA) I 1 NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445^B 1)= S ^PRCP(445,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,"B",$E(X,1,30),DA) CROSS-REFERENCE: 445^C^MUMPS 1)= S ^PRCP(445,"C",$P(X,"-",2,99),DA)="" 2)= K ^PRCP(445,"C",$P(X,"-",2,99),DA) This cross reference is used to store the name of the inventory point without including the station number (from the first piece of "-"). 445,.5 KEEP PERPETUAL INVENTORY? 0;2 SET (Required) 'Y' FOR YES; 'N' FOR NO; LAST EDITED: OCT 10, 1989 HELP-PROMPT: Answer 'N' (NO) if this entity does NOT wish to use the Generic Inventory System. This file can be used just as a list of items repetitively used by the entity, for generating an item catalog. DESCRIPTION: If KEEP PERPETUAL INVENTORY? is set to yes, the inventory point will track item quantities, usage, and receipts. CROSS-REFERENCE: 445^AG^MUMPS 1)= S:X="N" $P(^PRCP(445,DA,0),U,6)="N" 2)= Q This cross reference is used to set the field KEEP DETAILED TRX. HISTORY? (#.6) to NO if the field KEEP PERPETUAL INVENTORY? (#.5) is set to NO. 445,.6 KEEP DETAILED TRX. HISTORY? 0;6 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: DEC 12, 1986 HELP-PROMPT: If set to 'Y', a detailed transaction history will be kept for any transaction that affects the inventory quantity on hand for this inventory point. DESCRIPTION: This field indicates whether the inventory will keep a detailed tracking history of its stocked items. If the field is set to yes, the item history will be tracked in the TRANSACTION REGISTER file 445.2. 445,.7 TYPE OF INVENTORY POINT 0;3 SET (Required) 'W' FOR SUPPLY WAREHOUSE; 'P' FOR PRIMARY; 'S' FOR SECONDARY; INPUT TRANSFORM: I X="W" D TYPE^PRCPUINV LAST EDITED: MAY 03, 2000 HELP-PROMPT: Warehouse-Main storage and distribution point for site. Primary Dist.Point-can order directly from Supply. Secondary Dist.Point-cannot order from supply, but is stocked by a Primary Dist.Point DESCRIPTION: This field indicates whether the inventory point is a warehouse, a primary, or a secondary type inventory point. For each station number, there can only be one warehouse type inventory point. SCREEN: S DIC("S")="Q:$D(PRCP(""I"")) I Y=""W""!(Y=""P"")" EXPLANATION: Supply Service can only enter Warehouses or Primary Inventory/Distribution Points. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445^AC 1)= S ^PRCP(445,"AC",$E(X,1,30),DA)="" 2)= K ^PRCP(445,"AC",$E(X,1,30),DA) This cross reference sorts the inventory points by type. The node prcp(445,"ac",TYPE,da) is set. CROSS-REFERENCE: 445^AH^MUMPS 1)= N ITEM,SS Q:X'="S" S SS=$P($G(^PRCP(445,DA,5)),"^",1) Q:SS']"" S ITEM=0 F S ITEM=$O(^PRCP(44 5,DA,1,ITEM)) Q:'+ITEM I $P($G(^PRCP(445,DA,1,ITEM,0)),"^",9)>0 S ^PRCP(445,"AH",ITEM,SS,DA)="" 2)= N SS,ITEM S SS=$P($G(^PRCP(445,DA,5)),"^",1) Q:'SS S ITEM=0 F S ITEM=$O(^PRCP(445,DA,1,ITEM)) Q:'+ITEM K ^PRCP(445,"AH",ITEM,SS,DA) This cross reference lists all supply station items by supply station, allowing GIP to quickly access where items are kept and how many places the item is stored. 445,.8 ABBREVIATED NAME 0;5 FREE TEXT (Required) INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>6!($L(X)<1)!'(X?1U.E) X I $D(X) K:$O(^PRCP(445,"AF",+^PRCP(44 5,DA,0),X,0)) X LAST EDITED: OCT 31, 2013 HELP-PROMPT: *MUST BE UNIQUE* ANSWER MUST BE 1-6 CHARACTERS IN LENGTH. (First character must be an upper-case alphabetic). This field is used to Identify the Requesting Location for Nonrecurring Item Requests. DESCRIPTION: This is the abbreviated name of the inventory point. The abbreviated name can be used when selecting an inventory point. The name must be unique for the inventory point (two inventory points cannot have the same abbreviated name). NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445^AF^MUMPS 1)= S ^PRCP(445,"AF",+^PRCP(445,DA,0),$E(X,1,30),DA)="" 2)= K ^PRCP(445,"AF",+^PRCP(445,DA,0),$E(X,1,30),DA) This cross reference is used to store the abbreviated name (in X) by the station number (+^PRCP(445,DA,0)). CROSS-REFERENCE: 445^CAB 1)= S ^PRCP(445,"CAB",$E(X,1,30),DA)="" 2)= K ^PRCP(445,"CAB",$E(X,1,30),DA) This index is to allow the Inventory Point lookup to search index 'CAB' for abbreviated name only (no attached site). 445,.9 COST CENTER 0;7 POINTER TO COST CENTER FILE (#420.1) LAST EDITED: OCT 27, 1986 HELP-PROMPT: This field is required on Primary Inventory/Distribution Points for doing Stock Replenishment. It is also used to create the Distribution Report by Cost Center for Accounting. DESCRIPTION: This is the cost center for the inventory point. 445,1 INVENTORY ITEM 1;0 POINTER Multiple #445.01 LAST EDITED: AUG 09, 1991 DESCRIPTION: This multiple field stores the items which are stored in the inventory point. The fields under the item multiple store the quantity on-hand, quantity due-out, quantity due-in, reorder points and levels, receipt and usage history, etc. 445.01,.01 ITEM NO. 0;1 POINTER TO ITEM MASTER FILE (#441) (Multiply asked) INPUT TRANSFORM: S DINUM=X LAST EDITED: MAY 03, 2000 HELP-PROMPT: Item must be on the Supply Item Master File. Enter either Item Number, Short Description, National Stock No., National Drug Code or Vendor Stock No. DESCRIPTION: This field stores the item master number of the item stored in the inventory point. DELETE TEST: .01,0)= W !!," YOU CANNOT DELETE AN ITEM FROM FILEMAN." I 1 NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445.01^B 1)= S ^PRCP(445,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(1),1,"B",$E(X,1,30),DA) CROSS-REFERENCE: 445^AH^MUMPS 1)= N SS Q:$P(^PRCP(445,DA(1),0),"^",3)'="S" S SS=$P($G(^PRCP(445,DA(1),5)),"^",1) Q:'SS I $P($G( ^PRCP(DA(1),1,DA,0)),"^",9)>0 S ^PRCP(445,"AH",DA,SS,DA(1))="" 2)= N SS S SS=$P($G(^PRCP(445,DA(1),5)),"^",1) Q:'SS K ^PRCP(445,"AH",DA,SS,DA(1)) This cross reference lists all supply station items by supply station, allowing GIP to quickly access where items are kept and how many places the item is stored. CROSS-REFERENCE:445^AE 1)= S ^PRCP(445,"AE",$E(X,1,30),DA(1),DA)="" 2)= K ^PRCP(445,"AE",$E(X,1,30),DA(1),DA) This cross reference sorts all inventory items by inventory point. The node prcp(445,"ae",ITEMDA,INVPT,ITEMDA) is set where ITEMDA is the item master number and INVPT is the internal inventory point number. 445.01,.4 MANDATORY OR REQUESTED SOURCE 0;12VARIABLE POINTER FILE ORDER PREFIX LAYGO MESSAGE 445 3 I n IN-HOUSE SOURCE 440 1 V n SUPPLY WHSE.OR OUTSIDE VENDOR SCREEN ON FILE 445: S DIC("S")="D SCREEN^PRCPUMAN(DA(1),DA,1)",PRCPPRIV=1 SCREEN EXPLANATION: Must be a source entered on your file as one of the Procurement Sources for this item. SCREEN ON FILE 440: S DIC("S")="D SCREEN^PRCPUMAN(DA(1),DA,1)" SCREEN EXPLANATION: Must be a source entered on your file as one of the Procurement Sources for this item. INPUT TRANSFORM:S Z=$P(^PRCP(445,DA(1),0),U,3),DIC("V")=$S(Z="S":"I $P(Y(0),U,1)=445",1:"I $P(Y(0),U,1)=440") K Z D SCREEN^PRCPUMAN(DA(1),DA,1) LAST EDITED: MAR 13, 1989 HELP-PROMPT: For a Primary Inventory Point, select either the Warehouse (posted stock) or an outside Vendor that supplies this item. For Secondary, select the Primary that replenishes your stock. DESCRIPTION: This is the mandatory or requested source for ordering the item. This source must be used, if entered. If the source is not entered, the inventory point is free to select all available procurement sources. EXECUTABLE HELP:D HELP^PRCPUMAN(DA(1),DA,1) NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE:445.01^AC 1)= S ^PRCP(445,DA(1),1,"AC",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(1),1,"AC",$E(X,1,30),DA) This cross reference sorts the mandatory or requested source by inventory point. The node prcp(445,INVPT,1,"ac",MANSRCE,ITEMDA) is set where INVPT is the internal inventory point number, MANSRCE is the mandatory or requested source, and ITEMDA is the item master number. 445.01,.5 GROUP CATEGORY CODE 0;21 POINTER TO GROUP CATEGORY FILE (#445.6) INPUT TRANSFORM:S PRCPPRIV=1,DIC("S")="I $P(^(0),U,2)=$S($G(DA(1)):DA(1),1:$G(PRCP(""I"")))" D ^DIC K DIC S DIC=DIE ,X=+Y K:Y<0 X LAST EDITED: MAR 23, 1987 HELP-PROMPT: Enter a 4-digit group category code. New Group Categories can be added. If a new one is added, the description must also be entered. DESCRIPTION: This is the group category code for the item, if applicable. SCREEN: S DIC("S")="I $P(^(0),U,2)=$S($G(DA(1)):DA(1),1:$G(PRCP(""I"")))" EXPLANATION: User can only see entries entered for the Inventory Point. 445.01,.6 PROCUREMENT SOURCE 5;0 VARIABLE POINTER Multiple #445.07 DESCRIPTION: This is the available procurement sources for the inventory item when ordering. IDENTIFIED BY: "WRITE": W " " N PRCPPVNO S PRCPPVNO=$P(^(0),U) W:(PRCPPVNO["PRC(440")&($D(^PRC(440,+PRCPPVNO,0))) $P(^(0), U) W:PRCPPVNO["PRCP(445"&($D(^PRCP(445,+PRCPPVNO,0))) $P($P(^(0),U),"-",2) Q 445.07,.01 PROCUREMENT SOURCE 0;1 VARIABLE POINTER (Multiply asked) FILE ORDER PREFIX LAYGO MESSAGE 440 1 V n SUPPLY WHSE.OR OUTSIDE VENDOR 445 3 I n IN-HOUSE SOURCE SCREEN ON FILE 440: S DIC("S")="D SCREEN^PRCPUMAN(DA(2),DA(1),0)" SCREEN EXPLANATION: Must be a vendor listed for this item on the Item Master File. SCREEN ON FILE 445: S DIC("S")="D SCREEN^PRCPUMAN(DA(2),DA(1),0)",PRCPPRIV=1 SCREEN EXPLANATION: Item must be stocked by this Inventory Location (In-House Source) INPUT TRANSFORM:S Z=$P(^PRCP(445,DA(2),0),U,3),DIC("V")=$S(Z="S":"I $P(Y(0),U,1)=445",1:"I $P(Y(0),U,1)=440") LAST EDITED: MAY 26, 1987 HELP-PROMPT: For a Primary Inventory Point, select either the Warehouse (posted stock) or an outside Vendor that supplies this item. For Secondary, select the Primary that replenishes your stock. DESCRIPTION: This is the procurement source for the item. EXECUTABLE HELP:N PRCPINPT,PRCPITEM S PRCPINPT=$S($G(DA(2)):DA(2),1:DA(1)),PRCPITEM=$S($G(DA(2)):DA(1),1:DA),Z=$P (^PRCP(445,PRCPINPT,0),U,3),DIC("V")=$S(Z="S":"I $P(Y(0),U,1)=445",1:"I $P(Y(0),U,1)=440") K Z D HE LP^PRCPUMAN(PRCPINPT,PRCPITEM,0) NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE:445.07^B 1)= S ^PRCP(445,DA(2),1,DA(1),5,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(2),1,DA(1),5,"B",$E(X,1,30),DA) 445.07,1 UNIT OF RECEIPT 0;2 POINTER TO UNIT OF ISSUE FILE (#420.5) LAST EDITED: JAN 30, 1987 HELP-PROMPT: Enter the packaging unit in which you receive this item (ex. 'BX' for BOX). DESCRIPTION: This is the unit of receipt, how it is received from the vendor source. 445.07,2 UNIT OF RECEIPT PACKAGE MULT. 0;3 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: JAN 30, 1987 HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999999. Used to print on reports only. This should be the number of units of issue contained in one unit of purchase. DESCRIPTION: This is the unit of receipt package multiple for how many units of issue are included in a vendor packaging unit. 445.07,3 UNIT CONVERSION FACTOR 0;4 NUMBER (Required) INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: AUG 06, 1987 HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999999. This number is used to convert quantities received from Unit of Receipt (procurement) to Unit of Issue. DESCRIPTION: This is the unit of conversion factor, used to convert a unit of receipt into a unit of issue. 445.01,.61 SUPPLY STATION QUANTITY 9;1 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<-999999)!(X?.E1"."1N.N) X LAST EDITED: MAY 15, 2000 HELP-PROMPT: Type a Number between -999999 and 999999, 0 Decimal Digits DESCRIPTION: The quantity last report as on hand by the supply station is stored here. 445.01,.62 QTY FROM SS LAST UPDATED 9;2 DATE INPUT TRANSFORM:S %DT="EST" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAY 15, 2000 DESCRIPTION: This field store the time that the supply station last reported its quantity on hand for this item. 445.01,.7 ITEM DESCRIPTION 6;1 FREE TEXT INPUT TRANSFORM:K % S:X="*" X=$P(^PRC(441,DA,0),"^",2),%=1 W:$D(%) " ",X K:$L(X)>60!($L(X)<1) X LAST EDITED: DEC 11, 1991 HELP-PROMPT: Enter the item description from 1 to 60 characters or enter '*' to load the short description from the item master file. DESCRIPTION: This is the description of the item. If the description is entered in this field, it will override the description in the item master file. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445.01,.8 ON-DEMAND 0;30 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: APR 28, 2006 HELP-PROMPT: Enter 'YES' if the inventory item is On-Demand DESCRIPTION: This setting is applicable to items in the Primary and Secondary Inventory Points. Items in the Warehouse can never be considered to be On-Demand. An item is flagged as On-Demand if it must be stocked but is rarely used. These items must be tracked differently by GIP in order to accurately reflect the turnover of the standard items, i.e. those that are not On-Demand. 445.01,.81 ON-DEMAND AUDIT 10;0 DATE Multiple #445.13 (Add New Entry without Asking) DESCRIPTION: This file will store information each time the ON-DEMAND Setting for the inventory item is changed. 445.13,.01 DATE/TIME OF CHANGE 0;1 DATE INPUT TRANSFORM:S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAY 01, 2006 HELP-PROMPT: (No range limit on date) DESCRIPTION: This field stores the date/time that a user changed the On-Demand Setting of an item in the inventory. Only settings from or to 'Yes' will be captured as changes from null to NO or No to null do not move an item into or out of an On-Demand status. CROSS-REFERENCE:445.13^B 1)= S ^PRCP(445,DA(2),1,DA(1),10,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(2),1,DA(1),10,"B",$E(X,1,30),DA) 445.13,1 ON-DEMAND CHANGED BY 0;2 POINTER TO NEW PERSON FILE (#200) LAST EDITED: APR 28, 2006 HELP-PROMPT: This field stores the user who changed the On-Demand Setting for the item. DESCRIPTION: This field stores the user who changed the On-Demand Setting for this item at the date/time specified. 445.13,2 REASON FOR CHANGE 0;3 FREE TEXT INPUT TRANSFORM:K:$L(X)>30!($L(X)<3) X LAST EDITED: APR 28, 2006 HELP-PROMPT: Answer must be 3-30 characters in length DESCRIPTION: Anytime the On-Demand status of an item is changed, the user must specify why the change was made. This field will store that reason. 445.13,3 NEW ON-DEMAND SETTING 0;4 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: APR 28, 2006 HELP-PROMPT: Enter 'YES' if the item was set to be On-Demand DESCRIPTION: This field will show what the user changed the On-Demand Setting for that item to be. 445.01,4 UNIT OF ISSUE 0;5 POINTER TO UNIT OF ISSUE FILE (#420.5) LAST EDITED: OCT 28, 1986 HELP-PROMPT: Enter the packaging unit in which you issue this item. (ex. EA for EACH) DESCRIPTION: This is the packaging unit used at the inventory point to distribute the item. 445.01,4.5 UNIT OF ISSUE PACKAGE MULT. 0;14 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: APR 25, 1986 HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999999. Used to print on reports only. (Usually the number of 'each' contained in one unit of issue.) DESCRIPTION: The unit of issue packaging multiple is the number for converting the unit of issue into individual items. 445.01,4.6 DATE LAST RECEIVED 0;3 DATE INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAR 12, 1987 HELP-PROMPT: Enter the Date this item was last received into your inventory. DESCRIPTION: This is the date the item was last received into your station's inventory. 445.01,4.7 LAST COST (UNIT OF ISSUE) 0;15 NUMBER INPUT TRANSFORM:K:+X'=X!(X>99999999999)!(X<0)!(X?.E1"."4N.N) X LAST EDITED: FEB 09, 1987 HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 99999999999. Actual unit cost for this item the last time it was received (in unit of issue.) DESCRIPTION: This is the actual unit cost, in unit of issue, which was paid the last time the item was received. 445.01,4.8 AVERAGE COST (UNIT OF ISSUE) 0;22 NUMBER INPUT TRANSFORM:K:+X'=X!(X>99999999999)!(X<0)!(X?.E1"."4N.N) X LAST EDITED: FEB 04, 1986 HELP-PROMPT: Recalculated automatically during receiving. (((qty.on hand*last avg.cost)+(qty.received*receiving cost))/(qty.on hand+qty.received)) DESCRIPTION: This is the average unit cost, in unit of issue, which was paid for the item. It is automatically updated by the software each time a receipt or adjustment is made to the inventory point. It is calculated by dividing the total inventory value by the current quantity on hand. 445.01,4.81 TOTAL INVENTORY VALUE 0;27 NUMBER INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999.99)!(X<-9999999.99) X LAST EDITED: JUL 23, 1992 HELP-PROMPT: Type a Dollar Amount between -9999999.99 and 9999999.99, 2 Decimal Digits DESCRIPTION: This field contains the total dollar item value for the inventory point. 445.01,5 MAIN STORAGE LOCATION 0;6 POINTER TO STORAGE LOCATION FILE (#445.4) INPUT TRANSFORM:S PRCPPRIV=1,DIC("S")="I $P(^(0),U,2)=DA(1)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: NOV 24, 1987 HELP-PROMPT: 1-13 characters in length. Enter the section, row, bin, shelf, etc.in which this item is stored, from largest to smallest division, separate by dashes, 0 fill numerics to length of longest entry. DESCRIPTION: In order to sort the items correctly on picking tickets or reports by storage location, the storage location must be formatted as follows: Enter first, the largest division within your storage area, followed with a dash, then the next smallest division, another dash and so on to the smallest division. Fill each entry with leading zeros to make it as long as the longest entry. Example: For a storage location with sections 1 to 50, bins 1 to 100, and shelves 1 to 6, an example storage location for section 5, bin 2, shelf 3 would be 05-002-3. SCREEN: S DIC("S")="I $P(^(0),U,2)=DA(1)" EXPLANATION: Users can only reference storage locations within their own inventory. 445.01,6 ADDITIONAL STORAGE LOCATION 1;0 POINTER Multiple #445.02 DESCRIPTION: This is an additional storage location for the item in the inventory point. This field should be entered in the same format as the MAIN STORAGE LOCATION field. 445.02,.01 ADDITIONAL STORAGE LOCATION 0;1 POINTER TO STORAGE LOCATION FILE (#445.4) (Multiply asked) INPUT TRANSFORM:S PRCPPRIV=1,PRCPINDA=$S($D(DA(2)):DA(2),1:DA(1)),DIC("S")="I $P(^(0),U,2)=PRCPINDA" D ^DIC K DIC,PRCPINDA S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X LAST EDITED: NOV 24, 1987 HELP-PROMPT:(Supplementary information only) Answer must be 1-13 characters in length, formatted the same as the Main Storage Location. DESCRIPTION: This is an additional storage location for the item in the inventory point. This field should be entered in the same format as the MAIN STORAGE LOCATION field. SCREEN: S DIC("S")="I $P(^(0),U,2)=DA(1)" EXPLANATION:User can only reference storage locations in their own inventory. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445.01,7 QTY.ON HAND (UNIT OF ISSUE) 0;7 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<-999999)!(X?.E1"."1N.N) X HELP-PROMPT:TYPE A WHOLE NUMBER BETWEEN -999999 AND 999999. Current quantity in your inventory. DESCRIPTION: This field stores the current on-hand quantity (in unit of issue) of this item in the inventory point. 445.01,7.5 QTY NON-ISSUABLE (U/I) 0;19 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<-999999)!(X?.E1"."1N.N) X LAST EDITED: JUL 10, 1992 HELP-PROMPT:Type a Number between -999999 and 999999, 0 Decimal Digits DESCRIPTION: This field is used to store the quantity (in unit of issue) of an item which is non-issuable. When an item is non-issuable, the quantity is subtracted from the quantity on hand and added to the quantity non-issuable. When an item is return from non-issuable, the quantity is added to the quantity on hand and subtracted from the quantity non-issuable. 445.01,8 *DUE-IN (UNIT OF ISSUE) 0;8 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<-999999)!(X?.E1"."1N.N) X LAST EDITED: JAN 31, 1994 HELP-PROMPT:This field is no longer used. DESCRIPTION: This field is no longer used. It has been moved to field number 8.1. 445.01,8.1 DUE-IN (IN U/I) DUE;1 NUMBER INPUT TRANSFORM:K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: JAN 31, 1994 HELP-PROMPT:Enter the quantity in unit of issue for oustanding orders which have not been received into the inventory point. From 0 to 9999999. DESCRIPTION: This field stores the quantity in unit of issue for outstanding orders which have not been received into the inventory point. 445.01,8.5 *DUE-OUT (UNIT OF ISSUE) 0;20 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<-999999)!(X?.E1"."1N.N) X LAST EDITED: JAN 31, 1994 HELP-PROMPT:This field is no longer used. DESCRIPTION: This field is no longer used. It has been moved to field 8.6. 445.01,8.6 DUE-OUT (IN U/I) DUE;2 NUMBER INPUT TRANSFORM:K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: JAN 31, 1994 HELP-PROMPT:Enter the quantity in unit of issue for oustanding orders which have not been posted to the distribution point. From 0 to 9999999. DESCRIPTION: This field stores the quantity in unit of issue for outstanding orders which have been placed by a distribution point but have not been posted to the distribution point. 445.01,9 NORMAL STOCK LEVEL (U OF I) 0;9 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: MAY 03, 2000 HELP-PROMPT:Type a Number between 0 and 999999, 0 Decimal Digits DESCRIPTION: This is the normal stock level, in unit of issue, for an item. CROSS-REFERENCE:445^AH^MUMPS 1)= N SS Q:$P(^PRCP(445,DA(1),0),"^",3)'="S" S SS=$P($G(^PRCP(445,DA(1),5)),"^",1) Q:'SS I X>0 S ^PRCP(445,"AH",DA,SS,DA(1))="" 2)= N SS S SS=$P($G(^PRCP(445,DA(1),5)),"^",1) Q:'SS K ^PRCP(445,"AH",DA,SS,DA(1)) This cross reference lists all supply station items by supply station, allowing GIP to quickly access where items are kept and how many places the item is stored. 445.01,9.5 TEMPORARY STOCK LEVEL 0;23 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: DEC 20, 1991 HELP-PROMPT:(USED IN AUTOMATIC ORDERING) TYPE A WHOLE NUMBER BETWEEN 0 AND 999999. Used in place of the Normal stock level, until the DATE TO DELETE TEMPORARY LEVEL is past. DESCRIPTION: This is the temporary stock level, in unit of issue, for an item. CROSS-REFERENCE:^^TRIGGER^445.01^9.6 1)= Q 2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1,Y(0)=X,Y(1)=$G(^PRCP(445,D0,1,D1,0)),X='$P(Y(1 ),U,23) I X S X=DIV,Y1=$G(^PRCP(445,D0,1,D1,0)),X=$P(Y(1),U,24),X=X S DIU=X K Y S X="" X ^DD(445.01 ,9.5,1,1,2.4) 2.4)= S DIH=$S($D(^PRCP(445,DIV(0),1,DIV(1),0)):^(0),1:""),DIV=X S $P(^(0),U,24)=DIV,DIH=445.01,DIG =9.6 D ^DICR:$O(^DD(DIH,DIG,1,0)) CREATE VALUE)= NO EFFECT DELETE CONDITION)= 'TEMPORARY STOCK LEVEL DELETE VALUE)= @ FIELD)= DATE TO DELETE TEMPORARY LEVEL This cross reference is a trigger to remove the date to delete temporary level field when the temporary stock level is deleted. 445.01,9.6 DATE TO DELETE TEMPORARY LEVEL 0;24 DATE INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: FEB 04, 1986 HELP-PROMPT:(USED IN AUTOMATIC ORDERING) This date and the temporary level are checked first. If this date has passed, the temporary level is deleted. Otherwise, the temporary level overrides the normal stock level. DESCRIPTION: This is the date to delete the temporary stock level. NOTES: TRIGGERED by the TEMPORARY STOCK LEVEL field of the INVENTORY ITEM sub-field of the GENERIC INVENTORY File 445.01,10 STANDARD REORDER POINT 0;10 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: DEC 27, 2000 HELP-PROMPT:(USED IN AUTOMATIC ORDERING) TYPE A WHOLE NUMBER BETWEEN 0 AND 999999. If qty.on hand + qty.on order - qty.committed falls below the reorder point, item will appear on suggested order list. DESCRIPTION: This is the reorder point, in unit of issue, for the item. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445.01,10.3 OPTIONAL REORDER POINT 0;4 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: JUL 23, 1991 HELP-PROMPT:(USED DURING AUTOMATIC ORDERING) If at least one item from a source is at reorder level, a second pass is made through inventory. Items from same source, at or below this level will also be ordered. DESCRIPTION: This is the interval order point for the item. 445.01,11 EMERGENCY STOCK LEVEL 0;11 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X HELP-PROMPT:TYPE A WHOLE NUMBER BETWEEN 0 AND 999999. If qty.on hand falls below this point, item will be flagged for emergency handling, even if it is already on order. DESCRIPTION: This is the emergency stock level for the item. The item will be flagged for emergency handling if its level falls below the emergency stock level. 445.01,14 CANCEL/BACKORDER 0;2 SET 'C' FOR CANCEL IF OUT-OF-STOCK; 'B' FOR BACKORDER IF OUT-OF-STOCK; LAST EDITED: APR 03, 1986 HELP-PROMPT:Warehouse Inventory Items only. Indicates the action to be taken if a request is made for this item and the warehouse is out of stock. DESCRIPTION: This field will be used for the Warehouse Inventory items only. It will indicate the action to be taken when an item normally stocked by the warehouse is ordered by a service, and the item is out of stock. The item can either be cancelled from the request, or it can be back-ordered, in which case the warehouse will fill the order after they have replenished their own stock. 445.01,14.3 DO NOT BACK-ORDER INDICATOR 0;13 SET '1' FOR DO NOT BACKORDER; LAST EDITED: AUG 19, 1987 HELP-PROMPT:ENTER '1' if you DO NOT wish to have the warehouse back-order this item, when out of stock. DESCRIPTION: This field will be used on Primary Inventory point items only, and only for those items that are ordered from the Supply Warehouse (posted stock). If the flag is set to '1', and the Primary orders this item, this flag will prevent the warehouse from putting the item on back-order status, regardless of the normal cancel/backorder status for the item that has been established by the warehouse. 445.01,14.4 DO NOT SUBSTITUTE INDICATOR 0;18 SET '1' FOR DO NOT SUBSTITUTE; LAST EDITED: AUG 19, 1987 HELP-PROMPT:ENTER a '1' if you DO NOT wish the warehouse to substitute another item for this item. DESCRIPTION: This field will be used on Primary Inventory point items only, and only for those items that are ordered from the Supply Warehouse (posted stock). If the flag is set to '1', and the Primary orders this item, this flag will prevent the warehouse from substituting another item for this one, regardless of whether the item can normally be substituted. 445.01,14.5 *ISSUE BOOK SEQUENCE NUMBER 0;16 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: DEC 21, 1992 HELP-PROMPT:Type a Number between 0 and 999999, 0 Decimal Digits. Optional field used for those inventory points that wish to have their Posted Stock issue books printed by sequence number. DESCRIPTION: This field is no longer used. 445.01,16 ISSUE MULTIPLE (UNIT OF ISSUE) 0;25 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: APR 03, 1986 HELP-PROMPT:Enter a number here if you wish to issue this item always in the same multiples. (Ex., if unit of issue is EACH and you wish to issue always in dozens, enter 12). DESCRIPTION: This field is used to indicate the multiple for the item to order. For example, if the order multiple was 5, this item would have to be ordered in quantities of 5 such as 5, 10, 15, etc. If a number is entered in this field, and another inventory/distribution point orders this item, their automatic ordering function will adjust the suggested order quantity up to the next highest whole multiple. For example, if the computer calculated that they needed 8 cases, and the issue multiple was 5, the quantity to order would be bumped up to 10 cases. Also, whenever another inventory point orders this item manually, the issue multiple will be displayed to them. 445.01,16.5 MINIMUM ISSUE QTY. 0;17 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: DEC 22, 1986 HELP-PROMPT:Enter a quantity here (in unit of issue), if you wish to always issue AT LEAST this minimum quantity. DESCRIPTION: If a number is entered in this field, and another inventory/distribution point orders this item, their automatic ordering function will adjust the suggested order quantity up to at least this level. For example, if the computer calculated that they needed 8 cases and the minimum issue quantity was 10 cases, it would bump up their quantity to order to 10. Also, whenever another inventory point orders this item manually, the minimum issue quantity will be displayed to them. 445.01,17 DELETE ITEM WHEN INVENTORY 0 0;26 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: APR 16, 1986 HELP-PROMPT:If this flag is set to 'Y' (YES), the item will be deleted from the inventory file during the next Automatic Stock Replenishment after the quantity on hand reaches 0. DESCRIPTION: This field will mark items for deletion when the quantity on-hand for an item falls to zero. To mark an item for deleteion set this field to yes. When autogeneration runs, it will check each item for this field set to yes. If it is set to yes, the current quantity on-hand (including non-issuable), and the total inventory value is checked and must equal zero. Lastly, it will check the MOS INACTIVE BEORE ITEM DEL. field for receipts and usage. If there are no receipts or usage after the date, the item will be removed from the inventory point. It will show up on the autogeneration report as being deleted. 445.01,18 USAGE/ISSUES HISTORY BY ITEM 2;0 Multiple #445.05 (Add New Entry without Asking) DESCRIPTION: This multiple keeps track of when an item is used and the quantity used. The usage is used to calculate averages of items used in specified time frames. The averages can then be used to set stock levels and reorder points. 445.05,.01 MONTH/YEAR USED/ISSUED 0;1 NUMBER INPUT TRANSFORM:S X=+X_"01",%DT="EX" D ^%DT S X=$E(Y,1,5) K:Y<1 X S:$D(X) DINUM=X LAST EDITED: MAY 19, 1986 HELP-PROMPT:Enter year and month (not day) in internal storage format. (EX. 28601 for Jan., 1986). DESCRIPTION: This is the month and year when the item was used or issued. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445.05,1 QTY.USED/ISSUED (U OF ISSUE) 0;2 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<-999999)!(X?.E1"."1N.N) X LAST EDITED: MAY 19, 1986 HELP-PROMPT:TYPE A WHOLE NUMBER BETWEEN -999999 AND 999999 DESCRIPTION: This is the quantity, in unit of issue, of the item used or issued. 445.05,2 TOTAL COST USED/ISSUED 0;3 NUMBER INPUT TRANSFORM:K:+X'=X!(X>99999999.999)!(X<-99999999.999)!(X?.E1"."4N.N) X LAST EDITED: MAY 20, 1986 HELP-PROMPT:TYPE A NUMBER BETWEEN -99999999.999 AND 99999999.999 (UP TO 3 DECIMAL PLACES) DESCRIPTION: This is the total cost of all stock of this item which was used or issued. 445.01,19 RECEIPTS HISTORY BY ITEM 3;0 DATE Multiple #445.06 (Add New Entry without Asking) DESCRIPTION: This data is updated automatically each time receiving is processed. The system records the date and the quantity received. 445.06,.01 DATE RECEIVED 0;1 DATE INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X LAST EDITED: MAY 19, 1986 DESCRIPTION: This is the date the item was received. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445.06,1 QTY.RECEIVED (UNIT OF ISSUE) 0;2 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: MAY 19, 1986 HELP-PROMPT:TYPE A WHOLE NUMBER BETWEEN 0 AND 999999 DESCRIPTION: This is the quantity of the item received, in unit of issue. 445.06,2 *%STOCK ON HAND BEFORE RECEIPT 0;3 NUMBER INPUT TRANSFORM:K:+X'=X!(X>99999.999)!(X<0)!(X?.E1"."4N.N) X LAST EDITED: SEP 13, 1993 HELP-PROMPT:TYPE A NUMBER BETWEEN 0 AND 99999.999. Each time the item is received, the % of normal stock on hand before the receipt is calculated and entered here. (During receipts posting). DESCRIPTION: This field is no longer used. TECHNICAL DESCR: 445.01,20 OUTSTANDING REQUEST 7;0 POINTER Multiple #445.09 DESCRIPTION: This data is updated automatically whenever a request is approved by the control point official, when a request is returned to service, or during the receiving function. This data allows the operator to see what outstanding orders exist for each item. The data should not normally be edited by the user. 445.09,.01 TRANSACTION NO. 0;1 POINTER TO CONTROL POINT ACTIVITY FILE (#410) INPUT TRANSFORM:S DINUM=X LAST EDITED: JUN 24, 1987 HELP-PROMPT:Outstanding request number (on file 410, Control Point Activity File) is added automatically when request if approved, deleted if request is returned to service or received. DESCRIPTION: This is the transaction number for the request. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE:445.09^B 1)= S ^PRCP(445,DA(2),1,DA(1),7,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(2),1,DA(1),7,"B",$E(X,1,30),DA) 445.09,1 QTY.ORDERED UNIT OF ISSUE 0;2 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: JUN 24, 1987 HELP-PROMPT:Quantity ordered from supply, converted to unit of issue. Updated automatically when request is approved, returned to service or received. DESCRIPTION: This is the quantity of an item ordered, in unit of issue. 445.09,2 UNIT OF RECEIPT 0;3 POINTER TO UNIT OF ISSUE FILE (#420.5) LAST EDITED: SEP 23, 1987 HELP-PROMPT:System automatically enters the unit of receipt for this item from this source, when a transaction is signed (approved) by the control point official DESCRIPTION: This is the packaging unit used by the vendor to ship the item. It is automatically entered when a transaction is signed (approved) by a control point official. 445.09,3 UNIT OF RECEIPT PACKAGE MULT. 0;4 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: SEP 23, 1987 HELP-PROMPT:Type a Number between 0 and 999999, 0 Decimal Digits. System automatically puts current pkg.multiple for this item, from this source, when a request (trx.)to supply is signed (approved). DESCRIPTION: This is the number of units of issue per unit of receipt. This number is automatically entered when a request is approved. 445.09,4 UNIT CONVERSION FACTOR 0;5 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: SEP 23, 1987 HELP-PROMPT:Type a Number between 0 and 999999, 0 Decimal Digits. System automatically enters current unit conversion factor for this item from this source, when a request (trx.) is signed (approved). DESCRIPTION: This is the value used to convert a unit of receipt into unit of issue. This number is automatically entered when a request is approved. 445.01,21 CASE CART/INSTRUMENT KIT ITEM 8;0 POINTER Multiple #445.121 LAST EDITED: AUG 31, 1993 DESCRIPTION: This field stores the items which were used in assembling a case cart or instrument kit. When a case cart or instrument kit is assembled, this field stores the disposable items and quantities used during assembly. When a case cart or instrument kit is disassembled, the items and quantities stored in this field are used for disassembly. TECHNICAL DESCR: This field is internally set by the assembly of a case cart or instrument kit routines. 445.121,.01 CASE CART/INSTRUMENT KIT ITEM 0;1 POINTER TO ITEM MASTER FILE (#441) (Multiply asked) INPUT TRANSFORM:S DINUM=X LAST EDITED: AUG 31, 1993 HELP-PROMPT:Enter items which make up this case cart or instrument kit. DESCRIPTION: This is the disposable item which makes up the case cart or instrument kit. TECHNICAL DESCR: This field is internally set by the assembly of a case cart or instrument kit routines. SCREEN: S DIC("S")="I $D(^PRCP(445,D0,1,+Y,0)),$D(^PRC(441,+Y,0))",PRCPSET="I 1" EXPLANATION:Item must be a purchaseable item that is in your inventory file. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: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) 445.121,1 QTY NEEDED FOR ONE CC/IK 0;2 NUMBER INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: AUG 31, 1993 HELP-PROMPT:Enter the quantity needed to assemble one case cart or instrument kit. DESCRIPTION: This is the quantity of the disposable item used to assemble the case cart or instrument kit. TECHNICAL DESCR: This field is internally set by the assembly of a case cart or instrument kit routines. 445.01,22 SUBSTITUTE ITEM(S) 4;0 POINTER Multiple #445.122 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. IDENTIFIED BY: "WRITE": W ?10,"NSN: ",$$NSN^PRCPUX1(+Y) 445.122,.01 SUBSTITUTE ITEM(S) 0;1 POINTER TO ITEM MASTER FILE (#441) (Multiply asked) 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) 445.01,50 DISPENSING UNIT 0;28 FREE TEXT INPUT TRANSFORM:K:$L(X)>10!($L(X)<1) X LAST EDITED: MAR 24, 1993 HELP-PROMPT:Answer must be 1-10 characters in length. DESCRIPTION: This field is used to indicate the pharmacy dispensing units when converting the unit per issue to the drug accountability pharmacy dispensing units. This field is for informational purposes only. 445.01,51 DISPENSING UNIT CONV FACTOR 0;29 NUMBER INPUT TRANSFORM:K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: OCT 19, 1992 HELP-PROMPT:Enter the pharmacy dispensing unit conversion factor which will be used to convert the quantity in unit per issue to the quantity in dispensing units (from 1 to 99999). DESCRIPTION: This field is multiplied by the quantity on hand in unit per issue to generate the drug accountability quantity in pharmacy dispensing units. 445,4 DISTRIBUTION POINT 2;0 POINTER Multiple #445.03 (Add New Entry without Asking) DESCRIPTION: This field is used to store inventory distribution points to which it can distribute expendable supplies. The warehouse can only distribute to primary type inventory points and the primary can only distribute to secondary type inventory points. Secondaries cannot have distribution points. 445.03,.01 DISTRIBUTION POINT 0;1 POINTER TO GENERIC INVENTORY FILE (#445) (Multiply asked) INPUT TRANSFORM:S Z1=$P($G(^PRCP(445,DA,0)),U,3),Z2=$P($G(^PRCP(445,X,0)),U,3),Z1=+$TR(Z1,"WPS","123"),Z2=+$TR(Z2," WPS","123") K:'Z1!('Z2)!(Z2-Z1'=1) X K Z1,Z2 S:$D(X) DINUM=X LAST EDITED: JUN 01, 1992 HELP-PROMPT: Enter name of an Inventory/Distribution Point stocked by this one. DESCRIPTION: This is the name of a distribution point receiving supplies. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE:445^AB 1)= S ^PRCP(445,"AB",$E(X,1,30),DA(1),DA)="" 2)= K ^PRCP(445,"AB",$E(X,1,30),DA(1),DA) This cross reference will sort the distribution point by inventory points. The node prcp(445,"ab",DISTRPT,INVPT,DISTRPT) is set where DISTRPT is the internal distribution point number and INVPT is the internal inventory point number. 445,5 DEPARTMENT NUMBER 0;8 FREE TEXT INPUT TRANSFORM: K:$L(X)>3!($L(X)<3)!'(X?3UN) X LAST EDITED: MAY 27, 1992 HELP-PROMPT: ANSWER MUST BE 3 DIGIT ALPHANUMERICS. (EX. A12) This is used to identify this Inventory/Distribution point to the LOG Inventory system. DESCRIPTION: This is the three digit number which identifies the inventory/distribution point to Austin. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445,5.5 ISSUE BOOK SORT 0;10 SET 'A' FOR ALPHA SORT; 'N' FOR NSN SORT; 'S' FOR SEQUENCE (NOT USED); LAST EDITED: DEC 22, 1992 HELP-PROMPT: A=Issue books will be sorted alphabetically by group category, then item description. N=Issue books will be sorted by NSN number. S=Issue books will be sorted by LOG sequence number. DESCRIPTION: This information corresponds to the sort sequence for issue books used by the LOG I warehouse inventory system. This optional flag need only be set for those inventory points that need to receive issue books for Posted stock. Such inventory/distribution points should also have a department number entered in this file. 445,6 INVENTORY USER 4;0 POINTER Multiple #445.04 DESCRIPTION: The first user for an inventory point must be entered by the user that establishes the inventory point. This user may then add other users. A user must be entered here before s/he can access the inventory point. 445.04,.01 INVENTORY USER 0;1 POINTER TO NEW PERSON FILE (#200) (Required) (Multiply asked) INPUT TRANSFORM: S DINUM=X LAST EDITED: SEP 25, 1991 HELP-PROMPT: Enter the operators with access to the Inventory/Distribution for this Inventory Point. (Note: additional entry on Fund Control Point file is required for requisitioning to Supply). DESCRIPTION: This is the name of an inventory/distribution point user. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445^AD 1)= S ^PRCP(445,"AD",$E(X,1,30),DA(1),DA)="" 2)= K ^PRCP(445,"AD",$E(X,1,30),DA(1),DA) This cross reference sorts the inventory user by the inventory points. The node prcp(445,"ad",DUZ,INVPT,DUZ) is set where DUZ is the internal user number and INVPT is the internal inventory point number. 445,7 PRINT STOCK AT CRITICAL LEVEL? 0;9 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: APR 23, 1986 HELP-PROMPT: (Set by background job PRCPEMS). If this flag is set to "Y", sign-on program will notify the user of the inventory point that s/he needs to run the Safety Stock Report. DESCRIPTION: The program PRCPUEMS should be set up by the Site Manager to run at some interval defined by the Site Manager. It should run during non-peak times. This program searches the inventory file for EVERY inventory point. If it finds one item with a quantity at or below the Safety Stock Level, the inventory point is flagged. Then, the next time any user for that inventory point signs on, s/he will be notified that s/he needs to run the report of items at or below Safety Stock level. The message will keep coming up for each person that signs on, until the report has been run. 445,7.4 LAST OPEN BALANCES SET 0;22 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: JUL 25, 1995 DESCRIPTION: This field is used to store the date the opening monthly balances are set. If the date the last opening balances set does not equal the current month and year, a message will be displayed to the users as they sign into the inventory point menus. 445,7.5 LAST PURGE USAGE 0;14 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: FEB 12, 1992 HELP-PROMPT: Set automatically by system when the purge of monthly usage/distribution totals by item is run. Set to the month-end on which the purge was run. Used to notify the user when the next purge is due. DESCRIPTION: This date is automatically entered when the purge of monthly usage/ distribution totals by item is run. It is set to the last day of the month when the purge was run. The purge options should be run monthly in order to free up disk space. Failure to run the purge option for the current month will result in a message which is displayed at the top of the screen to all users. 445,7.6 LAST PURGE RECEIPTS 0;17 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: FEB 12, 1992 DESCRIPTION: This date is automatically entered when the purge of monthly receipts history by item is run. It is set to the last day of the month when the purge was run. The purge options should be run monthly in order to free up disk space. Failure to run the purge option for the current month will result in a message which is displayed at the top of the screen to all users. 445,7.7 LAST PURGE TRANS REGISTER 0;18 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: FEB 10, 1992 DESCRIPTION: This date is automatically entered when the purge of monthly transaction register purge is run. It is set to the last day of the month when the purge was run. The purge options should be run monthly in order to free up disk space. Failure to run the purge option for the current month will result in a message which is displayed at the top of the screen to all users. 445,7.8 LAST PURGE DISTRIBUTION 0;19 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: FEB 12, 1992 DESCRIPTION: This date is automatically entered when the purge of monthly history by cost center purge is run. It is set to the last day of the month when the purge was run. The purge options should be run monthly in order to free up disk space. Failure to run the purge option for the current month will result in a message which is displayed at the top of the screen to all users. 445,7.9 AUTOMATIC PURGE 0;21 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: OCT 16, 1992 DESCRIPTION: If this field is set to YES, the taskmanager automatic purge option will purge inventory point data back 13 months. If the field is set to NO (or null), the manager of the inventory point will be responsible for purging the inventory point data. 445,8 *ENTER ITEM DESCRIPTIONS 0;11 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: FEB 10, 1992 HELP-PROMPT: Answer 'Y' (YES) to this prompt if you wish to use your own descriptions for items, rather than those assigned by Supply Service in the Item Master File. DESCRIPTION: This field is no longer used. 445,9 REGULAR WHSE. ISSUES SCHEDULE 0;4 SET 'W' FOR WEEKLY; '2' FOR EVERY 2 WEEKS; 'M' FOR MONTHLY; 'O' FOR OTHER; LAST EDITED: SEP 02, 1987 HELP-PROMPT: This field is entered by PPM when entering/editing Primary Inventory/Distribution points. It indicates the normal schedule for requesting Warehouse Issues. DESCRIPTION: This field is entered by Personal Property Management, and holds the codes for weekly, biweekly, monthly, or other type distribution of warehouse issues. 445,10 REGULAR WHSE. ISSUES DUE DATE 0;12 DATE INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X LAST EDITED: SEP 02, 1987 HELP-PROMPT: Entered by PPM for Primary Inventory/Distribution Points only, to notify them that their regularly scheduled whse.issues request is due in Supply. DESCRIPTION: The date is set into this field in PPM, when they wish to notify Inventory/ Distribution points that their regularly scheduled whse.issues request is due. When the date is set, the user of the Inventory/Distribution point is notified that his/her whse. issues request is due. The date is cleared the next time the user generates an automatic request for posted stock. 445,11 MIS COSTING SECTION 3;0 POINTER Multiple #445.011 DESCRIPTION: For use in tracking costs of distributed supplies. 445.011,.01 MIS COSTING SECTION 0;1 POINTER TO SERVICE/SECTION FILE (#49) (Multiply asked) INPUT TRANSFORM: S DIC("S")="I $D(^(2)),$P(^(2),U,1)'=""""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: SEP 10, 1987 HELP-PROMPT: Enter the MIS Costing Sections for apportioning out the costs of expendable supplies distributed TO your inventory point, they must be listed in file 49 (Service/Section File). DESCRIPTION: This field is used to generate a cost accounting report for expendable supplies distribution. The Usage/Distribution History file (446) keeps total dollars by Cost Center, whenever items are distributed from a Cost Center, to a location that will in turn distribute the supplies to an MIS Service/Section. The Cost Accounting Report allocates the total dollar amount by MIS costing section within cost center. The user enters MIS costing sections to each such location, along with the % of the dollar total to be apportioned to each section. The percentages should not total more than 100%. The MIS costing sections must be set up in the service/section file by your site manager (file 49). SCREEN: S DIC("S")="I $D(^(2)),$P(^(2),U,1)'=""""" EXPLANATION: Only MIS COSTING SECTIONS can be entered! CROSS-REFERENCE: 445.011^B 1)= S ^PRCP(445,DA(1),3,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(1),3,"B",$E(X,1,30),DA) 445.011,1 % OF COSTS TO BE APPLIED 0;2 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999.999)!(X<0)!(X?.E1"."4N.N) X LAST EDITED: OCT 15, 1987 HELP-PROMPT: Type a Number between 0 and 999.999, 3 Decimal Digits. Enter the Percentage of the total distribution cost to be applied to this MIS service/section, for cost accounting. DESCRIPTION: This is the percentage of costs allocated to a MIS costing section. 445,12 MOS INACTIVE BEFORE ITEM DEL. 0;13 NUMBER INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: SEP 29, 1987 HELP-PROMPT: Enter the number of months (between 0 and 99) that an ITEM must have NO activity, before the 'delete item when inventory 0' flag will cause the item to actually be deleted from your inventory file. DESCRIPTION: The only way to delete an item from your inventory file, is to set the 'DELETE ITEM WHEN INVENTORY 0' flag to 'Y'. During the automatic generation of a suggested order, if the program encounters an item with the flag set, it first makes sure that the inventory quantity on hand, the DUE-IN, and the DUE-OUT are all 0, and that the item does not exist on any of your secondary distribution points. If it meets the criteria, then the program checks this field, and if it contains a number, the program makes sure that there has been no activity for the item (i.e., usage, distribution or receiving) for at least the number of months specified in this field, before deleting the item from the inventory file. 445,13 *PARAMETERS CAN BE EDITED BY 0;15 POINTER TO GENERIC INVENTORY FILE (#445) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,3)=""P""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JAN 06, 1994 HELP-PROMPT: For Secondary Inventory/Distr.points only, enter the name of the Primary Inventory/Distr.point that first added this Secondary to the Inventory File. DESCRIPTION: This field is no longer used. SCREEN: S DIC("S")="I $P(^(0),U,3)=""P""" EXPLANATION: Only a Primary can edit parameters for a Secondary 445,14 PRIMARY UPDATED BY WAREHOUSE 0;16 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: SEP 23, 1992 DESCRIPTION: This is a switch controlled by the primary inventory point. If set to NO, the primary inventory point quantity on-hand will not be updated by the warehouse. The default is YES or null. 445,15 SPECIAL INVENTORY POINT TYPE 0;20 SET 'D' FOR DRUG ACCOUNTABILITY; 'S' FOR SPD; LAST EDITED: AUG 29, 1994 DESCRIPTION: This field is a switch controlled by the primary inventory point. If this field is set to 'D', it will update the pharmacy drug accountability file when the primary quantity on-hand is changed. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445^ASPEC 1)= S ^PRCP(445,"ASPEC",$E(X,1,30),DA)="" 2)= K ^PRCP(445,"ASPEC",$E(X,1,30),DA) This cross reference is used to track Inventory Points defined for SPD. 445,16 PICKING TICKET PRINTER DEV;1 FREE TEXT INPUT TRANSFORM: S DIC="^%ZIS(1,",DIC(0)="EMQZ" D ^DIC K:Y'>0 X S:$D(X) X=$P(Y(0),"^") K DIC LAST EDITED: AUG 09, 1994 HELP-PROMPT: Enter the printer device used to print the SPD or Warehouse picking tickets. DESCRIPTION: This field stores the device which is used to automatically print the picking ticket in SPD for case cart/instrument kit distribution orders placed by Surgery. This field also stores the device used to automatically print the picking ticket for Warehouse issue books. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445,19 PRE-CONVERSION HEADER (NO EDITS) SEC;1 FREE TEXT INPUT TRANSFORM: D EN^DDIOL("THESE DATA MAY NOT BE TAMPERED WITH. FOR POSSIBLE USE IN UN-DOING A CONVERSION") K X LAST EDITED: JUN 29, 1999 HELP-PROMPT: This field in non-editable. DESCRIPTION: This field is automatically populated when the option to 'Convert Secondary to Primary' [PRCP CONVERT SECONDARY] is run. It is simply the content of the zero node of the inventory point as it existed before conversion. The only time it would ever be referenced is in cases where users mistakenly convert an inventory point and need to 'undo' the conversion. DATA CONTAINED IN THIS FIELD ARE NEVER USED IN ANY TYPE OF PRODUCTION APPLICATION. EXECUTABLE HELP: D EN^DDIOL("Data may not be added, changed, or deleted.") DELETE TEST: 1,0)= D EN^DDIOL("DELETION IS NOT ALLOWED.") I 1 UNEDITABLE NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445,19.5 CONVERTED BY SEC;2 POINTER TO NEW PERSON FILE (#200) INPUT TRANSFORM: D EN^DDIOL("THIS DATA MAY NOT BE TAMPERED WITH. MAY BE NEEDED FOR REFERENCE.") K X LAST EDITED: SEP 03, 1999 HELP-PROMPT: Field is uneditable. DESCRIPTION: This field is automatically populated when the option to 'Convert Secondary to Primary' [PRCP CONVERT SECONDARY] is run. It indicates who actually converted this inventory from a secondary to a primary. It is included solely for documentation. DATA CONTAINED IN THIS FIELD ARE NEVER USED IN ANY TYPE OF PRODUCTION APPLICATION. EXECUTABLE HELP: D EN^DDIOL("Data may not be added, changed, or deleted.") DELETE TEST: 1,0)= D EN^DDIOL("DELETION IS NOT ALLOWED.") I 1 UNEDITABLE NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445,19.6 CONVERSION DATE SEC;3 DATE INPUT TRANSFORM: D EN^DDIOL("THIS DATA MAY NOT BE TAMPERED WITH. IT MAY BE NEEDED FOR REFERENCE.") K X LAST EDITED: SEP 03, 1999 HELP-PROMPT: Field is uneditable. EXECUTABLE HELP: D EN^DDIOL("Data may not be added, changed, or deleted.") DELETE TEST: 1,0)= D EN^DDIOL("DELETION IS NOT ALLOWED.") I 1 UNEDITABLE NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 445,19.7 PRE-CONVERSION STOCKED BY SEC;4 POINTER TO GENERIC INVENTORY FILE (#445) LAST EDITED: JUL 08, 1999 DESCRIPTION: The subject inventory (.01 field) needs to be a DISTRIBUTION POINT of this entry if the conversion is ever undone. 445,20 PRE-CONVERSION ITEM (NO EDITS) SECITM;0 Multiple #445.08 (Add New Entry without Asking) 445.08,.01 PRE-CONVERSION ITEM (NO EDITS) 0;1 FREE TEXT INPUT TRANSFORM: D EN^DDIOL("THESE DATA MAY NOT BE TAMPERED WITH. FOR POSSIBLE USE IN UN-DOING A CONVERSION.") K X LAST EDITED: SEP 03, 1999 HELP-PROMPT: This entire sub-file in non-editable. DESCRIPTION: This field is automatically populated when the option to 'Convert Secondary to Primary' [PRCP CONVERT SECONDARY] is run. It is the content of the zero node of the ITEM sub-file in the inventory point as it existed before conversion. The only time it would ever be referenced is in cases where users mistakenly convert an inventory point and need to 'undo' the conversion. DATA CONTAINED IN THIS FIELD ARE NEVER USED IN ANY TYPE OF PRODUCTION APPLICATION. EXECUTABLE HELP: D EN^DDIOL("Data may not be added, changed, or deleted.") DELETE TEST: 1,0)= D EN^DDIOL("DELETION IS NOT ALLOWED.") I 1 UNEDITABLE NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445.08^B 1)= S ^PRCP(445,DA(1),"SECITM","B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(1),"SECITM","B",$E(X,1,30),DA) 445.08,.6 PRE-CONVERSION SOURCES (NO EDITS) 5;0 Multiple #445.12 (Add New Entry without Asking) LAST EDITED: JUN 28, 1999 DELETE TEST: 1,0)= D EN^DDIOL("DELETION IS NOT ALLOWED.") I 1 445.12,.01 PRE-CONVERSION SOURCES (NO EDITS) 0;1 FREE TEXT INPUT TRANSFORM:D EN^DDIOL("THESE DATA MAY NOT BE TAMPERED WITH. FOR POSSIBLE USE IN UN-DOING A CONVERSION.") K X LAST EDITED: JUN 29, 1999 HELP-PROMPT: This field is non-editable. DESCRIPTION: This field is automatically populated when the option to 'Convert Secondary to Primary' [PRCP CONVERT SECONDARY] is run. It contains the PROCUREMENT SOURCES in the ITEM sub-file in the inventory point as it existed before conversion. The only time it would ever be referenced is in cases where users mistakenly convert an inventory point and need to 'undo' the conversion. DATA CONTAINED IN THIS FIELD ARE NEVER USED IN ANY TYPE OF PRODUCTION APPLICATION. EXECUTABLE HELP:D EN^DDIOL("Data may not be added, changed, or deleted.") DELETE TEST: 1,0)= D EN^DDIOL("DELETION IS NOT ALLOWED.") I 1 UNEDITABLE NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE:445.12^B 1)= S ^PRCP(445,DA(2),"SECITM",DA(1),5,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(2),"SECITM",DA(1),5,"B",$E(X,1,30),DA) 445,21 PRE-CONVERSION MIS (NO EDITS) SECMIS;0 Multiple #445.021 (Add New Entry without Asking) 445.021,.01 PRE-CONVERSION MIS (NO EDITS) 0;1 FREE TEXT INPUT TRANSFORM: D EN^DDIOL("THESE DATA MAY NOT BE TAMPERED WITH. FOR POSSIBLE USE IN UN-DOING A CONVERSION.") K X LAST EDITED: JUN 29, 1999 HELP-PROMPT: Field is non-editable. DESCRIPTION: This field is automatically populated when the option to 'Convert Secondary to Primary' [PRCP CONVERT SECONDARY] is run. It contains the MIS COSTING SECTIONS in the inventory point as it existed before conversion. The only time it would ever be referenced is in cases where users mistakenly convert an inventory point and need to 'undo' the conversion. DATA CONTAINED IN THIS FIELD ARE NEVER USED IN ANY TYPE OF PRODUCTION APPLICATION. EXECUTABLE HELP: D EN^DDIOL("Data may not be added, changed, or deleted.") DELETE TEST: 1,0)= D EN^DDIOL("DELETION IS NOT ALLOWED.") I 1 UNEDITABLE NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445.021^B 1)= S ^PRCP(445,DA(1),"SECMIS","B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(1),"SECMIS","B",$E(X,1,30),DA) 445,22 SS PROVIDER 5;1 POINTER TO AUTOMATED SUPPLY STATIONS FILE (#445.5) LAST EDITED: MAY 10, 2000 HELP-PROMPT: If this inventory point will be linked to an automated supply cabinet, please indicate the type of machine used. DESCRIPTION: When an automated supply station stocks items within an inventory point, this field contains a pointer to the machine used, allowing GIP to correctly build and transmit information to the automated supply station by referencing file 445.5. CROSS-REFERENCE: 445^AH^MUMPS 1)= N ITEM Q:'X I $P(^PRCP(445,DA,0),"^",3)="S" S ITEM=0 F S ITEM=$O(^PRCP(445,DA,1,ITEM)) Q:'+IT EM I $P($G(^PRCP(445,DA,1,ITEM,0)),"^",9)>0 S ^PRCP(445,"AH",ITEM,$E(X,1,30),DA)="" 2)= N ITEM S ITEM=0 F S ITEM=$O(^PRCP(445,DA,1,ITEM)) Q:'+ITEM K ^PRCP(445,"AH",ITEM,$E(X,1,30),D A) This cross reference lists all supply station items by supply station, allowing GIP to quickly access where items are kept and how many places the item is stored. CROSS-REFERENCE: 445^AI 1)= S ^PRCP(445,"AI",$E(X,1,30),DA)="" 2)= K ^PRCP(445,"AI",$E(X,1,30),DA) This cross reference easily identifies all inventory points linked to a supply station. 445,23 SS QUANTITY LAST TRANSMITTED 6;1 DATE INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:Y<1 X LAST EDITED: JUN 01, 2000 HELP-PROMPT: This field holds the date and time at which GIP last received a quantity on hand transaction for all items in the supply station. DESCRIPTION: This field will be updated by the receipt of a 'quantity on hand' message from the automated supply station. It will be referenced when users wish to print an exception report comparing the quantity of an item in GIP and in the automated supply station. 445,24 QUANTITY REPLACEMENT REQUESTOR 7;1 POINTER TO NEW PERSON FILE (#200) LAST EDITED: APR 16, 2001 DESCRIPTION: The name of the authorized person requesting that the on hand quantities in GIP be adjusted to the values reported in the next supply station transaction. 445,25 QUANTITY REPLACEMENT REQUESTED 7;2 DATE INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:Y<1 X LAST EDITED: JUN 01, 2001 DESCRIPTION: This is the Date/Time that an authorized person requested the on hand quantities in GIP be adjusted to the values reported in the next supply station transaction. 445,26 QUANTITY REPLACEMENT USER 8;0 POINTER Multiple #445.026 LAST EDITED: APR 25, 2001 DESCRIPTION: Users in this section are authorized to request on hand quantity replacement updates from the values stored in the associated supply stations. 445.026,.01 QUANTITY REPLACEMENT USER 0;1 POINTER TO NEW PERSON FILE (#200) (Multiply asked) AUTHORIZED REQUESTOR INPUT TRANSFORM: S DINUM=X D CHK^PRCPSSQA(D0,.X) K:X="" X LAST EDITED: APR 25, 2001 DESCRIPTION: Users in this field will be allowed to request GIP quantities to be replaced by a quantity transaction from the associated supply station. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445.026^B 1)= S ^PRCP(445,DA(1),8,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(1),8,"B",$E(X,1,30),DA) 445,27 ON-DEMAND USERS 9;0 POINTER Multiple #445.027 DESCRIPTION: This file will store the users designated by the application coordinator with the ability to modify an On-Demand Setting for any item in this inventory point. Because the On-Demand Setting applies only to items in the Primary and Secondary Inventory Points, this multiple will never be populated in the Warehouse. 445.027,.01 ON-DEMAND USER 0;1 POINTER TO NEW PERSON FILE (#200) INPUT TRANSFORM: S DINUM=X LAST EDITED: JUL 14, 2006 HELP-PROMPT: Enter the user who will be allowed to change the ON-DEMAND setting of inventory items. DESCRIPTION: This field will store the users who are able to change the On-Demand Setting for items in this inventory point. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 445.027^B 1)= S ^PRCP(445,DA(1),9,"B",$E(X,1,30),DA)="" 2)= K ^PRCP(445,DA(1),9,"B",$E(X,1,30),DA) FIELD INDEX: AJ (#711) REGULAR IR SORTING ONLY WHOLE FILE (#445) Short Descr: ODI Users Description: This cross reference will house all of the DUZ's of users who have On-Demand authority and the inventory point(s) on which each user has this authority. It was created to facilitate maintaining the On-Demand User multiple for all affected inventory points whenever a user's access is terminated. The file may also be used to quickly determine the specific inventory points on which any given user has the On-Demand authority. Set Logic: S ^PRCP(445,"AJ",X,DA(1),DA)="" Kill Logic: K ^PRCP(445,"AJ",X,DA(1),DA) Whole Kill: K ^PRCP(445,"AJ") X(1): ON-DEMAND USER (445.027,.01) (Subscr 1) (forwards) FILES POINTED TO FIELDS AUTOMATED SUPPLY STATIONS (#445.5) SS PROVIDER (#22) CONTROL POINT ACTIVITY (#410) OUTSTANDING REQUEST:TRANSACTION NO. (#.01) COST CENTER (#420.1) COST CENTER (#.9) GENERIC INVENTORY (#445) *PARAMETERS CAN BE EDITED BY (#13) PRE-CONVERSION STOCKED BY (#19.7) DISTRIBUTION POINT:DISTRIBUTION POINT (#.01) GROUP CATEGORY (#445.6) INVENTORY ITEM:GROUP CATEGORY CODE (#.5) ITEM MASTER (#441) INVENTORY ITEM:ITEM NO. (#.01) CASE CART/INSTRUMENT KIT ITEM:CASE CART/INSTRUMENT KIT ITEM (#.01) SUBSTITUTE ITEM(S):SUBSTITUTE ITEM(S) (#.01) NEW PERSON (#200) CONVERTED BY (#19.5) QUANTITY REPLACEMENT REQUESTOR (#24) QUANTITY REPLACEMENT USER:QUANTITY REPLACEMENT USER (#.01) ON-DEMAND USERS:ON-DEMAND USER (#.01) INVENTORY USER:INVENTORY USER (#.01) ON-DEMAND AUDIT:ON-DEMAND CHANGED BY (#1) SERVICE/SECTION (#49) MIS COSTING SECTION:MIS COSTING SECTION (#.01) STORAGE LOCATION (#445.4) INVENTORY ITEM:MAIN STORAGE LOCATION (#5) ADDITIONAL STORAGE LOCATION:ADDITIONAL STORAGE LOCATION (#.01) UNIT OF ISSUE (#420.5) INVENTORY ITEM:UNIT OF ISSUE (#4) PROCUREMENT SOURCE:UNIT OF RECEIPT (#1) OUTSTANDING REQUEST:UNIT OF RECEIPT (#2) INPUT TEMPLATE(S): PRCP INVENTORY POINT SEP 15, 1993@07:58 USER #0 PRCP INVENTORY POINT (NON SS) MAY 19, 2000@13:36 USER #0 PRCP INVENTORY POINT (SS) SEP 15, 2000@11:58 USER #0 PRCP ITEM ALL FIELDS JAN 04, 1994@19:04 USER #0 This template is used to ask all fields when adding new items to an inventory point. PRCP ITEM ALL FIELDS (NON-SS) SEP 13, 2000@09:53 USER #0 This template is used for inventory points non linked to a supply station to ask all fields when adding new items to an inventory point or selecting the AF protocol when editing. PRCP ITEM ALL FIELDS (SS) SEP 21, 2000@09:28 USER #0 PRCP LEVELS SEP 08, 1999@19:58 USER #0 PRINT TEMPLATE(S): PRCP REPORT:COMPREHENSIVE JUN 22, 2006@15:08 USER #0 COMPREHENSIVE ITEM REPORT This print template is used to print the Comprehensive Item Report. PRCP REPORT:DUEIN JAN 31, 1994@12:14 USER #0 DUE-IN REPORT This print template is used to print the Due-In Report. PRCP REPORT:EMERGENCY JAN 31, 1994@12:15 USER #0 EMERGENCY STOCK LEVEL REPORT This print template is used to print the Emergency Stock Report. PRCP REPORT:LAST SOURCE JUN 01, 1992@11:18 USER #0 LAST PROCUREMENT SOURCE This print template is used to print the Last Procurement Source For Item Report. PRCP REPORT:NSN JUN 01, 1992@11:20 USER #0 NATIONAL STOCK NUMBER REPORT This print template is used to print the National Stock Number Report. PRCP REPORT:POSTED STOCK JUN 01, 1992@11:28 USER #0 POSTED STOCK ONLY REPORT This print template is used to print the Posted Stock Items Report. SORT TEMPLATE(S): PRCP SORT:GROUP SEP 04, 1991@12:07 USER #0 SORT BY: ]INVENTORY POINT// WITHIN INVENTORY POINT, SORT BY: INVENTORY ITEM// INVENTORY ITEM SUB-FIELD: GROUP CATEGORY CODE// (User is asked range) WITHIN GROUP CATEGORY CODE, SORT BY: @INVENTORY ITEM// INVENTORY ITEM SUB-FIELD: ITEM DESCRIPTION// From '@' To 'z^' WITHIN ITEM DESCRIPTION, SORT BY: @INVENTORY ITEM// INVENTORY ITEM SUB-FIELD: X:$D(PRCPSORT) PRCPSORT// PRCP SORT:NSN SEP 04, 1991@12:09 USER #0 SORT BY: ]INVENTORY POINT// WITHIN INVENTORY POINT, SORT BY: INVENTORY ITEM// ITEM MASTER FIELD: NSN// INVENTORY ITEM SUB-FIELD: ITEM NO.:// (User is asked range) WITHIN ITEM NO.:, SORT BY: @INVENTORY ITEM// INVENTORY ITEM SUB-FIELD: X:$D(PRCPSORT) PRCPSORT// FORM(S)/BLOCK(S):