STANDARD DATA DICTIONARY #669.1 -- PROSTHETIC LAB W.O # FILE 9/29/25 PAGE 1
STORED IN ^RMPR(669.1, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file will contain the current work order number for the VAF 10-2529-3 that has been initiated and send to the local Prosthetic
Lab. VAF 10-2529-3s that are sent to a remote procurment source will not have work order numbers.
DD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
CROSS
REFERENCED BY: NAME(B)
669.1,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: JAN 24, 1996
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION:
This field contains the station, year and quarter part of Lab Work order numbers.
CROSS-REFERENCE: 669.1^B
1)= S ^RMPR(669.1,"B",$E(X,1,30),DA)=""
2)= K ^RMPR(669.1,"B",$E(X,1,30),DA)
669.1,1 LAST NUMBER USED 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: NOV 12, 1993
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION: This field contains the last number used with the associated shation, year and quarter. This is
updated when a new work order number is generated for the associated station, year, and quarter.
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):