STANDARD DATA DICTIONARY #661.4 -- HCPCS INVENTORY FILE 9/29/25 PAGE 1
STORED IN ^RMPR(661.4, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds the re-order quantity for a given HCPCS item at a given LOCATION and STATION.
DD ACCESS: @
RD ACCESS:
WR ACCESS:
DEL ACCESS: @
LAYGO ACCESS:
AUDIT ACCESS: @
CROSS
REFERENCED BY: HCPCS(B), LOCATION(C)
INDEXED BY: STATION & LOCATION & HCPCS & HCPCS ITEM (ASLHI), STATION & HCPCS & HCPCS ITEM & LOCATION (XSHIL)
661.4,.01 HCPCS 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>20!($L(X)<5) X
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Answer must be 5-20 characters in length.
DESCRIPTION:
This is the HCPCS code
TECHNICAL DESCR:
This is a pointer field to the HCPC file (661.1)
CROSS-REFERENCE: 661.4^B
1)= S ^RMPR(661.4,"B",$E(X,1,30),DA)=""
2)= K ^RMPR(661.4,"B",$E(X,1,30),DA)
RECORD INDEXES: ASLHI (#20), XSHIL (#21)
661.4,2 HCPCS ITEM 0;2 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 08, 2001
HELP-PROMPT: Type a Number between 1 and 9999999999, 0 Decimal Digits
DESCRIPTION: This field is a pointer to the HCPCS ITEM sub-file (661.12) of the PROSTHETIC HCPCS file (661.1).
********* S I T E I N T E G R A T O R S B E W A R E ********* It is defined as free text as FM
does not allow sub-file pointers to be defined explicitly.
TECHNICAL DESCR: This field is a pointer to the HCPC Item sub-file (661.12). Although classified as free text any
application code responsible for maintaining this file must ensure that given a HCPC pointer in
661.1 the HCPC item correctly points to a node in the sub-file (661.12) beneath the HCPC pointer.
RECORD INDEXES: ASLHI (#20), XSHIL (#21)
661.4,3 STATION 0;3 POINTER TO INSTITUTION FILE (#4) (Required)
LAST EDITED: MAY 08, 2001
DESCRIPTION:
This field is a pointer to the INSTITUTION file (4).
RECORD INDEXES: ASLHI (#20), XSHIL (#21)
661.4,4 RE-ORDER QUANTITY 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1.N) X
LAST EDITED: JAN 16, 2001
HELP-PROMPT: Type a number between 0 and 999999999, 0 Decimal Digits
DESCRIPTION: This field is the re-order quantity for a HCPCS item at a Station and is used to drive reports
which alert sites to the need to re-order.
661.4,5 QUANTITY ON ORDER 0;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1.N) X
LAST EDITED: JAN 16, 2001
HELP-PROMPT: Type a number between 0 and 999999999, 0 Decimal Digits
DESCRIPTION: This field is the current quantity on order for a HCPCS Item at a Station. It is used to inform
sites that although a stock item might be below the proscribed re-order level, orders have been
placed to re-stock. A distinction should be made on low stock warning type reports between the
situation where the current on-hand quantity + on-order quantity is below the re-order level, and
that where it is not. This field will be updated for any receipt or order type transaction
recorded in the PROSTHETIC INVENTORY TRANSACTION file (661.6):- for receipt type transactions
subtract the receipt quantity, for order type transactions add the order quantity.
661.4,7 LOCATION 0;7 POINTER TO PROSTHETIC STOCK LOCATION FILE (#661.5) (Required)
LAST EDITED: MAR 20, 2002
DESCRIPTION:
This field is a pointer to the Prosthetic Stock Location file (661.5).
CROSS-REFERENCE: 661.4^C
1)= S ^RMPR(661.4,"C",$E(X,1,30),DA)=""
2)= K ^RMPR(661.4,"C",$E(X,1,30),DA)
RECORD INDEXES: ASLHI (#20), XSHIL (#21)
FILES POINTED TO FIELDS
INSTITUTION (#4) STATION (#3)
PROSTHETIC STOCK LOCATION
(#661.5) LOCATION (#7)
File #661.4
Record Indexes:
ASLHI (#20) RECORD REGULAR IR SORTING ONLY
Short Descr: Index by Station, Location, HCPCS, Item
Set Logic: S ^RMPR(661.4,"ASLHI",X(1),X(2),$E(X(3),1,30),X(4),DA)=""
Kill Logic: K ^RMPR(661.4,"ASLHI",X(1),X(2),$E(X(3),1,30),X(4),DA)
Whole Kill: K ^RMPR(661.4,"ASLHI")
X(1): STATION (661.4,3) (Subscr 1) (forwards)
X(2): LOCATION (661.4,7) (Subscr 2) (forwards)
X(3): HCPCS (661.4,.01) (Subscr 3) (Len 30) (forwards)
X(4): HCPCS ITEM (661.4,2) (Subscr 4) (forwards)
XSHIL (#21) RECORD REGULAR IR LOOKUP & SORTING
Short Descr: Index on STATION, HCPCS, HCPCS item, LOCATION fields.
Set Logic: S ^RMPR(661.4,"XSHIL",X(1),X(2),X(3),X(4),DA)=""
Kill Logic: K ^RMPR(661.4,"XSHIL",X(1),X(2),X(3),X(4),DA)
Whole Kill: K ^RMPR(661.4,"XSHIL")
X(1): STATION (661.4,3) (Subscr 1) (forwards)
X(2): HCPCS (661.4,.01) (Subscr 2) (forwards)
X(3): HCPCS ITEM (661.4,2) (Subscr 3) (forwards)
X(4): LOCATION (661.4,7) (Subscr 4) (forwards)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):