STANDARD DATA DICTIONARY #664.4 -- PROS LABORATORY/RESTORATIONS WORKSHEET FILE                                    6/27/25    PAGE 1
STORED IN ^RMPRA(664.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 will hold an entry for each time the Lab AMIS is generated.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

CROSS
REFERENCED BY: DATE RECEIVED(B), AMIS STATION(C), AMIS CODE(D)



664.4,.01     DATE RECEIVED          0;1 DATE (Required)

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Enter the Date the Request was Received. 
              DESCRIPTION:
                                This field holds the Date Received information that  is pulled onto the AMIS code sheet.  

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


664.4,1       WORK ORDER NUMBER      0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                This field holds the Work Order Number that will be pulled onto the AMIS Codesheet.  


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

              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Enter the Station Name were the request originated. 
              DESCRIPTION:
                                This field holds the Ordering Station information that will be pulled onto the AMIS codesheet.  


664.4,3       NUMBER ITEMS COMPLETED 0;4 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This field holds the Number of Items Completed that will be pulled onto the AMIS codesheet.  


664.4,4       SC PATIENTS SERVED     0;5 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the SC Patients Served that will be pulled onto the AMIS Codesheet.  


664.4,5       NSC PATIENTS SERVED    0;6 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This field holds the NSC Patients Served data that will be pulled onto the AMIS Codesheet.  


664.4,6       MATERIAL COST          0;7 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits 
              DESCRIPTION:
                                This field contains the Material Cost that will be pulled onto the AMIS Codesheet.  


664.4,7       LABOR HOURS            0;8 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the Labor Hours that will be pulled into the AMIS Codesheet.  


664.4,8       LABOR MINUTES          0;9 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the Labor Minutes that will be pulled into the AMIS Codesheet.  


664.4,9       TOTAL LABOR COST       0;10 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits 
              DESCRIPTION:
                                This field contains the Total Labor Cost that will be pulled into the AMIS Codesheet.  


664.4,10      BACKLOG NUMBER ITEMS   0;11 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the Backlog Number Items that will be pulleded into the AMIS Codesheet.  


664.4,11      BACKLOG LABOR HOURS    0;12 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the Backlog Labor Hours that will be pulled into the AMIS Codesheet.  


664.4,12      BACKLOG LABOR MINUTES  0;13 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the Backlog Labor Minutes that will be pulled into the AMIS Codesheet.  


664.4,13      COST CHARGED           0;14 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits 
              DESCRIPTION:
                                This field contains the Cost Charged that will be pulled into the AMIS Codesheet.  


664.4,14      AMIS STATION           0;15 POINTER TO INSTITUTION FILE (#4)

              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Contains Station that is calculating Amis. 
              DESCRIPTION:
                                This field contains the AMIS Station that will be pulled into the AMIS Codesheet.  

              CROSS-REFERENCE:  664.4^C 
                                1)= S ^RMPRA(664.4,"C",$E(X,1,30),DA)=""
                                2)= K ^RMPRA(664.4,"C",$E(X,1,30),DA)
                                Used to Locate Station that has currenlty run Amis to allow Mutli Divisional Site the ability to
                                run their own Amis.  



664.4,15      SEGMENT NUMBER         0;16 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>5!($L(X)<3) X
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Answer must be 3-5 characters in length. 
              DESCRIPTION:
                                This field contains the Segment Number that will be pulled into the AMIS Codesheet.  


664.4,16      AMIS CODE              0;17 POINTER TO PROS AMIS CODES FILE (#663)

              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Enter the Correct Amis code for this item. 
              DESCRIPTION:
                                This field contains the actual AMIS Code that will be pulled onto the AMIS Codesheet.  

              CROSS-REFERENCE:  664.4^D 
                                1)= S ^RMPRA(664.4,"D",$E(X,1,30),DA)=""
                                2)= K ^RMPRA(664.4,"D",$E(X,1,30),DA)
                                Used to Sort by Amis code for Worksheet and Amis reports.  




      FILES POINTED TO                      FIELDS

INSTITUTION (#4)                  ORDERING STATION (#2)
                                  AMIS STATION (#14)

PROS AMIS CODES (#663)            AMIS CODE (#16)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):