STANDARD DATA DICTIONARY #664.3 -- PROSTHETIC LAB HOURS DATE FILE                                                 3/24/25    PAGE 1
STORED IN ^RMPR(664.3,  *** 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 dates, rates, and hours of Lab Technicians that have fabricated, fitted or repaired a prosthetic
item/service.  


              DD ACCESS: @

CROSS
REFERENCED BY: DATE(B), APPLIANCE/REPAIR(C)



664.3,.01     DATE                   0;1 DATE (Required)

              INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JUN 02, 1994 
              HELP-PROMPT:      Enter the date that the service or labor was performed. 
              DESCRIPTION:
                                Date that the Technician(s) performed labor to provide item/service to the patient.  

              CROSS-REFERENCE:  664.3^B 
                                1)= S ^RMPR(664.3,"B",$E(X,1,30),DA)=""
                                2)= K ^RMPR(664.3,"B",$E(X,1,30),DA)


664.3,1       APPLIANCE/REPAIR       0;2 POINTER TO RECORD OF PROS APPLIANCE/REPAIR FILE (#660)

              LAST EDITED:      MAY 02, 1994 
              HELP-PROMPT:      Enter the date of the associated RECORD OF PROS APPLIANCE/REPAIR file (#660). 
              DESCRIPTION:      Appliance/Repair entry in file #660 associated with the labor costs from the VAF 10-2529-3 Job
                                Section.  

              CROSS-REFERENCE:  664.3^C 
                                1)= S ^RMPR(664.3,"C",$E(X,1,30),DA)=""
                                2)= K ^RMPR(664.3,"C",$E(X,1,30),DA)
                                X-ref used to lookup total labor Hours by Appliance/Repair.  



664.3,2       STATION                0;3 POINTER TO INSTITUTION FILE (#4)

              LAST EDITED:      APR 30, 1994 
              HELP-PROMPT:      Enter the Station Name or Station Number. 
              DESCRIPTION:      This field is a pointer to the INSTITUTION file (#4).  If a site is multidivisional, entries are
                                screened out by site number.  


664.3,3       TECHNICIAN             1;0 POINTER Multiple #664.33 (Add New Entry without Asking)

              DESCRIPTION:      This is the name(s) of the technician(s) who perform the work on the associated VAF 10-2529-3. 
                                This is a pointer to the NEW PERSON file (#200).  


664.33,.01      TECHNICIAN             0;1 POINTER TO NEW PERSON FILE (#200) (Multiply asked)

                LAST EDITED:      AUG 16, 1994 
                HELP-PROMPT:      Enter the name of the person (LASTNAME,FIRSTNAME) who performed the services or labor. 
                DESCRIPTION:      This is the name(s) of the technician(s) who perform the work on the associated VAF 10-2529-3. 
                                  Multiple technicians can work on one VAF 10-2529-3.  This is a pointer to the NEW PERSON file
                                  (#200).  

                CROSS-REFERENCE:  664.33^B 
                                  1)= S ^RMPR(664.3,DA(1),1,"B",$E(X,1,30),DA)=""
                                  2)= K ^RMPR(664.3,DA(1),1,"B",$E(X,1,30),DA)


664.33,1        HOURS                  0;2 FREE TEXT (Required)

                INPUT TRANSFORM:  D TRS^RMPRHL
                LAST EDITED:      MAY 26, 1994 
                HELP-PROMPT:      Enter the number of hours.  Example 1.25 would be 1 hour and 15 minutes, 1.75 would be 1 hour and 
                                  45 minutes, .5 would be 30 minutes. 
                DESCRIPTION:      This is the amount of time (hours) that a technician spends on work on an item.  The hours are
                                  used to calculate the labor cost for the associated VAF 10-2529-3.  
                                   
                                  The hours are to be entered as whole hours or in 15 minute increments using a decimal
                                  representation.  
                                   
                                  Example: 1.25 or 1.5 or 1.75 or 2 or .25 

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


664.33,2        RATE PER HOUR          0;3 NUMBER

                INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99)!(X<0) X
                LAST EDITED:      AUG 17, 1994 
                HELP-PROMPT:      Type a Dollar Amount between 0 and 99999.99, 2 Decimal Digits 




      FILES POINTED TO                      FIELDS

INSTITUTION (#4)                  STATION (#2)

NEW PERSON (#200)                 TECHNICIAN:TECHNICIAN (#.01)

RECORD OF PROS APPLIANCE/REPAI 
                   (#660)         APPLIANCE/REPAIR (#1)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):