'--- Page 1 --- ' #0620: if @UPDATE then #0620 =#0594 +#0595 +#0598 IF True then Forms!fMAX1234_6![v0620WO] =Forms!fMAX1234_6!fMax5![v0594F266d5] +Forms!fMAX1234_6!fMax5![v0595F267e5] +Forms!fMAX1234_6!fMax5![v0598F261t4] End If ' #9500 =#0614 Forms!fMAX1234_6![v9500O] = Forms!fMAX1234_6![v0614PP] ' #0210: if #0210 <>"" then #0210 =#0210*#0010 IF Forms!fMAX1234_6![v0210TimeAndMake] <>"" then Forms!fMAX1234_6![v0210TimeAndMake] =Forms!fMAX1234_6![v0210TimeAndMake]*Forms!fMAX1234_6![v0010Scale] End If ' #0211: if #0211 <>"" then #0211 =#0211*#0010 IF Forms!fMAX1234_6![v0211Total] <>"" then Forms!fMAX1234_6![v0211Total] =Forms!fMAX1234_6![v0211Total]*Forms!fMAX1234_6![v0010Scale] End If ' #0212: if #0212 <>"" then #0212 =#0212*#0010 IF Forms!fMAX1234_6![v0212Kilos] <>"" then Forms!fMAX1234_6![v0212Kilos] =Forms!fMAX1234_6![v0212Kilos]*Forms!fMAX1234_6![v0010Scale] End If ' #0067: if #0039 <>"" or 0 then #0067 =#0067*#0010 IF Forms!fMAX1234_6![v0039T11] <>"" or 0 then Forms!fMAX1234_6![v0067T21] =Forms!fMAX1234_6![v0067T21]*Forms!fMAX1234_6![v0010Scale] End If ' #0030: if #0040 <> "" or 0 then #0030 =#0030*#0010 IF Forms!fMAX1234_6![v0040T12] <> "" or 0 then Forms!fMAX1234_6![v0030T22] =Forms!fMAX1234_6![v0030T22]*Forms!fMAX1234_6![v0010Scale] End If ' #0031: if #0041 <>"" or 0 then #0031 =#0031*#0010 IF Forms!fMAX1234_6![v0041T13] <>"" or 0 then Forms!fMAX1234_6![v0031T23] =Forms!fMAX1234_6![v0031T23]*Forms!fMAX1234_6![v0010Scale] End If ' #0032: if #0042 <>"" then #0032 =#0032*#0010 IF Forms!fMAX1234_6![v0042T14] <>"" then Forms!fMAX1234_6![v0032T24] =Forms!fMAX1234_6![v0032T24]*Forms!fMAX1234_6![v0010Scale] End If ' #0033: if #0043 <>"" then #0033 =#0033*#0010 IF Forms!fMAX1234_6![v0043T15] <>"" then Forms!fMAX1234_6![v0033T25] =Forms!fMAX1234_6![v0033T25]*Forms!fMAX1234_6![v0010Scale] End If ' #0034: if #0044 <>"" then #0034 =#0034*#0010 IF Forms!fMAX1234_6![v0044T16] <>"" then Forms!fMAX1234_6![v0034T26] =Forms!fMAX1234_6![v0034T26]*Forms!fMAX1234_6![v0010Scale] End If ' #0035: if #0045 <>"" then #0035 =#0035*#0010 IF Forms!fMAX1234_6![v0045T17] <>"" then Forms!fMAX1234_6![v0035T27] =Forms!fMAX1234_6![v0035T27]*Forms!fMAX1234_6![v0010Scale] End If ' #0036: if #0046 <>"" then #0036 =#0036*#0010 IF Forms!fMAX1234_6![v0046T18] <>"" then Forms!fMAX1234_6![v0036T28] =Forms!fMAX1234_6![v0036T28]*Forms!fMAX1234_6![v0010Scale] End If ' #0037: if #0047 <>"" then #0037 =#0037*#0010 IF Forms!fMAX1234_6![v0047T19] <>"" then Forms!fMAX1234_6![v0037T29] =Forms!fMAX1234_6![v0037T29]*Forms!fMAX1234_6![v0010Scale] End If ' #4000 =#3500 Forms!fMAX1234_6![v4000T39BH] = Forms!fMAX1234_6!fMax5![v3500F309g7] ' #0069: if #0068 <>"" then #0069 =#0069*#0010 IF Forms!fMAX1234_6![v0068T31] <>"" then Forms!fMAX1234_6![v0069F41] =Forms!fMAX1234_6![v0069F41]*Forms!fMAX1234_6![v0010Scale] End If ' #0050: if #0048 <>"" then #0050 =#0050*#0010 IF Forms!fMAX1234_6![v0048T32] <>"" then Forms!fMAX1234_6![v0050F42] =Forms!fMAX1234_6![v0050F42]*Forms!fMAX1234_6![v0010Scale] End If ' #0051: if #0049 <>"" then #0051 =#0051*#0010 IF Forms!fMAX1234_6![v0049T33] <>"" then Forms!fMAX1234_6![v0051F43] =Forms!fMAX1234_6![v0051F43]*Forms!fMAX1234_6![v0010Scale] End If ' #0052: if #0090 <>"" then #0052 =#0052*#0010 IF Forms!fMAX1234_6![v0090T34] <>"" then Forms!fMAX1234_6![v0052F44] =Forms!fMAX1234_6![v0052F44]*Forms!fMAX1234_6![v0010Scale] End If ' #0053: if #0091 <>"" then #0053 =#0053*#0010 IF Forms!fMAX1234_6![v0091T35] <>"" then Forms!fMAX1234_6![v0053F45] =Forms!fMAX1234_6![v0053F45]*Forms!fMAX1234_6![v0010Scale] End If ' #0054: if #0092 <>"" then #0054 =#0054*#0010 IF Forms!fMAX1234_6![v0092T36FRT] <>"" then Forms!fMAX1234_6![v0054F46] =Forms!fMAX1234_6![v0054F46]*Forms!fMAX1234_6![v0010Scale] End If ' #0060: if #0093 <>"" then #0060 =#0060*#0010 IF Forms!fMAX1234_6![v0093T37PAL] <>"" then Forms!fMAX1234_6![v0060F47] =Forms!fMAX1234_6![v0060F47]*Forms!fMAX1234_6![v0010Scale] End If ' #0061: if #0094 <>"" then #0061 =#0061*#0010 IF Forms!fMAX1234_6![v0094T38TOL] <>"" then Forms!fMAX1234_6![v0061F48] =Forms!fMAX1234_6![v0061F48]*Forms!fMAX1234_6![v0010Scale] End If ' #4100 =#3505 Forms!fMAX1234_6![v4100F49] = Forms!fMAX1234_6!fMax5![v3505F313k7] ' #0062 =#0062*#0010 Forms!fMAX1234_6![v0062BelowMix] = Forms!fMAX1234_6![v0062BelowMix]*Forms!fMAX1234_6![v0010Scale] '--- Page 2 - Fields moved to MaxItems --- ' #0063 =#0063*#0010 Forms!fMAX1234_6![v0063KG] = Forms!fMAX1234_6![v0063KG]*Forms!fMAX1234_6![v0010Scale] '---Page 3 --- ' --- Fields but no formulas --- '--- page 4 --- ' #0100 =#0039 +"." +#0068 +"." +#0040 +"." +#0041 +"." +#0042 +"." +#0043 +"." +#0044 +"." +#0045 +"." +#0046 +"." +#0047 +"." +#0048 +"." +#0049 +"." +#0090 +"." +#0091 +"." +#0092 +"." +#0093 +"." +#0094 Forms!fMAX1234_6![v0100LST] = Forms!fMAX1234_6![v0039T11] +"." +Forms!fMAX1234_6![v0068T31] +"." +Forms!fMAX1234_6![v0040T12] +"." +Forms!fMAX1234_6![v0041T13] +"." +Forms!fMAX1234_6![v0042T14] +"." +Forms!fMAX1234_6![v0043T15] +"." +Forms!fMAX1234_6![v0044T16] +"." +Forms!fMAX1234_6![v0045T17] +"." +Forms!fMAX1234_6![v0046T18] +"." +Forms!fMAX1234_6![v0047T19] +"." +Forms!fMAX1234_6![v0048T32] +"." +Forms!fMAX1234_6![v0049T33] +"." +Forms!fMAX1234_6![v0090T34] +"." +Forms!fMAX1234_6![v0091T35] +"." +Forms!fMAX1234_6![v0092T36FRT] +"." +Forms!fMAX1234_6![v0093T37PAL] +"." +Forms!fMAX1234_6![v0094T38TOL] ' #9998: if #0202 <>"" and #0201 ="" then #9998 ="Y" else #9998 ="" If Forms!fMAX1234_6![v0202Hardener] <>"" and Forms!fMAX1234_6![v0201Compound] ="" then Forms!fMAX1234_6![v9998H1] ="Y" Forms!fMAX1234_6![v9998H1] =" End If ' #9997: if #0201 <>"" and #0202 ="" then #9997 ="Y" else #9997 ="" If Forms!fMAX1234_6![v0201Compound] <>"" and Forms!fMAX1234_6![v0202Hardener] ="" then Forms!fMAX1234_6![v9997C1] ="Y" Forms!fMAX1234_6![v9997C1] =" End If ' #9999: if #9998 ="" and #9997 ="" then #9999 ="Y" IF Forms!fMAX1234_6![v9998H1] ="" and Forms!fMAX1234_6![v9997C1] ="" then Forms!fMAX1234_6![v9999B] ="Y" End If ' #6000 =@USERID Forms!fMAX1234_6![v6000PrintBy] = CurrentUser() ' #6001 =@TIME Forms!fMAX1234_6![v6001AT] = Time() ' #6002 =@DATE Forms!fMAX1234_6![v6002ON] = DATE ' #6003 =#6001 Forms!fMAX1234_6![v6003AT] = Forms!fMAX1234_6![v6001AT] ' #6004 =#6002 Forms!fMAX1234_6![v6004ON] = Forms!fMAX1234_6![v6002ON] ' #0420: if #0390 <>"P" then begin if #0191 ="BULK" then #0420 ="" else #0420 =#0200 +#0406 END If Forms!fMAX1234_6![v0390PC0] <>"P" and Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v0420CODE0] ="" Forms!fMAX1234_6![v0420CODE0] =Forms!fMAX1234_6![v0200Packs] +Forms!fMAX1234_6!fMax5![v0406F233j3] End If ' #0500: if #0420 ="" then #0500 ="" else #0500 =#0210 +2 Forms!fMAX1234_6![v0500Q0] =IIF(Forms!fMAX1234_6![v0420CODE0] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #0509 ="HARDENER" Forms!fMAX1234_6![v0509F0Hardener] = "HARDENER" ' #1930: if #0420 ="" then #1930 ="" else #1930 =#0620 Forms!fMAX1234_6![v1930WO1] =IIF(Forms!fMAX1234_6![v0420CODE0] ="","" ,Forms!fMAX1234_6![v0620WO]) ' #0421: if #0391 <>"P" then begin if #0191 ="BULK" then #0421 ="" else #0421 =#0200 +#0407 END If Forms!fMAX1234_6![v0391PC1] <>"P" and Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v0421CODE1] ="" Forms!fMAX1234_6![v0421CODE1] =Forms!fMAX1234_6![v0200Packs] +Forms!fMAX1234_6!fMax5![v0407F240q3c_stc] End If ' #0501: if #0421 ="" then #0501 ="" else #0501 =#0210 +2 Forms!fMAX1234_6![v0501Q1] =IIF(Forms!fMAX1234_6![v0421CODE1] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #0510: if #0421 <>"" then #0510 ="COMPOUND" else #0510 ="" Forms!fMAX1234_6![v0510F1Compound] =IIF(Forms!fMAX1234_6![v0421CODE1] <>"","COMPOUND" ,"") ' #1940: if #0421 ="" then #1940 ="" else #1940 =#0620 Forms!fMAX1234_6![v1940WO1] =IIF(Forms!fMAX1234_6![v0421CODE1] ="","" ,Forms!fMAX1234_6![v0620WO]) ' #0422: if #0392 <>"P" then begin if #0191 ="BULK" then #0422 ="" else #0422 =#0200 +#0408 END If Forms!fMAX1234_6![v0392PC2] <>"P" and Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v0422CODE2] ="" Forms!fMAX1234_6![v0422CODE2] =Forms!fMAX1234_6![v0200Packs] +Forms!fMAX1234_6!fMax5![v0408F242s3] End If ' #0502: if #0422 ="" then #0502 ="" else #0502 =#0210 +2 Forms!fMAX1234_6![v0502Q2] =IIF(Forms!fMAX1234_6![v0422CODE2] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #0511: if #0422 <>"" then #0511 ="UNIT" else #0511 ="" Forms!fMAX1234_6![v0511F2Unit] =IIF(Forms!fMAX1234_6![v0422CODE2] <>"","UNIT" ,"") ' #1950: if #0422 ="" then #1950 ="" else #1950 =#0620 Forms!fMAX1234_6![v1950WO2] =IIF(Forms!fMAX1234_6![v0422CODE2] ="","" ,Forms!fMAX1234_6![v0620WO]) ' #0423: if #0393 <>"P" then begin if #0191 ="BULK" then #0423 ="" else #0423 =#0200 +#0408 END If Forms!fMAX1234_6![v0393PC3] <>"P" and Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v0423CODE3] ="" Forms!fMAX1234_6![v0423CODE3] =Forms!fMAX1234_6![v0200Packs] +Forms!fMAX1234_6!fMax5![v0408F242s3] End If ' #0503: if #0423 ="" then #0503 ="" else #0503 =#0210 +2 Forms!fMAX1234_6![v0503Q3] =IIF(Forms!fMAX1234_6![v0423CODE3] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #0512: if #0423 <>"" then #0512 ="ADDITIVE" else #0512 ="" Forms!fMAX1234_6![v0512F3Additive] =IIF(Forms!fMAX1234_6![v0423CODE3] <>"","ADDITIVE" ,"") ' #1960: if #0423 ="" then #1960 ="" else #1960 =#0620 Forms!fMAX1234_6![v1960WO3] =IIF(Forms!fMAX1234_6![v0423CODE3] ="","" ,Forms!fMAX1234_6![v0620WO]) ' #0430: if #0394 <>"P" then begin if #0191 ="BULK" then #0430 ="" else #0430 =#0200 +#0418 END If Forms!fMAX1234_6![v0394PC4] <>"P" and Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v0430CODE4] ="" Forms!fMAX1234_6![v0430CODE4] =Forms!fMAX1234_6![v0200Packs] +Forms!fMAX1234_6!fMax5![v0418F253j4] End If ' #0504: if #0430 ="" then #0504 ="" else #0504 =#0210 +2 Forms!fMAX1234_6![v0504Q4] =IIF(Forms!fMAX1234_6![v0430CODE4] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #0513: if #0430 <>"" then #0513 ="INNER" else #0513 ="" Forms!fMAX1234_6![v0513F4Inner] =IIF(Forms!fMAX1234_6![v0430CODE4] <>"","INNER" ,"") ' #1970: if #0430 ="" then #1970 ="" else #1970 =#0620 Forms!fMAX1234_6![v1970WO4] =IIF(Forms!fMAX1234_6![v0430CODE4] ="","" ,Forms!fMAX1234_6![v0620WO]) ' #0440: if #0395 <>"P" then begin if #0191 ="BULK" then #0440 ="" else #0440 =#0200 +#0409 +#0410 +#0418 END If Forms!fMAX1234_6![v0395PC5] <>"P" and Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v0440CODE5] ="" Forms!fMAX1234_6![v0440CODE5] =Forms!fMAX1234_6![v0200Packs] +Forms!fMAX1234_6!fMax5![v0409F245c4] +Forms!fMAX1234_6!fMax5![v0410F246] +Forms!fMAX1234_6!fMax5![v0418F253j4] End If ' #0505: if #0440 ="" then #0505 ="" else #0505 =#0210 /(#0254 +.001) +2 Forms!fMAX1234_6![v0505Q5] =IIF(Forms!fMAX1234_6![v0440CODE5] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] /(Forms!fMAX1234_6![v0254OU1] +.001) +2) ' #0514: if #0440 <>"" then #0514 ="OUTER" else #0514 ="" Forms!fMAX1234_6![v0514F5Outer] =IIF(Forms!fMAX1234_6![v0440CODE5] <>"","OUTER" ,"") ' #1980: if #0440 ="" then #1980 ="" else #1980 =#0620 Forms!fMAX1234_6![v1980WO5] =IIF(Forms!fMAX1234_6![v0440CODE5] ="","" ,Forms!fMAX1234_6![v0620WO]) ' #1990: if #0450 ="" then #1990 ="" else #1990 =#0620 Forms!fMAX1234_6![v1990WO6] =IIF(Forms!fMAX1234_6![v0450Code6] ="","" ,Forms!fMAX1234_6![v0620WO]) '--- page 5 --- ' #0600 ="STH" Forms!fMAX1234_6![v0600Lab0] = "STH" ' #0601 ="STC" Forms!fMAX1234_6![v0601Lab1] = "STC" ' #0602 ="STY" Forms!fMAX1234_6![v0602Lab2] = "STY" ' #0603 ="STY" Forms!fMAX1234_6![v0603Lab3] = "STY" ' #0604 ="STZ" Forms!fMAX1234_6![v0604Lab4] = "STZ" ' #0605 ="STZ" Forms!fMAX1234_6![v0605Lab5] = "STZ" ' #1850: if #0600 ="" then #1850 ="" else #1850 =#0210 +2 Forms!fMAX1234_6![v1850Qty0] =IIF(Forms!fMAX1234_6![v0600Lab0] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #1860: if #0601 ="" then #1860 ="" else #1860 =#0210 +2 Forms!fMAX1234_6![v1860Qty1] =IIF(Forms!fMAX1234_6![v0601Lab1] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #1870: if #0602 ="" then #1870 ="" else #1870 =#0210 +2 Forms!fMAX1234_6![v1870Qty2] =IIF(Forms!fMAX1234_6![v0602Lab2] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #1880: if #0603 ="" then #1880 ="" else #1880 =#0210 +2 Forms!fMAX1234_6![v1880Qty3] =IIF(Forms!fMAX1234_6![v0603Lab3] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #1890: if #0604 ="" then #1890 ="" else #1890 =#0210 +2 Forms!fMAX1234_6![v1890Qty4] =IIF(Forms!fMAX1234_6![v0604Lab4] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] +2) ' #1895: if #0605 ="" then #1895 ="" else #1895 =#0210 /(#0254 +.001) +2 Forms!fMAX1234_6![v1895Qty5] =IIF(Forms!fMAX1234_6![v0605Lab5] ="","" ,Forms!fMAX1234_6![v0210TimeAndMake] /(Forms!fMAX1234_6![v0254OU1] +.001) +2) ' #2900: if #0255 <>"" then #2900 ="Y" else #2900 ="" Forms!fMAX1234_6!fMax5![v2900I3a0] =IIF(Forms!fMAX1234_6![v0255In] <>"","Y" ,"") ' #2910: if #0417 <>"" then #2910 ="Y" else #2910 ="" Forms!fMAX1234_6!fMax5![v2910O3c0] =IIF(Forms!fMAX1234_6![v0417Out] <>"","Y" ,"") ' #2921: if #3100 <>"Y" and #3085 <>"Y" then #3070 ="Y" else #3070 ="" If Forms!fMAX1234_6![v3100EpiCan2Car] <>"Y" and Forms!fMAX1234_6![v3085EpiCan1Car] <>"Y" then Forms!fMAX1234_6![v3070EpiCan] ="Y" Forms!fMAX1234_6![v3070EpiCan] =" End If ' #2915: if #2900 ="" or #2910 ="" then #3085 ="Y" else #3085 ="" If Forms!fMAX1234_6!fMax5![v2900I3a0] ="" or Forms!fMAX1234_6!fMax5![v2910O3c0] ="" then Forms!fMAX1234_6![v3085EpiCan1Car] ="Y" Forms!fMAX1234_6![v3085EpiCan1Car] =" End If ' #2917: if #2900 ="" and #2910 ="" then #3085 ="" IF Forms!fMAX1234_6!fMax5![v2900I3a0] ="" and Forms!fMAX1234_6!fMax5![v2910O3c0] ="" then Forms!fMAX1234_6![v3085EpiCan1Car] ="" End If ' #2920: if #2900 ="Y" and #2910 ="Y" then #3100 ="Y" else #3100 ="" If Forms!fMAX1234_6!fMax5![v2900I3a0] ="Y" and Forms!fMAX1234_6!fMax5![v2910O3c0] ="Y" then Forms!fMAX1234_6![v3100EpiCan2Car] ="Y" Forms!fMAX1234_6![v3100EpiCan2Car] =" End If ' #2922: if #3025 ="X" then begin #3070 =""; #3085 =""; #3100 =""; end If Forms!fMAX1234_6![v3025Toll] ="X" then Forms!fMAX1234_6![v3070EpiCan] ="" Forms!fMAX1234_6![v3085EpiCan1Car] ="" Forms!fMAX1234_6![v3100EpiCan2Car] ="" End If ' #3020: if #3010 =$0.50then #3020 =#2350 +#3010 IF Forms!fMAX1234_6!fMax5![v3010CostIGj0] =0.50 then Forms!fMAX1234_6!fMax5![v3020k0] =Forms!fMAX1234_6!fMax5![v2350F307e7] +Forms!fMAX1234_6!fMax5![v3010CostIGj0] End If ' #3030: lookup(#3025,2, #3030) Forms!fMAX1234_6!fMax5![v3030l0] = dlookup("N2","LookUp","Key=Forms!fMAX1234_6![v3025Toll]") ' #3035: if #3030 =1.04then #3035 =#2350*#3030 IF Forms!fMAX1234_6!fMax5![v3030l0] =1.04 then Forms!fMAX1234_6!fMax5![v3035m0] =Forms!fMAX1234_6!fMax5![v2350F307e7]*Forms!fMAX1234_6!fMax5![v3030l0] End If ' #3050: if #3045 =$5.00then #3050 =#2350 +#3045 IF Forms!fMAX1234_6!fMax5![v3045AVn0] =5.00 then Forms!fMAX1234_6!fMax5![v3050o0] =Forms!fMAX1234_6!fMax5![v2350F307e7] +Forms!fMAX1234_6!fMax5![v3045AVn0] End If ' #3065: if #3060 =1.20then #3065 =#2350*#3060 IF Forms!fMAX1234_6!fMax5![v3060F50p0] =1.20 then Forms!fMAX1234_6!fMax5![v3065q0] =Forms!fMAX1234_6!fMax5![v2350F307e7]*Forms!fMAX1234_6!fMax5![v3060F50p0] End If ' #3075: lookup(#3070,2, #3075) Forms!fMAX1234_6!fMax5![v3075F184r0] = dlookup("N2","LookUp","Key=Forms!fMAX1234_6![v3070EpiCan]") ' #3080: if #3075 =1.11then #3080 =#2350*#3075else #3080 ="" Forms!fMAX1234_6!fMax5![v3080F185a1] =IIF(Forms!fMAX1234_6!fMax5![v3075F184r0] =1.11,Forms!fMAX1234_6!fMax5![v2350F307e7]*Forms!fMAX1234_6!fMax5![v3075F184r0],"") ' #3090: lookup(#3085,3, #3090) Forms!fMAX1234_6!fMax5![v3090F186b1] = dlookup("N3","LookUp","Key=Forms!fMAX1234_6![v3085EpiCan1Car]") ' #3095: if #3090 =1.14then #3095 =#2350*#3090else #3095 ="" Forms!fMAX1234_6!fMax5![v3095F187c1] =IIF(Forms!fMAX1234_6!fMax5![v3090F186b1] =1.14,Forms!fMAX1234_6!fMax5![v2350F307e7]*Forms!fMAX1234_6!fMax5![v3090F186b1],"") ' #3105: lookup(#3100,4, #3105) Forms!fMAX1234_6!fMax5![v3105F188d1] = dlookup("N4","LookUp","Key=Forms!fMAX1234_6![v3100EpiCan2Car]") ' #3110: if #3105 =1.16then #3110 =#2350*#3105else #3110 ="" Forms!fMAX1234_6!fMax5![v3110F189e1] =IIF(Forms!fMAX1234_6!fMax5![v3105F188d1] =1.16,Forms!fMAX1234_6!fMax5![v2350F307e7]*Forms!fMAX1234_6!fMax5![v3105F188d1],"") ' #3120: lookup(#3115,1, #3120) Forms!fMAX1234_6!fMax5![v3120F191g1] = dlookup("N1","LookUp","Key=Forms!fMAX1234_6!fMax5![v3115F190f1]") ' #3125 =(#3020 +#3035 +#3050 +#3065 +#3080 +#3095 +#3110) *#3120 Forms!fMAX1234_6!fMax5![v3125F192h1] = (Forms!fMAX1234_6!fMax5![v3020k0] +Forms!fMAX1234_6!fMax5![v3035m0] +Forms!fMAX1234_6!fMax5![v3050o0] +Forms!fMAX1234_6!fMax5![v3065q0] +Forms!fMAX1234_6!fMax5![v3080F185a1] +Forms!fMAX1234_6!fMax5![v3095F187c1] +Forms!fMAX1234_6!fMax5![v3110F189e1]) *Forms!fMAX1234_6!fMax5![v3120F191g1] ' #3135: lookup(#3130,2, #3135) Forms!fMAX1234_6!fMax5![v3135F194j1] = dlookup("N2","LookUp","Key=Forms!fMAX1234_6!fMax5![v3130F193i1]") ' #3140 =(#3020 +#3035 +#3050 +#3065 +#3080 +#3095 +#3110) *#3135 Forms!fMAX1234_6!fMax5![v3140F195k1] = (Forms!fMAX1234_6!fMax5![v3020k0] +Forms!fMAX1234_6!fMax5![v3035m0] +Forms!fMAX1234_6!fMax5![v3050o0] +Forms!fMAX1234_6!fMax5![v3065q0] +Forms!fMAX1234_6!fMax5![v3080F185a1] +Forms!fMAX1234_6!fMax5![v3095F187c1] +Forms!fMAX1234_6!fMax5![v3110F189e1]) *Forms!fMAX1234_6!fMax5![v3135F194j1] ' #3150: lookup(#3145,3, #3150) Forms!fMAX1234_6!fMax5![v3150F197m1] = dlookup("N3","LookUp","Key=Forms!fMAX1234_6!fMax5![v3145F196l1]") ' #3155 =(#3020 +#3035 +#3050 +#3065 +#3080 +#3095 +#3110) *#3150 Forms!fMAX1234_6!fMax5![v3155F198n1] = (Forms!fMAX1234_6!fMax5![v3020k0] +Forms!fMAX1234_6!fMax5![v3035m0] +Forms!fMAX1234_6!fMax5![v3050o0] +Forms!fMAX1234_6!fMax5![v3065q0] +Forms!fMAX1234_6!fMax5![v3080F185a1] +Forms!fMAX1234_6!fMax5![v3095F187c1] +Forms!fMAX1234_6!fMax5![v3110F189e1]) *Forms!fMAX1234_6!fMax5![v3150F197m1] ' #3165: lookup(#3160,4, #3165) Forms!fMAX1234_6!fMax5![v3165F200p1] = dlookup("N4","LookUp","Key=Forms!fMAX1234_6!fMax5![v3160F199o1]") ' #3170 =(#3020 +#3035 +#3050 +#3065 +#3080 +#3095 +#3110) *#3165 Forms!fMAX1234_6!fMax5![v3170F201q1] = (Forms!fMAX1234_6!fMax5![v3020k0] +Forms!fMAX1234_6!fMax5![v3035m0] +Forms!fMAX1234_6!fMax5![v3050o0] +Forms!fMAX1234_6!fMax5![v3065q0] +Forms!fMAX1234_6!fMax5![v3080F185a1] +Forms!fMAX1234_6!fMax5![v3095F187c1] +Forms!fMAX1234_6!fMax5![v3110F189e1]) *Forms!fMAX1234_6!fMax5![v3165F200p1] ' #1800: if #0003 ="N" then begin #0420 =""; #0500 =""; #0509 =""; #0600 =""; #1930 =""; end If Forms!fMAX1234_6![v0003H] ="N" then Forms!fMAX1234_6![v0420CODE0] ="" Forms!fMAX1234_6![v0500Q0] ="" Forms!fMAX1234_6![v0509F0Hardener] ="" Forms!fMAX1234_6![v0600Lab0] ="" Forms!fMAX1234_6![v1930WO1] ="" End If ' #1810: if #0008 ="N" then begin #0422 =""; #0502 =""; #0511 =""; #0602 =""; #1950 =""; end If Forms!fMAX1234_6![v0008U2] ="N" then Forms!fMAX1234_6![v0422CODE2] ="" Forms!fMAX1234_6![v0502Q2] ="" Forms!fMAX1234_6![v0511F2Unit] ="" Forms!fMAX1234_6![v0602Lab2] ="" Forms!fMAX1234_6![v1950WO2] ="" End If ' #1805: if #0004 ="N" then begin #0421 =""; #0501 =""; #0510 =""; #0601 =""; #1940 =""; end If Forms!fMAX1234_6![v0004C] ="N" then Forms!fMAX1234_6![v0421CODE1] ="" Forms!fMAX1234_6![v0501Q1] ="" Forms!fMAX1234_6![v0510F1Compound] ="" Forms!fMAX1234_6![v0601Lab1] ="" Forms!fMAX1234_6![v1940WO1] ="" End If ' #1815: if #0007 ="N" then begin #0423 =""; #0503 =""; #0512 =""; #0603 =""; #1960 =""; end If Forms!fMAX1234_6![v0007A2] ="N" then Forms!fMAX1234_6![v0423CODE3] ="" Forms!fMAX1234_6![v0503Q3] ="" Forms!fMAX1234_6![v0512F3Additive] ="" Forms!fMAX1234_6![v0603Lab3] ="" Forms!fMAX1234_6![v1960WO3] ="" End If ' #1200: if #0001 ="" then #0620 ="******" IF Forms!fMAX1234_6![v0001T] ="" then Forms!fMAX1234_6![v0620WO] ="******" End If ' #1820: if #0016 ="N" then begin #0430 =""; #0504 =""; #0513 =""; #0604 =""; #1970 =""; end If Forms!fMAX1234_6![v0016I2] ="N" then Forms!fMAX1234_6![v0430CODE4] ="" Forms!fMAX1234_6![v0504Q4] ="" Forms!fMAX1234_6![v0513F4Inner] ="" Forms!fMAX1234_6![v0604Lab4] ="" Forms!fMAX1234_6![v1970WO4] ="" End If ' #1111: if #0012 ="2810" then #0969 ="ADD POISON LABELS" else #0969 ="" IF Forms!fMAX1234_6![v0012UN3] ="2810" then Forms!fMAX1234_6![v0969Colon] ="ADD POISON LABELS" Else Forms!fMAX1234_6![v0969Colon] ="" End If ' #1825: if #0017 ="N" then begin #0440 =""; #0505 =""; #0514 =""; #0605 =""; #1980 =""; end If Forms!fMAX1234_6![v0017O2] ="N" then Forms!fMAX1234_6![v0440CODE5] ="" Forms!fMAX1234_6![v0505Q5] ="" Forms!fMAX1234_6![v0514F5Outer] ="" Forms!fMAX1234_6![v0605Lab5] ="" Forms!fMAX1234_6![v1980WO5] ="" End If ' #1100: if #0956 <>"" then lookup(#0218,2, #0941) If Forms!fMAX1234_6![v0956HColon] <>"" then Forms!fMAX1234_6![v0941HH] = dlookup("N2","LOOKUP","Key=Forms!fMAX1234_6![v0218KG1]") End If ' #1110: if #0956 <>"" then lookup(#0221,2, #0959) If Forms!fMAX1234_6![v0956HColon] <>"" then Forms!fMAX1234_6![v0959A] = dlookup("N2","LOOKUP","Key=Forms!fMAX1234_6![v0221KG4]") End If ' #1120: if #0954 <>"" then lookup(#0220,1, #0957) If Forms!fMAX1234_6![v0954Prod] <>"" then Forms!fMAX1234_6![v0957UU] = dlookup("N1","LOOKUP","Key=Forms!fMAX1234_6![v0220KG3]") End If ' #1130: if #0956 <>"" then lookup(#0220,2, #0960) If Forms!fMAX1234_6![v0956HColon] <>"" then Forms!fMAX1234_6![v0960U] = dlookup("N2","LOOKUP","Key=Forms!fMAX1234_6![v0220KG3]") End If ' #1140: if #0956 <>"" then lookup(#0255,2, #1117) If Forms!fMAX1234_6![v0956HColon] <>"" then Forms!fMAX1234_6![v1117I] = dlookup("N2","LOOKUP","Key=Forms!fMAX1234_6![v0255In]") End If ' #1150: if #0956 <>"" then lookup(#0417,2, #0962) If Forms!fMAX1234_6![v0956HColon] <>"" then Forms!fMAX1234_6![v0962O] = dlookup("N2","LOOKUP","Key=Forms!fMAX1234_6![v0417Out]") End If ' #0899: if #0954 <>"" then lookup(#0218,1, #0939) If Forms!fMAX1234_6![v0954Prod] <>"" then Forms!fMAX1234_6![v0939H2] = dlookup("N1","LOOKUP","Key=Forms!fMAX1234_6![v0218KG1]") End If ' #8000: if #5025 ="MC =" then begin #1930 =""; #1940 =""; #1950 =""; #1960 =""; #1970 =""; #1980 =""; #1990 ="" END If Forms!fMAX1234_6![v5025WONum] ="MC =" then Forms!fMAX1234_6![v1930WO1] ="" Forms!fMAX1234_6![v1940WO1] ="" Forms!fMAX1234_6![v1950WO2] ="" Forms!fMAX1234_6![v1960WO3] ="" Forms!fMAX1234_6![v1970WO4] ="" Forms!fMAX1234_6![v1980WO5] ="" End If ' #1002: if #0954 <>"" then lookup(#0219,1, #0947) If Forms!fMAX1234_6![v0954Prod] <>"" then Forms!fMAX1234_6![v0947CC] = dlookup("N1","LOOKUP","Key=Forms!fMAX1234_6![v0219KG2]") End If ' #1003: if #0954 <>"" then lookup(#0255,1, #1116) If Forms!fMAX1234_6![v0954Prod] <>"" then Forms!fMAX1234_6![v1116I] = dlookup("N1","LOOKUP","Key=Forms!fMAX1234_6![v0255In]") End If ' #1004: if #0954 <>"" then lookup(#0417,1, #0955) If Forms!fMAX1234_6![v0954Prod] <>"" then Forms!fMAX1234_6![v0955O] = dlookup("N1","LOOKUP","Key=Forms!fMAX1234_6![v0417Out]") End If ' #1005: if #0011 ="1760" then #0956 ="ADD CORROSIVE LABELS" else #0956 ="" IF Forms!fMAX1234_6![v0011UN] ="1760" then Forms!fMAX1234_6![v0956HColon] ="ADD CORROSIVE LABELS" Else Forms!fMAX1234_6![v0956HColon] ="" End If ' #0412: if #0012 ="2810" then #0408 =".STX" IF Forms!fMAX1234_6![v0012UN3] ="2810" then Forms!fMAX1234_6!fMax5![v0408F242s3] =".STX" End If ' #0975: if #0005 ="1993" then #0954 ="ADD FLAMMABLE LABELS" else #0954 ="" IF Forms!fMAX1234_6![v0005UN2] ="1993" then Forms!fMAX1234_6![v0954Prod] ="ADD FLAMMABLE LABELS" Else Forms!fMAX1234_6![v0954Prod] ="" End If ' #0990: if #0005 ="1993" then #0950 ="*FLAMMABLE*" IF Forms!fMAX1234_6![v0005UN2] ="1993" then Forms!fMAX1234_6![v0950Proprietary] ="*FLAMMABLE*" End If ' #1011: if #0200 ="293008" then #0422 ="293008.SOC" IF Forms!fMAX1234_6![v0200Packs] ="293008" then Forms!fMAX1234_6![v0422CODE2] ="293008.SOC" End If ' #1012: if #0200 ="992280" then #0430 ="992280.SOC" IF Forms!fMAX1234_6![v0200Packs] ="992280" then Forms!fMAX1234_6![v0430CODE4] ="992280.SOC" End If ' #0415: if #0413 ="Y" then begin #0406 ="H.STB"; #0407 ="C.STA"; end If Forms!fMAX1234_6![v0413S] ="Y" then Forms!fMAX1234_6!fMax5![v0406F233j3] ="H.STB" Forms!fMAX1234_6!fMax5![v0407F240q3c_stc] ="C.STA" End If ' #8999: if #0200 ="" then #0422 =#0190 +".STY" IF Forms!fMAX1234_6![v0200Packs] ="" then Forms!fMAX1234_6![v0422CODE2] =Forms!fMAX1234_6![v0190Product] +".STY" End If ' #0416: if #0414 ="Y" then begin #0406 ="H.STU"; #0407 ="C.STX"; end If Forms!fMAX1234_6![v0414X] ="Y" then Forms!fMAX1234_6!fMax5![v0406F233j3] ="H.STU" Forms!fMAX1234_6!fMax5![v0407F240q3c_stc] ="C.STX" End If ' #0406 ="H.STH" Forms!fMAX1234_6!fMax5![v0406F233j3] = "H.STH" ' #0999: if #0956 ="ADD CORROSIVE LABELS" then #0420 =#0420 +"8" IF Forms!fMAX1234_6![v0956HColon] ="ADD CORROSIVE LABELS" then Forms!fMAX1234_6![v0420CODE0] =Forms!fMAX1234_6![v0420CODE0] +"8" End If ' #1999: if #0956 ="ADD CORROSIVE LABELS" then #0941 ="" IF Forms!fMAX1234_6![v0956HColon] ="ADD CORROSIVE LABELS" then Forms!fMAX1234_6![v0941HH] ="" End If ' #1001: if #0420 ="8" then #0420 ="" IF Forms!fMAX1234_6![v0420CODE0] ="8" then Forms!fMAX1234_6![v0420CODE0] ="" End If ' #5010: if #5000 ="H" then #0620 ="MC =" IF Forms!fMAX1234_6![v5000A] ="H" then Forms!fMAX1234_6![v0620WO] ="MC =" End If ' #0407 ="C.STC" Forms!fMAX1234_6!fMax5![v0407F240q3c_stc] = "C.STC" ' #9100: if #0191 ="BULK" then #0420 ="* NO LABELS *" IF Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v0420CODE0] ="* NO LABELS *" End If ' #0408: if #0005 <>"" or #0011 <>"" then #0408 =".STX" else #0408 =".STY" If Forms!fMAX1234_6![v0005UN2] <>"" or Forms!fMAX1234_6![v0011UN] <>"" then Forms!fMAX1234_6!fMax5![v0408F242s3] =".STX" Forms!fMAX1234_6!fMax5![v0408F242s3] =".STY End If ' #9000: if #0191 ="BULK" then #0420 ="" IF Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v0420CODE0] ="" End If ' #0409 ="X" Forms!fMAX1234_6!fMax5![v0409F245c4] = "X" ' #0410 =#0254 Forms!fMAX1234_6!fMax5![v0410F246] = Forms!fMAX1234_6![v0254OU1] ' #0411: if #0005 <>"" or #0011 <>"" then #0411 =".STX" else #0411 =".STY" If Forms!fMAX1234_6![v0005UN2] <>"" or Forms!fMAX1234_6![v0011UN] <>"" then Forms!fMAX1234_6!fMax5![v0411F247d4] =".STX" Forms!fMAX1234_6!fMax5![v0411F247d4] =".STY End If ' #0418: if #0011 <>"" then #0418 =".STZ8" else #0418 =".STZ" Forms!fMAX1234_6!fMax5![v0418F253j4] =IIF(Forms!fMAX1234_6![v0011UN] <>"",".STZ8" ,".STZ") ' #0618: if #0005 <>"" or #0011 <>"" then #0603 ="STX" else #0603 ="STY" If Forms!fMAX1234_6![v0005UN2] <>"" or Forms!fMAX1234_6![v0011UN] <>"" then Forms!fMAX1234_6![v0603Lab3] ="STX" Forms!fMAX1234_6![v0603Lab3] ="STY End If ' #0619: if #0005 <>"" or #0011 <>"" then #0604 ="STZ8" else #0604 ="STZ" If Forms!fMAX1234_6![v0005UN2] <>"" or Forms!fMAX1234_6![v0011UN] <>"" then Forms!fMAX1234_6![v0604Lab4] ="STZ8" Forms!fMAX1234_6![v0604Lab4] ="STZ End If ' #0622: if #0414 ="Y" then #0600 ="STU" IF Forms!fMAX1234_6![v0414X] ="Y" then Forms!fMAX1234_6![v0600Lab0] ="STU" End If ' #0616: if #0005 <>"" or #0011 <>"" then #0600 ="STH8" else #0600 ="STH" If Forms!fMAX1234_6![v0005UN2] <>"" or Forms!fMAX1234_6![v0011UN] <>"" then Forms!fMAX1234_6![v0600Lab0] ="STH8" Forms!fMAX1234_6![v0600Lab0] ="STH End If ' #0617: if #0005 <>"" or #0011 <>"" then #0602 ="STX" else #0602 ="STY" If Forms!fMAX1234_6![v0005UN2] <>"" or Forms!fMAX1234_6![v0011UN] <>"" then Forms!fMAX1234_6![v0602Lab2] ="STX" Forms!fMAX1234_6![v0602Lab2] ="STY End If ' #0621: if #0005 <>"" or #0011 <>"" then #0605 ="STZ8" else #0605 ="STZ" If Forms!fMAX1234_6![v0005UN2] <>"" or Forms!fMAX1234_6![v0011UN] <>"" then Forms!fMAX1234_6![v0605Lab5] ="STZ8" Forms!fMAX1234_6![v0605Lab5] ="STZ End If ' #0623: if #0414 ="Y" then #0601 ="STX" IF Forms!fMAX1234_6![v0414X] ="Y" then Forms!fMAX1234_6![v0601Lab1] ="STX" End If ' #0575 =@NUMBER Forms!fMAX1234_6!fMax5![v0575Number] = [v0620WO] ' #0598: lookup(#0575,1, #0598) Forms!fMAX1234_6!fMax5![v0598F261t4] = dlookup("N1","LookUp","Key=Forms!fMAX1234_6!fMax5![v0575Number]") ' #2280 =@xlookup("COSTING" , #0600,"CODE" ,"$") *#1850 Forms!fMAX1234_6!fMax5![v2280F262u4] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0600Lab0]") *Forms!fMAX1234_6![v1850Qty0] ' #0002 =@DATE Forms!fMAX1234_6!fMax5![v0002F263a5] = DATE ' #0009 =@YEAR(#0002) Forms!fMAX1234_6!fMax5![v0009F264b5] = year(Forms!fMAX1234_6!fMax5![v0002F263a5]) ' #2282 =@xlookup("COSTING" , #0601,"CODE" ,"$") *#1860 Forms!fMAX1234_6!fMax5![v2282F265c5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0601Lab1]") *Forms!fMAX1234_6![v1860Qty1] ' #0594 =@DATE-@D(31/12/93) Forms!fMAX1234_6!fMax5![v0594F266d5] = DATE-DateSerial(1993,12,31) ' #0595: lookup(#0009,1, #0595) Forms!fMAX1234_6!fMax5![v0595F267e5] = dlookup("N1","LookUp","Key=Forms!fMAX1234_6!fMax5![v0009F264b5]") ' #2284 =@xlookup("COSTING" , #0602,"CODE" ,"$") *#1870 Forms!fMAX1234_6!fMax5![v2284F268f5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0602Lab2]") *Forms!fMAX1234_6![v1870Qty2] ' #2286 =@xlookup("COSTING" , #0603,"CODE" ,"$") *#1880 Forms!fMAX1234_6!fMax5![v2286F269g5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0603Lab3]") *Forms!fMAX1234_6![v1880Qty3] ' #2288 =@xlookup("COSTING" , #0604,"CODE" ,"$") *#1890 Forms!fMAX1234_6!fMax5![v2288F270h5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0604Lab4]") *Forms!fMAX1234_6![v1890Qty4] ' #2290 =@xlookup("COSTING" , #0605,"CODE" ,"$") *#1895 Forms!fMAX1234_6!fMax5![v2290FCOSTN] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0605Lab5]") *Forms!fMAX1234_6![v1895Qty5] ' #2198 =@xlookup("COSTING" , #0039,"CODE" ,"$") *#0067 Forms!fMAX1234_6!fMax5![v2198F271k5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0039T11]") *Forms!fMAX1234_6![v0067T21] ' #2199 =@xlookup("COSTING" , #0068,"CODE" ,"$") *#0069 Forms!fMAX1234_6!fMax5![v2199F272l5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0068T31]") *Forms!fMAX1234_6![v0069F41] ' #7961: if #7960 ="ERR" then #7960 ="" IF Forms!fMAX1234_6![v7960Mix] ="ERR" then Forms!fMAX1234_6![v7960Mix] ="" End If ' #7971: if #7970 ="ERR" then #7970 ="" IF Forms!fMAX1234_6![v7970Fil] ="ERR" then Forms!fMAX1234_6![v7970Fil] ="" End If ' #7981: if #7980 ="ERR" then #7980 ="" IF Forms!fMAX1234_6![v7980Pak] ="ERR" then Forms!fMAX1234_6![v7980Pak] ="" End If ' #7991: if #7990 ="ERR" then #7990 ="" IF Forms!fMAX1234_6![v7990TL] ="ERR" then Forms!fMAX1234_6![v7990TL] ="" End If ' #2200 =@xlookup("COSTING" , #0040,"CODE" ,"$") *#0030 Forms!fMAX1234_6!fMax5![v2200F277q5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0040T12]") *Forms!fMAX1234_6![v0030T22] ' #2205 =@xlookup("COSTING" , #0041,"CODE" ,"$") *#0031 Forms!fMAX1234_6!fMax5![v2205F278r5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0041T13]") *Forms!fMAX1234_6![v0031T23] ' #2210 =@xlookup("COSTING" , #0042,"CODE" ,"$") *#0032 Forms!fMAX1234_6!fMax5![v2210F279s5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0042T14]") *Forms!fMAX1234_6![v0032T24] ' #2215 =@xlookup("COSTING" , #0043,"CODE" ,"$") *#0033 Forms!fMAX1234_6!fMax5![v2215F280t5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0043T15]") *Forms!fMAX1234_6![v0033T25] ' #2220 =@xlookup("COSTING" , #0044,"CODE" ,"$") *#0034 Forms!fMAX1234_6!fMax5![v2220F281u5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0044T16]") *Forms!fMAX1234_6![v0034T26] ' #2225 =@xlookup("COSTING" , #0045,"CODE" ,"$") *#0035 Forms!fMAX1234_6!fMax5![v2225F282v5] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0045T17]") *Forms!fMAX1234_6![v0035T27] ' #2230 =@xlookup("COSTING" , #0046,"CODE" ,"$") *#0036 Forms!fMAX1234_6!fMax5![v2230F283a6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0046T18]") *Forms!fMAX1234_6![v0036T28] ' #2235 =@xlookup("COSTING" , #0047,"CODE" ,"$") *#0037 Forms!fMAX1234_6!fMax5![v2235F284b6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0047T19]") *Forms!fMAX1234_6![v0037T29] ' #2240 =@xlookup("COSTING" , #0048,"CODE" ,"$") *#0050 Forms!fMAX1234_6!fMax5![v2240F285c6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0048T32]") *Forms!fMAX1234_6![v0050F42] ' #2245 =@xlookup("COSTING" , #0049,"CODE" ,"$") *#0051 Forms!fMAX1234_6!fMax5![v2245F286d6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0049T33]") *Forms!fMAX1234_6![v0051F43] ' #2250 =@xlookup("COSTING" , #0090,"CODE" ,"$") *#0052 Forms!fMAX1234_6!fMax5![v2250F287e6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0090T34]") *Forms!fMAX1234_6![v0052F44] ' #2255 =@xlookup("COSTING" , #0091,"CODE" ,"$") *#0053 Forms!fMAX1234_6!fMax5![v2255F288f6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0091T35]") *Forms!fMAX1234_6![v0053F45] ' #2260 =@xlookup("COSTING" , #0092,"CODE" ,"$") *#0054 Forms!fMAX1234_6!fMax5![v2260F289g6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0092T36FRT]") *Forms!fMAX1234_6![v0054F46] ' #2265 =@xlookup("COSTING" , #0093,"CODE" ,"$") *#0060 Forms!fMAX1234_6!fMax5![v2265F290h6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0093T37PAL]") *Forms!fMAX1234_6![v0060F47] ' #2270 =@xlookup("COSTING" , #0094,"CODE" ,"$") *#0061 Forms!fMAX1234_6!fMax5![v2270F291i6] = dlookup("Dollar","COSTING","CODE =Forms!fMAX1234_6![v0094T38TOL]") *Forms!fMAX1234_6![v0061F48] ' #3300: if #3045 ="" then #3050 ="" IF Forms!fMAX1234_6!fMax5![v3045AVn0] ="" then Forms!fMAX1234_6!fMax5![v3050o0] ="" End If ' #3310: if #3025 ="" then #3035 ="" and #3030 ="" IF Forms!fMAX1234_6![v3025Toll] ="" then Forms!fMAX1234_6!fMax5![v3035m0] ="" Forms!fMAX1234_6!fMax5![v3030l0] ="" End If ' #3320: if #3010 ="" then #3020 ="" IF Forms!fMAX1234_6!fMax5![v3010CostIGj0] ="" then Forms!fMAX1234_6!fMax5![v3020k0] ="" End If ' #3325: if #3060 ="" then #3065 ="" IF Forms!fMAX1234_6!fMax5![v3060F50p0] ="" then Forms!fMAX1234_6!fMax5![v3065q0] ="" End If ' #3330: if #3070 ="" then #3075 ="" and #3080 ="" IF Forms!fMAX1234_6![v3070EpiCan] ="" then Forms!fMAX1234_6!fMax5![v3075F184r0] ="" Forms!fMAX1234_6!fMax5![v3080F185a1] ="" End If ' #3335: if #3085 ="" then #3090 ="" and #3095 ="" IF Forms!fMAX1234_6![v3085EpiCan1Car] ="" then Forms!fMAX1234_6!fMax5![v3090F186b1] ="" Forms!fMAX1234_6!fMax5![v3095F187c1] ="" End If ' #3340: if #3100 ="" then #3105 ="" and #3110 ="" IF Forms!fMAX1234_6![v3100EpiCan2Car] ="" then Forms!fMAX1234_6!fMax5![v3105F188d1] ="" Forms!fMAX1234_6!fMax5![v3110F189e1] ="" End If ' #3345: if #3115 ="" then #3125 ="" IF Forms!fMAX1234_6!fMax5![v3115F190f1] ="" then Forms!fMAX1234_6!fMax5![v3125F192h1] ="" End If ' #3350: if #3130 ="" then #3140 ="" IF Forms!fMAX1234_6!fMax5![v3130F193i1] ="" then Forms!fMAX1234_6!fMax5![v3140F195k1] ="" End If ' #3355: if #3145 ="" then #3155 ="" IF Forms!fMAX1234_6!fMax5![v3145F196l1] ="" then Forms!fMAX1234_6!fMax5![v3155F198n1] ="" End If ' #3360: if #3160 ="" then #3170 ="" IF Forms!fMAX1234_6!fMax5![v3160F199o1] ="" then Forms!fMAX1234_6!fMax5![v3170F201q1] ="" End If ' #2335: if #0026 <>"" then #0019 ="*****" IF Forms!fMAX1234_6![v0026U] <>"" then Forms!fMAX1234_6![v0019] ="*****" End If ' #2340: if #0001 ="" then #0019 ="*****" IF Forms!fMAX1234_6![v0001T] ="" then Forms!fMAX1234_6![v0019] ="*****" End If ' #2345 =#2198 +#2199 +#2200 +#2205 +#2210 +#2215 +#2220 +#2225 +#2230 +#2235 +#2240 +#2245 +#2250 +#2255 +#2260 +#2265 +#2270 +#2275 +#2280 +#2282 +#2284 +#2286 +#2288 +#2290 Forms!fMAX1234_6!fMax5![v2345F306d7] = Forms!fMAX1234_6!fMax5![v2198F271k5] +Forms!fMAX1234_6!fMax5![v2199F272l5] +Forms!fMAX1234_6!fMax5![v2200F277q5] +Forms!fMAX1234_6!fMax5![v2205F278r5] +Forms!fMAX1234_6!fMax5![v2210F279s5] +Forms!fMAX1234_6!fMax5![v2215F280t5] +Forms!fMAX1234_6!fMax5![v2220F281u5] +Forms!fMAX1234_6!fMax5![v2225F282v5] +Forms!fMAX1234_6!fMax5![v2230F283a6] +Forms!fMAX1234_6!fMax5![v2235F284b6] +Forms!fMAX1234_6!fMax5![v2240F285c6] +Forms!fMAX1234_6!fMax5![v2245F286d6] +Forms!fMAX1234_6!fMax5![v2250F287e6] +Forms!fMAX1234_6!fMax5![v2255F288f6] +Forms!fMAX1234_6!fMax5![v2260F289g6] +Forms!fMAX1234_6!fMax5![v2265F290h6] +Forms!fMAX1234_6!fMax5![v2270F291i6] +Forms!fMAX1234_6!fMax5![v2275F292j6] +Forms!fMAX1234_6!fMax5![v2280F262u4] +Forms!fMAX1234_6!fMax5![v2282F265c5] +Forms!fMAX1234_6!fMax5![v2284F268f5] +Forms!fMAX1234_6!fMax5![v2286F269g5] +Forms!fMAX1234_6!fMax5![v2288F270h5] +Forms!fMAX1234_6!fMax5![v2290FCOSTN] ' #2350 =#2345*1.03 /(#0210 +.001) Forms!fMAX1234_6!fMax5![v2350F307e7] = Forms!fMAX1234_6!fMax5![v2345F306d7]*1.03 /(Forms!fMAX1234_6![v0210TimeAndMake] +.001) ' #2355 =#2345*1.03 Forms!fMAX1234_6!fMax5![v2355F308f7] = Forms!fMAX1234_6!fMax5![v2345F306d7]*1.03 ' #3500 =#3020 +#3035 +#3050 +#3065 +#3080 +#3095 +#3110 Forms!fMAX1234_6!fMax5![v3500F309g7] = Forms!fMAX1234_6!fMax5![v3020k0] +Forms!fMAX1234_6!fMax5![v3035m0] +Forms!fMAX1234_6!fMax5![v3050o0] +Forms!fMAX1234_6!fMax5![v3065q0] +Forms!fMAX1234_6!fMax5![v3080F185a1] +Forms!fMAX1234_6!fMax5![v3095F187c1] +Forms!fMAX1234_6!fMax5![v3110F189e1] ' #3501 =@xlookup("PMF2" , #0200,"CODE" ,"RUNOUT orSPECIAL?") Forms!fMAX1234_6!fMax5![v3501F311i7] = dlookup("RunOut_Special","PMF2","CODE =Forms!fMAX1234_6![v0200Packs]") ' #3502: if #3501 ="2" then #3500 =#3500*1.10 IF Forms!fMAX1234_6!fMax5![v3501F311i7] ="2" then Forms!fMAX1234_6!fMax5![v3500F309g7] =Forms!fMAX1234_6!fMax5![v3500F309g7]*1.10 End If ' #3505 =(#2355 /(#0211 +.001)) Forms!fMAX1234_6!fMax5![v3505F313k7] = (Forms!fMAX1234_6!fMax5![v2355F308f7] /(Forms!fMAX1234_6![v0211Total] +.001)) ' #7000: #0010 =1.00 Forms!fMAX1234_6!fMax5![v7000F315m7] = Forms!fMAX1234_6![v0010Scale] =1.00 ' #9150: if #0062 ="0" then #0062 ="" IF Forms!fMAX1234_6![v0062BelowMix] =0 then Forms!fMAX1234_6![v0062BelowMix] ="" End If ' #9200 =@xlookup("RECLAIM" , #0019,"CODE" ,"STATUS") Forms!fMAX1234_6!fMax5![v9200F317o7] = dlookup("STATUS","RECLAIM","CODE =Forms!fMAX1234_6![v0019]") ' #9160: if #0063 ="0" then #0063 ="" IF Forms!fMAX1234_6![v0063KG] =0 then Forms!fMAX1234_6![v0063KG] ="" End If ' #4200: if #0191 ="BULK" then #4000 ="***" IF Forms!fMAX1234_6![v0191PackSize] ="BULK" then Forms!fMAX1234_6![v4000T39BH] ="***" End If ' #9210: if #9200 ="Y" then #0950 ="*USE RECLAIM*" else #0950 ="PROPRIETARY" IF Forms!fMAX1234_6!fMax5![v9200F317o7] ="Y" then Forms!fMAX1234_6![v0950Proprietary] ="*USE RECLAIM*" Else Forms!fMAX1234_6![v0950Proprietary] ="PROPRIETARY" End If ' #9220: if #0005 ="1993" and #9200 <>"Y" then #0950 ="*FLAMMABLE*" IF Forms!fMAX1234_6![v0005UN2] ="1993" and Forms!fMAX1234_6!fMax5![v9200F317o7] <>"Y" then Forms!fMAX1234_6![v0950Proprietary] ="*FLAMMABLE*" End If '--- Page 6 --- ' #7960 =@xlookup("WKSTIMES" , #0019,"#?" ,"MIX") Forms!fMAX1234_6![v7960Mix] = dlookup("MIX","WKSTIMES","Num =Forms!fMAX1234_6![v0019]") ' #7970 =@xlookup("wkstimes" , #0019,"#?" ,"fil") Forms!fMAX1234_6![v7970Fil] = dlookup("fil","WKSTIMES","Num =Forms!fMAX1234_6![v0019]") ' #7980 =@xlookup("WKSTIMES" , #0019,"#?" ,"PAK") Forms!fMAX1234_6![v7980Pak] = dlookup("PAK","WKSTIMES","Num =Forms!fMAX1234_6![v0019]") ' #7990 =@xlookup("wkstimes" , #0019,"#?" ,"tl") Forms!fMAX1234_6![v7990TL] = dlookup("tl","WKSTIMES","Num =Forms!fMAX1234_6![v0019]") ' #0624: if #0614 ="PP" then #0620 =#0615 IF Forms!fMAX1234_6![v0614PP] ="PP" then Forms!fMAX1234_6![v0620WO] =Forms!fMAX1234_6![v0615F324] End If ' #9505 =@xlookup("costing" , #0039,"code" ,"$") Forms!fMAX1234_6![v9505$39] = dlookup("Dollar","COSTING","code =Forms!fMAX1234_6![v0039T11]") ' #9595 =@xlookup("costing" , #0068,"code" ,"$") Forms!fMAX1234_6![v9595$68] = dlookup("Dollar","COSTING","code =Forms!fMAX1234_6![v0068T31]") ' #9705 =@xlookup("costing" , #0600,"code" ,"$") Forms!fMAX1234_6![v9705$600] = dlookup("Dollar","COSTING","code =Forms!fMAX1234_6![v0600Lab0]") ' #9715 =@xlookup("costing" , #0601,"code" ,"$") Forms!fMAX1234_6![v9715$601] = dlookup("Dollar","COSTING","code =Forms!fMAX1234_6![v0601Lab1]") ' #9725 =@xlookup("costing" , #0602,"code" ,"$") Forms!fMAX1234_6![v9725$602] = dlookup("Dollar","COSTING","code =Forms!fMAX1234_6![v0602Lab2]") ' #9735 =@xlookup("costing" , #0603,"code" ,"$") Forms!fMAX1234_6![v9735$603] = dlookup("Dollar","COSTING","code =Forms!fMAX1234_6![v0603Lab3]") ' #9745 =@xlookup("costing" , #0604,"code" ,"$") Forms!fMAX1234_6![v9745$604] = dlookup("Dollar","COSTING","code =Forms!fMAX1234_6![v0604Lab4]") ' #9755 =@xlookup("costing" , #0605,"code" ,"$") Forms!fMAX1234_6![v9755AS] = dlookup("Dollar","COSTING","code =Forms!fMAX1234_6![v0605Lab5]")