Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^PRC(441

Package: IFCAP

Global: ^PRC(441


Information

FileMan FileNo FileMan Filename Package
441 ITEM MASTER IFCAP

Description

Directly Accessed By Routines, Total: 252

Package Total Routines
IFCAP 136 FCP    INVENTORY ITEM    ITEM    ITEM SPECIFIC INFORMATION    PRCH ITEM TXHIST    PRCH191    PRCH442    PRCHAM5
PRCHAMYA    PRCHAMYB    PRCHCLN    PRCHCON2    PRCHCRD    PRCHCRD1    PRCHCRD2    PRCHCRD3
PRCHCS    PRCHCS3    PRCHDEP2    PRCHE    PRCHEA    PRCHEA1    PRCHHI6    PRCHITEM
PRCHITEM2    PRCHITM    PRCHITM5    PRCHITX    PRCHITX1    PRCHL100    PRCHLO2    PRCHMA2
PRCHNPO7    PRCHNPO9    PRCHNPT    PRCHNREQ    PRCHP181    PRCHQ1    PRCHQ13A    PRCHQ1C
PRCHQ2A    PRCHRAT9    PRCHRPL    PRCHRPT1    PRCHRPT9    PRCHRPTX    PRCHSP1    PRCHT113
PRCHT19    PRCHT312    PRCHT38    PRCHUTL    PRCO441    PRCOE2    PRCOESE    PRCOINV
PRCOSS1    PRCOSS2    PRCOSS6    PRCOSSO    PRCP ITEM ALL FIELDS    PRCP REPORT:COMPREHENSIVE    PRCPAGP1    PRCPAGPR
PRCPAUTH    PRCPCRDC    PRCPCRDK    PRCPCSP1    PRCPDAP3    PRCPDAPI    PRCPE441    PRCPEILM
PRCPEIPS    PRCPEITF    PRCPEIUI    PRCPHL70    PRCPHLFM    PRCPHLP    PRCPHLPO    PRCPHLQ
PRCPHLQU    PRCPHLSO    PRCPHLUT    PRCPOPD    PRCPOPR    PRCPPOL1    PRCPPOLB    PRCPRAVL
PRCPRCOS    PRCPRIB0    PRCPRIT1    PRCPRLAS    PRCPRPIT    PRCPRPK1    PRCPRPK2    PRCPSFU0
PRCPSLOI    PRCPSLOR    PRCPSMB1    PRCPSMSD    PRCPSMST    PRCPU441    PRCPUMAN    PRCPUUIW
PRCPUX1    PRCPWDOR    PRCPWPL0    PRCPWPL1    PRCSD121    PRCSP121    PRCSP132    PRCSP133
PRCSP2    PRCSRI    PRCSRIE    PRCSRIE1    PRCSRIG2    PRCSRIP    PRCST12    ^PRC(441
PRCPWIU    PRCSD123    PRCSES1    PRCSP124    PRCSP1A    PRCSP2N    PRCST22    PRCSUT4
PRCVIBF    PRCVIMF    PRCVIT    PRCVITMU    PRCVRC2    PURCHASE ORDER    SYNONYM    VENDOR
Prosthetics 65 BILLING ITEM    HO LETTER 3 LIST    HOME OXYGEN ITEM    ITEM    MATERIALS USED    PSC ISSUE CARD    RMPOBIL4    RMPOLET0
RMPOLZA    RMPOPAT1    RMPOPS23    RMPOPST0    RMPORLP    RMPORNQ    RMPORPD    RMPORPT
RMPOVDC    RMPR PRINT ITEM    RMPR21A    RMPR29LD    RMPR29LP    RMPR29U    RMPR31U    RMPR37A
RMPR421A    RMPR4D1    RMPR4E21    RMPR4LI    RMPR4LOP    RMPR4OPN    RMPR4UTL    RMPR9S7
RMPRBIL    RMPRD1    RMPRL22    RMPRL9    RMPRLI    RMPRLOP    RMPRN63    RMPRN6PL
RMPRN73    RMPRN7PL    RMPROPN    RMPROPN1    RMPRP55    RMPRPAT1    RMPRPAT7    RMPRPCEL
RMPRPCER    RMPRPIYK    RMPRPRT1    RMPRPSC    RMPRRET1    RMPRRET9    RMPRSE1    RMPRSE2
RMPRSE21    RMPRSEA    RMPRSP6    RMPRSP7    RMPRST2    RMPRSTK    RMPRSTL    RMPRU99
RMPRUTIL    
Drug Accountability 21 PRIMARY INVENTORY POINT(S)    PSACON    PSACON1    PSACON2    PSADRI    PSADRIH    PSADRIP    PSAENTO
PSALFA    PSALFM    PSALFS    PSALNA    PSALND    PSALNM    PSALOG2    PSANAC
PSANDC    PSARIN    PSATI    PSAUNI    PSAUTL    
Integrated Billing 4 IBTRE20    ^IBE(399.6    IB20P389    ^IBAT(351.61    
Controlled Substances 3 PSDREC1    PSDREC3    PSDREC4    
Real Time Location System 3 VIAAIMUP    VIAAIPDE    VIAASQH    
Pharmacy Data Management 1 PSSAUTL    

Accessed By FileMan Db Calls, Total: 33

Package Total Routines
IFCAP 30 PRC51198    PRCHDRG    PRCHE    PRCHEA    PRCHEA1    PRCHFGRP    PRCHITM    PRCHITM5
PRCHJS02    PRCHL4    PRCHL6    PRCHRPT    PRCHRPT1    PRCHRPTX    PRCHSP1    PRCPCSP1
PRCPE441    PRCPOPP1    PRCPUITM    PRCSES1    PRCSP1A    PRCSRIE    PRCSRIE1    PRCV442A
PRCV442B    PRCVIBF    PRCVLIC    PRCVRC2    PRCVTAP    PRCVTCA    
Drug Accountability 1 PSACON2    
Pharmacy Data Management 1 PSS50F    
Prosthetics 1 RMPRPIU0    

Pointed To By FileMan Files, Total: 17

Package Total FileMan Files
IFCAP 14 ITEM MASTER(#441)[16.5]    PROCUREMENT & ACCOUNTING TRANSACTIONS(#442)[#442.01(1.5)]    AMENDMENTS(#443.6)[#443.61(1.5)]    REQUEST FOR QUOTATION(#444)[#444.019(1)]    GENERIC INVENTORY(#445)[#445.01(.01), #445.121(.01), #445.122(.01)]
INVENTORY BALANCES(#445.1)[#445.11(.01)]    INVENTORY TRANSACTION(#445.2)[4]    INTERNAL DISTRIBUTION ORDER/ADJ.(#445.3)[#445.37(.01)]    CASE CARTS(#445.7)[.01, #445.71(.01)]    INSTRUMENT KITS(#445.8)[.01, #445.81(.01)]    INVENTORY DISTRIBUTED PATIENT SUPPLIES(#446.1)[#446.11(.01)]    AUTOMATED SUPPLY STATION PROCESSING QUEUE(#447.1)[#447.17(.01)]    REPETITIVE ITEM LIST(#410.3)[#410.31(.01)]    DYNAMED IFCAP INTERFACE AUDIT(#414.02)[1]    
Dietetics 1 INGREDIENT(#113)[31]    
Pharmacy Data Management 1 DRUG(#50)[#50.0441(.01)]    
Prosthetics 1 PROS ITEM MASTER(#661)[.01]    

Pointer To FileMan Files, Total: 11

Package Total FileMan Files
IFCAP 10 VENDOR(#440)[9, 10, #441.01(.01), #441.03(3)]    MANUFACTURER(#440.4)[25]    SOURCE MFG/STOCK NUMBER(#440.45)[19.1, #441.01(3.1)]    ITEM MASTER(#441)[16.5]    FEDERAL SUPPLY CLASSIFICATION(#441.2)[2]    PROCUREMENT & ACCOUNTING TRANSACTIONS(#442)[#441.04(.01)]    SIC CODE(#444.2)[24]    BUDGET OBJECT CODE(#420.2)[12, #441.03(2)]    UNIT OF ISSUE(#420.5)[21, #441.01(1.5)]    GENERIC INVENTORY(#445)[13]    
Kernel 1 NEW PERSON(#200)[15, 18]    

Fields, Total: 35

Field # Name Loc Type Details
.01 NUMBER 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  D TRANS^PRCVITMU I $D(X) S DINUM=X
  • LAST EDITED:  JUN 19, 2012
  • HELP-PROMPT:  Enter 'NEW' for the next available number or enter value less than 20000000.
  • DESCRIPTION:  
    This is the item number. Values 20000000 and higher are reserved for the National Formulary and created by the NIF/IFCAP interface.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  441^B
    1)= S ^PRC(441,"B",$E(X,1,30),DA)=""
    2)= K ^PRC(441,"B",$E(X,1,30),DA)
  • FIELD INDEX:  AFREE (#601) MUMPS IR ACTION
    Short Descr: KEEPS TRACK OF "FREE RANGES"
    Description: This cross-reference is used to keep track of ranges of unused item numbers. Each entry in the index corresponds to a free range.
    Set Logic: D SET^PRCVITMU
    Kill Logic: D KILL^PRCVITMU
    Whole Kill: K ^PRC(441,"AFREE") S ^PRC(441,"AFREE",1,999999)=""
    X(1): NUMBER (441,.01) (Len 30) (forwards)
.05 SHORT DESCRIPTION 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>60!($L(X)<3)!'(X?.UNP)!($E(X,1,3)="NEW") X
  • LAST EDITED:  JUL 29, 1993
  • HELP-PROMPT:  ANSWER MUST BE 3-60 UPPER CASE CHARACTERS OR NUMERICS IN LENGTH, CANNOT BEGIN WITH THE LETTERS 'NEW'
  • DESCRIPTION:  
    This is the short description of the item.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  441^C
    1)= S ^PRC(441,"C",$E(X,1,60),DA)=""
    2)= K ^PRC(441,"C",$E(X,1,60),DA)
    This X-REF contains the name of the ITEM MASTER file entry in the SHORT DESCRIPTION field.
  • CROSS-REFERENCE:  441^AC^MUMPS
    1)= I '$D(DIU(0)),$E(X,1,2)'="**" S:$D(DT) $P(^PRC(441,DA,0),U,9)=DT S:$D(DUZ) $P(^(0),U,11)=DUZ
    2)= Q
    This X-REF will SET the DATE INACTIVATED and the INACTIVATED BY fields when the first two characters of the SHORT DECSRIPTION field are '**'.
.06 CASE CART/TRAY/INSTRUMENT KIT 0;6 SET
  • 'P' FOR PURCHASEABLE;
  • 'S' FOR CASE CART/TRAY/INSTRUMENT KIT;

  • LAST EDITED:  FEB 09, 1994
  • HELP-PROMPT:  This field indicates whether an item is a case cart or instrument kit. Case carts and instrument kits should only be purchased from outside the hospital.
  • DESCRIPTION:  This field indicates whether an item is a case cart or instrument kit. Case cart and instrument kits should not be purchased from outside of the hospital. This is the purchaseable item indicator. 'P' stands for items
    purchased outside the hospital. 'S' stands for a set/pack assembled in hospital from purchased items.
.08 SYNONYM 5;0 Multiple #441.05 441.05
.1 DESCRIPTION 1;0 WORD-PROCESSING #441.02

  • DESCRIPTION:  
    This is the description of the item.
  • LAST EDITED:  MAR 15, 1985
  • DESCRIPTION:  
    Description of Item
1 FCP 4;0 Multiple #441.03 441.03

  • DESCRIPTION:  
    This is the fund control point.
  • TECHNICAL DESCR:  This field is set up within CHK^PRCHCRD, which is called from EN3^ PRCHCRD. EN3^PRCHCRD is called from the REPETITIVE (PR CARD) NO. 'AD' x-ref SET statement in the ITEM multiple in file 442.
    When an amendment is obligated the FCP should already be established. If that is so then the action done within CHK^PRCHCRD shouldn't be needed then.
    CHK^PRCHCRD sees if the 4 node is set up. If it isn't the subroutine sets it up. The .01 field, FCP, is entered, The 'B' x-ref is entered and the 0 node of the subfile is updated. Maby FILE^DICN could do all this work
    without the programmer having to play FileMan?
2 FSC 0;3 POINTER TO FEDERAL SUPPLY CLASSIFICATION FILE (#441.2)
************************REQUIRED FIELD************************
FEDERAL SUPPLY CLASSIFICATION(#441.2)

  • INPUT TRANSFORM:  K:$L(X)>4!('X?4N) X
  • LAST EDITED:  AUG 09, 2005
  • HELP-PROMPT:  Enter only a 4-digit Federal Supply Classification code.
  • DESCRIPTION:  
    This is the federal supply classification.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
3 INC 0;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<1) X
  • LAST EDITED:  AUG 05, 1991
  • HELP-PROMPT:  Enter the Item Name Code (INC). Answer must be 1-6 characters in length.
  • DESCRIPTION:  
    This field lists the Item Name Code for this item.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
5 NSN 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>17!(X'?4N1"-"2UN1"-"3UN1"-"4N.A) X I $D(X) D EN1^PRCHNPT
  • LAST EDITED:  OCT 18, 1996
  • HELP-PROMPT:  ENTER THE NSN IN THE FOLLOWING FORMAT: 6505-01-A23-1234A. The 2nd & 3rd segment of NSN can accept alpha or numeric characters. ex 6505-AB-11G-1234
  • DESCRIPTION:  
    This is the National Stock Number for the item.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  441^BB
    1)= S ^PRC(441,"BB",$E(X,1,30),DA)=""
    2)= K ^PRC(441,"BB",$E(X,1,30),DA)
    This X-REF lists all NATIONAL STOCK NUMBERS in this ITEM MASTER file.
  • CROSS-REFERENCE:  441^BA^MUMPS
    1)= S ^PRC(441,"BA",$P(X,"-",3,4),DA)=""
    2)= K ^PRC(441,"BA",$P(X,"-",3,4),DA)
    This X-REF is used to create a speedy lookup on the NSN using only the last 7 numbers.
  • CROSS-REFERENCE:  441^G^MUMPS
    1)= S ^PRC(441,"G",$E(X,4)_$P(X,"-",2)_$P(X,"-",3)_$P(X,"-",4),DA)=""
    2)= K ^PRC(441,"G",$E(X,4)_$P(X,"-",2)_$P(X,"-",3)_$P(X,"-",4),DA)
    This X-REF is used as a speedy lookup using the last 10 characters, without any '-' being entered in the number.
5.5 NSN VERIFIED 3;6 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 01, 1991
  • HELP-PROMPT:  Enter the date that the National Stock Number was verified.
  • DESCRIPTION:  
    The date that the National Stock Number was verified.
6 VENDOR 2;0 POINTER Multiple #441.01 441.01

  • DESCRIPTION:  
    This is the vendor for the item.
  • IDENTIFIED BY:  UNIT OF PURCHASE(#1.5)[R]
7 HAZARDOUS MATERIAL 0;14 SET
  • 'HM' FOR HAZARDOUS MATERIAL;

  • LAST EDITED:  APR 26, 1996
  • HELP-PROMPT:  Select HM if this material is hazardous.
  • DESCRIPTION:  
    This is a flag to state if this ITEM is hazardous.
  • TECHNICAL DESCR:  This field will be coppied into file 442, ITEM multiple, whenever the pointer to this file is set within the ITEM multiple. If the user enters a value into the field in file 442, within the ITEM multiple, the value will
    be coppied into this field.
9 LAST VENDOR ORDERED 0;4 POINTER TO VENDOR FILE (#440) VENDOR(#440)

  • LAST EDITED:  APR 14, 1986
  • DESCRIPTION:  
    This is the last vendor ordered.
10 MANDATORY SOURCE 0;8 POINTER TO VENDOR FILE (#440) VENDOR(#440)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^PRC(441,DA,2,Y,0))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 14, 1986
  • DESCRIPTION:  
    This is the mandatory source for an item.
  • SCREEN:  S DIC("S")="I $D(^PRC(441,DA,2,Y,0))"
  • EXPLANATION:  Vendor must exist in the list of possible vendors within this item.
12 BOC 0;10 POINTER TO BUDGET OBJECT CODE FILE (#420.2) BUDGET OBJECT CODE(#420.2)

  • LAST EDITED:  JUN 16, 1994
  • HELP-PROMPT:  Choose the appropriate BOC for this item.
  • DESCRIPTION:  
    This is the BOC for this item.
13 SET/PACK ASSEMBLED BY 0;7 POINTER TO GENERIC INVENTORY FILE (#445) GENERIC INVENTORY(#445)

  • LAST EDITED:  JAN 05, 1988
  • HELP-PROMPT:  If this item is a set/pack, enter the name of the inventory point that assembles this set/pack.
  • DESCRIPTION:  When a Set/Pack type item is added to this file (by the Generic Inventory Package), the Inventory point that added the item is stuffed into this field by the program. It is then used as a screen to keep other inventory
    points from changing the data associated with the item.
14 DATE ITEM CREATED 0;9 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 09, 1989
  • HELP-PROMPT:  Date the Item 'SHORT DESCRIPTION' field was either first created, or changed.
  • DESCRIPTION:  
    This is the date the item was created.
15 CREATED BY 0;11 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 21, 1992
  • HELP-PROMPT:  Name of person who added item to the file.
  • DESCRIPTION:  
    This is the person who created the item.
16 INACTIVATED ITEM? 3;1 SET
  • '1' FOR INACTIVATED;

  • LAST EDITED:  JUL 29, 1993
  • HELP-PROMPT:  Set to '1' by option to inactivate an item.
  • DESCRIPTION:  
    This is the set of codes for an inactivated item. This field is set to '1' by option to inactivate an item.
  • CROSS-REFERENCE:  441^AD^MUMPS
    1)= I '$D(DIU(0)) S:$D(DT) $P(^PRC(441,DA,3),U,2)=DT S:$D(DUZ) $P(^PRC(441,DA,3),U,3)=DUZ
    2)= I '$D(DIU(0)) S $P(^PRC(441,DA,3),U,2,3)="^"
    This X-REF will SET the DATE INACTIVATED and the INACTIVATED BY fields when an ITEM MASTER file entry is chosen to be inactivated. Both fields will be cleared when the X-REF is KILLED.
16.5 REPLACEMENT ITEM 3;4 POINTER TO ITEM MASTER FILE (#441) ITEM MASTER(#441)

  • LAST EDITED:  MAR 09, 1989
  • HELP-PROMPT:  Item to be used in place of the inactivated item.
  • DESCRIPTION:  
    This is the replacement item for an inactivated item.
17 DATE INACTIVATED 3;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 09, 1989
  • DESCRIPTION:  
    This is the date the item was inactivated.
18 INACTIVATED BY 3;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 21, 1992
  • DESCRIPTION:  
    This is the person who inactivated the item.
19 MFG PART NO. 3;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  AUG 01, 1991
  • HELP-PROMPT:  Enter the Manufacturer's Part #. Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This is the Manufacturer's Part Number (#).
19.1 SOURCE MFG PART NO. 3;13 POINTER TO SOURCE MFG/STOCK NUMBER FILE (#440.45) SOURCE MFG/STOCK NUMBER(#440.45)

  • INPUT TRANSFORM:  S DIC("S")="I '$P($G(^(0)),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 03, 2017
  • HELP-PROMPT:  Select source of MFG PART NO. from the reference list.
  • DESCRIPTION:  
    This field indicates from where the editor determined the manufacturer's part number for this product.
  • SCREEN:  S DIC("S")="I '$P($G(^(0)),U,3)"
  • EXPLANATION:  Screen to prevent selection of inactive entries.
20 FOOD GROUP 3;7 SET
************************REQUIRED FIELD************************
  • '1' FOR Meat, Fish, Poultry, Eggs & Convenience Entrees;
  • '2' FOR Milk, Milk Products;
  • '3' FOR Fruits, Vegetables;
  • '4' FOR Bread, Flour, Cereal, etc.;
  • '5' FOR Commercial Nutritional Products, Tube feedings & supplements;
  • '6' FOR Miscellaneous, Foods;

  • LAST EDITED:  AUG 19, 1992
  • HELP-PROMPT:  This is the catalog food group returned from ISMS by a catalog request.
  • DESCRIPTION:  
    This is the catalog food group returned from ISMS by a catalog request.
21 SKU 3;8 POINTER TO UNIT OF ISSUE FILE (#420.5) UNIT OF ISSUE(#420.5)

  • LAST EDITED:  AUG 01, 1991
  • HELP-PROMPT:  Enter the Stock Keeping Unit of Measure.
  • DESCRIPTION:  
    This is the Stock Keeping Unit of Measure.
22 DRUG TYPE CODE 3;9 SET
************************REQUIRED FIELD************************
  • 'A' FOR NARCOTIC;
  • 'L' FOR CONTROLLED SUBSTANCE;
  • 'D' FOR OTHER DRUGS;

  • LAST EDITED:  FEB 27, 1992
  • DESCRIPTION:  
    This is the set of drug type codes (Narcotic, Controlled substance, or Other) which will appear on the LOG code sheet.
23 REUSABLE ITEM 0;13 SET
  • 'y' FOR YES;

  • LAST EDITED:  SEP 17, 1993
  • DESCRIPTION:  This field is used for case carts/instrument kits. If an item is a reusable item (field set to YES), the item will not be charged to the inventory point during the ordering and posting process. Also, reusable items will
    not increment/decrement the quantity on-hand when assembling or disassembling case carts or instrument kits.
    If the field is not set to YES, the item is treated as a disposable item.
  • TECHNICAL DESCR:  
    This field is referenced by the case cart/instrument inventory system.
24 SIC CODE 3;10 POINTER TO SIC CODE FILE (#444.2) SIC CODE(#444.2)

  • LAST EDITED:  JAN 31, 1996
  • HELP-PROMPT:  Enter the 4-6 digits Standard Industrial Classification Code
  • DESCRIPTION:  The Standard Industrial Classification coding system categorizes organizations by type of economic activity. The SIC code is used in the Request for Quotation (RFQ) module to direct requests to the appropriate group of
    potential vendors.
25 MANUFACTURER 3;12 POINTER TO MANUFACTURER FILE (#440.4) MANUFACTURER(#440.4)

  • INPUT TRANSFORM:  S DIC("S")="I '$P($G(^(0)),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 06, 2017
  • HELP-PROMPT:  Enter the name of the manufacturer of this product.
  • DESCRIPTION:  
    This field links the item to the company that manufactured it.
  • SCREEN:  S DIC("S")="I '$P($G(^(0)),U,2)"
  • EXPLANATION:  This prevents the selection of inactive entries.
50 PRE_NIF LONG DESCRIPTION 8;0 WORD-PROCESSING #441.06

  • DESCRIPTION:  This field stores the value of the DESCRIPTION field (#.1) prior to the overwriting of that field's value with the value from the National Item File (NIF) database. This field MUST NOT be edited. It is for historical
    record only.
  • LAST EDITED:  SEP 08, 2004
  • HELP-PROMPT:  Do not edit this field. It is populated by the NIF/IFCAP interface.
  • DESCRIPTION:  This field stores the value of the DESCRIPTION field (#.1) prior to the overwriting of that field's value with the value from the National Item File (NIF) database. This field MUST NOT be edited. It is for historical
    record only.
51 NIF ITEM NUMBER 0;15 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 08, 2004
  • HELP-PROMPT:  Type a Number between 1 and 99999999, 0 Decimal Digits
  • DESCRIPTION:  
    This is the Item Number assigned to this item in the National Item File (NIF). This field is populated by a feed from the NIF and its edit is restricted to only highly privileged users.
  • CROSS-REFERENCE:  441^I
    1)= S ^PRC(441,"I",$E(X,1,30),DA)=""
    2)= K ^PRC(441,"I",$E(X,1,30),DA)
    This cross reference enables lookup by the National Item File's Item Number.
52 PRE_NIF SHORT DESCRIPTION 9;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<3) X
  • LAST EDITED:  SEP 08, 2004
  • HELP-PROMPT:  Do not edit this field. It is populated by the NIF/IFCAP interface.
  • DESCRIPTION:  This field stores the value of the SHORT DESCRIPTION field (#.05) prior to that field's overwrite with the value of the Brief Item Description from the National Item File (NIF). This field must not be edited. It is for
    historical record only.
53 DATE UPDATED BY NIF 3;11 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 31, 2017
  • HELP-PROMPT:  Date when the NIF/IFCAP interface filed the update in IFCAP.
  • DESCRIPTION:  
    Do Not Edit - This field is populated when this item is created or updated by the NIF/IFCAP interface and should not be interactively edited.
54 NIF UPDATE DATE 3;14 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 31, 2017
  • HELP-PROMPT:  Enter the date when the update was filed in the NIF.
  • DESCRIPTION:  
    Do Not Edit - This field is populated by the enhanced NIF/IFCAP Item Master file interface. It is the date that the item entry was most recently edited in the NIF.

ICR, Total: 5

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #610
  • Prosthetics
    		•
    ICR #801
  • Prosthetics
  • M DATA EXTRACTOR
    		•
    ICR #2278
  • Spinal Cord Dysfunction
    		•  SHORT DESCRIPTION (.05).
    Access: Direct Global Read & w/Fileman

    		 $Order() through the "C" cross reference on the SHORTDESCRIPTION (#.05) field.
    ICR #5159
  • Integrated Billing
    		•  SHORT DESCRIPTION (.05).
    Access: Direct Global Read & w/Fileman

    DATE ITEM CREATED (14).
    Access: Direct Global Read & w/Fileman

    PRE_NIF SHORT DESCRIPTION (52).
    Access: Direct Global Read & w/Fileman
    ICR #6531
  • ABOVE PAR
  • ADVANCED PROSTHETICS ACQUISITION TOOL
    		•  NUMBER (.01).
    Access: Both R/W w/Fileman

    SHORT DESCRIPTION (.05).
    Access: Both R/W w/Fileman

    FSC (2).
    Access: Both R/W w/Fileman

    LAST VENDOR ORDERED (9).
    Access: Both R/W w/Fileman

    NSN (5).
    Access: Both R/W w/Fileman

    CASE CART/TRAY/INSTRUMENT KIT (.06).
    Access: Both R/W w/Fileman

    SET/PACK ASSEMBLED BY (13).
    Access: Both R/W w/Fileman

    MANDATORY SOURCE (10).
    Access: Both R/W w/Fileman

    DATE ITEM CREATED (14).
    Access: Read w/Fileman

    BOC (12).
    Access: Both R/W w/Fileman

    CREATED BY (15).
    Access: Read w/Fileman

    INC (3).
    Access: Both R/W w/Fileman

    REUSABLE ITEM (23).
    Access: Both R/W w/Fileman

    HAZARDOUS MATERIAL (7).
    Access: Both R/W w/Fileman

    NIF ITEM NUMBER (51).
    Access: Read w/Fileman

    DESCRIPTION (.01).
    Access: Both R/W w/Fileman

    VENDOR (.01).
    Access: Both R/W w/Fileman

    UNIT COST (1).
    Access: Both R/W w/Fileman

    CONTRACT (2).
    Access: Both R/W w/Fileman

    VENDOR STOCK # (3).
    Access: Both R/W w/Fileman

    NDC (4).
    Access: Both R/W w/Fileman

    DATE OF UNIT PRICE (2.5).
    Access: Read w/Fileman

    UNIT OF PURCHASE (1.5).
    Access: Both R/W w/Fileman

    PACKAGING MULTIPLE (1.6).
    Access: Both R/W w/Fileman

    MAXIMUM ORDER QTY (8.5).
    Access: Both R/W w/Fileman

    UNIT CONVERSION FACTOR (10).
    Access: Both R/W w/Fileman

    REQUIRED ORDER MULTIPLE (9).
    Access: Both R/W w/Fileman

    MINIMUM ORDER QTY (8).
    Access: Both R/W w/Fileman

    INACTIVATED ITEM? (16).
    Access: Both R/W w/Fileman

    DATE INACTIVATED (17).
    Access: Read w/Fileman

    INACTIVATED BY (18).
    Access: Read w/Fileman

    REPLACEMENT ITEM (16.5).
    Access: Both R/W w/Fileman

    MFG PART NO (19).
    Access: Both R/W w/Fileman

    NSN VERIFIED (5.5).
    Access: Both R/W w/Fileman

    FOOD GROUP (20).
    Access: Both R/W w/Fileman

    SKU (21).
    Access: Both R/W w/Fileman

    DRUG TYPE CODE (22).
    Access: Both R/W w/Fileman

    SIC CODE (24).
    Access: Both R/W w/Fileman

    MANUFACTURER (25).
    Access: Read w/Fileman

    FCP (.01).
    Access: Both R/W w/Fileman

    SUBACCOUNT (2).
    Access: Both R/W w/Fileman

    PREFERRED VENDOR (3).
    Access: Both R/W w/Fileman

    PURCHASE ORDER (.01).
    Access: Both R/W w/Fileman

    SYNONYM (.01).
    Access: Both R/W w/Fileman

    PRE_NIF LONG DESCRIPTION (.01).
    Access: Read w/Fileman

    PRE_NIF SHORT DESCRIPTION (52).
    Access: Read w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT 5.5+1, 14+1, 17+1, 53+1, 54+1
    ^DIC 10+1, 19.1+1, 25+1
    EN1^PRCHNPT 5+1
    KILL^PRCVITMU IXAFREEKL+1
    SET^PRCVITMU IXAFREESL+1
    TRANS^PRCVITMU .01+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PRC(441 - [#441] IXAFREEKEIC+1!*, .01(XREF 1S), .01(XREF 1K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), 5(XREF 1S), 5(XREF 1K), 5(XREF 2S), 5(XREF 2K)
    , 5(XREF 3S), 5(XREF 3K), 16(XREF 1S), 16(XREF 1K), 51(XREF 1S), 51(XREF 1K)
    ^PRCD(420.5 - [#420.5] IDZ1+1

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID.05+1, IDZ+1, IDZ1+1, .05(XREF 2S)
    ^(2 IDZ1+1
    ^(3 IDZ0+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 5.5+1*, 14+1*, 17+1*, 53+1*, 54+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), 5(XREF 1S), 5(XREF 1K), 5(XREF 2S), 5(XREF 2K), 5(XREF 3S)
    , 5(XREF 3K), 16(XREF 1S), 16(XREF 1K), 51(XREF 1S), 51(XREF 1K)
    DIC IDZ2+1, 10+1!*, 19.1+1!*, 25+1!*
    DIC("S" 10+1*, 10SCR+1*, 19.1+1*, 19.1SCR+1*, 25+1*, 25SCR+1*
    >> DIE 10+1, 19.1+1, 25+1
    >> DINUM .01+1*
    >> DIU(0 .05(XREF 2S), 16(XREF 1S), 16(XREF 1K)
    DT .05(XREF 2S), 16(XREF 1S)
    DUZ .05(XREF 2S), 16(XREF 1S)
    >> PRCSV IDZ1+1
    U ID.05+1, IDZ+1, IDZ0+1, IDZ1+1, .05(XREF 2S), 16(XREF 1S), 16(XREF 1K)
    X .01+1, .01(XREF 1S), .01(XREF 1K), .05+1!, .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), 2+1!, 3+1!, 5+1!
    , 5(XREF 1S), 5(XREF 1K), 5(XREF 2S), 5(XREF 2K), 5(XREF 3S), 5(XREF 3K), 5.5+1*!, 10+1*!, 14+1*!, 17+1*!
    , 19+1!, 19.1+1*!, 25+1*!, 51+1!, 51(XREF 1S), 51(XREF 1K), 52+1!, 53+1*!, 54+1*!
    >> Y 5.5+1, 10+1, 14+1, 17+1, 19.1+1, 25+1, 53+1, 54+1
    Z IDZ1+1*!
    Z9 IDZ0+1*, IDZ1+1, IDZ2+1!
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All