Report Sales Summary

<%if (lqtyvboard>0 and lamtvboard>0) or (lqtyvboard1>0 and lamtvboard1>0) then%> <%else %> <%end if %> <%if (lamtvboardly>0 and lqtyvboardly>0) or (lamtvboardly1>0 and lqtyvboardly1>0) then%> <%else %> <%end if %>

Actual Month

Period:

<%=period1%>

<%=period2%>

<%=lbl_month%>

Last Year

Total Sales Qty:

Total Sales Amt:

Total M2:

By Piece:

By M2:

Sales Qty:

Sales Amt:

M2:

By Piece:

By M2:

Bookings

<%=formatnumber(qtybook)%>

$<%=formatnumber(amtbook)%>

<%=formatnumber(m2book)%>

$<%=formatnumber(CtoPiece_book,3)%>

$<%=formatnumber(CtoM2_book,3)%>

<%=formatnumber(qtybook2)%>

$<%=formatnumber(amtbook2)%>

<%=formatnumber(m2book2)%>

$<%=formatnumber(CtoPiece_last1)%>

$<%=formatnumber(CtoM2_last1)%>

Plant 1

<%=formatnumber(Tot_sales_qty)%>

$<%=formatnumber(Tot_sales_amt)%>

<%=formatnumber(Tot_sales_m2)%>

$<%=formatnumber(CtoPiece,3)%>

$<%=formatnumber(CtoM2,3)%>

<%=formatnumber(qtyplant1)%>

$<%=formatnumber(amtplant1)%>

<%=formatnumber(m2plant1)%>

$<%=formatnumber(CtoPiece_last2)%>

$<%=formatnumber(CtoM2_last2)%>

Plant 2

<%=formatnumber(Tot_sales_qty2-lqtyvboard)%>

$<%=formatnumber(Tot_sales_amt2-lamtvboard)%>

<%=formatnumber(Tot_sales_m2_2)%>

$<%=formatnumber(CtoPiece2,3)%>

$<%=formatnumber(CtoM2_2,3)%>

<%=formatnumber(qtyplant2)%>

$<%=formatnumber(amtplant2)%>

<%=formatnumber(m2plant2)%>

$<%=formatnumber(CtoPiece_last3)%>

$<%=formatnumber(CtoM2_last3)%>

Samsung

<%=formatnumber(Tot_sales_qty_sam-lqtyvboard1)%>

$<%=formatnumber(Tot_sales_amt_sam-lamtvboard1)%>

<%=formatnumber(Tot_sales_m2_sam)%>

$<%=formatnumber(CtoPiece_sam,3)%>

$<%=formatnumber(CtoM2_sam,3)%>

<%=formatnumber(qtysamsung)%>

$<%=formatnumber(amtsamsung)%>

<%=formatnumber(m2samsung)%>

$<%=formatnumber(CtoPiece_last4)%>

$<%=formatnumber(CtoM2_last4)%>

V-Board

<%=formatnumber(lqtyvboard+lqtyvboard1)%>

$<%=formatnumber(lamtvboard+lamtvboard1)%>

$<%=formatnumber((lamtvboard+lamtvboard1)/(lqtyvboard+lqtyvboard1),3)%>

$<%=formatnumber(0,3)%>

<%=formatnumber(lqtyvboardly+lqtyvboardly1)%>

$<%=formatnumber(lamtvboardly+lamtvboardly1)%>

$<%=formatnumber((lamtvboardly+lamtvboardly1)/(lqtyvboardly+lqtyvboardly1),3)%>

$<%=formatnumber(0,3)%>

Inter Company

<%=formatnumber(qtyinterc)%>

$<%=formatnumber(amtinterc)%>

<%=formatnumber(m2interc)%>

$<%=formatnumber(CtoPiece_inter,3)%>

$<%=formatnumber(CtoM2_inter,3)%>

<%=formatnumber(qtyinterc2)%>

$<%=formatnumber(amtinterc2)%>

<%=formatnumber(m2interc2)%>

$<%=formatnumber(CtoPiece_last5)%>

$<%=formatnumber(CtoM2_last5)%>

SCRAP

-<%=formatnumber(lscrapqty1)%>

-<%=formatnumber(lscrapamt1)%>

-<%=formatnumber(lscrapmt21)%>

Total:

<%=formatnumber(Tot_sales_qtyAll)%>

$<%=formatnumber(Tot_sales_amtAll)%>

<%=formatnumber(Tot_sales_m2All)%>

$<%=formatnumber(TotPiece1,3)%>

$<%=formatnumber(Totm2_1,3)%>

<%=formatnumber(Totqtylast)%>

$<%=formatnumber(Totamtlast)%>

<%=formatnumber(Totm2last)%>

$<%=formatnumber(Totpiece2)%>

$<%=formatnumber(Totm2_2)%>

	Current Sales:	Invoiced Sales:	Daly AVG:	Projection:
Plant 1	$<%=formatnumber(Tot_sales_amt)%>	$<%=formatnumber(lamtplantInv)%>	$<%=formatnumber(DailyAvg1)%>	$<%=formatnumber(Projection1)%>
Plant 2	$<%=formatnumber(Tot_sales_amt2-lamtvboard)%>	$<%=formatnumber(lamtplantInv2)%>	$<%=formatnumber(DailyAvg2)%>	$<%=formatnumber(Projection2)%>
V-Board	$<%=formatnumber(lamtvboard+lamtvboard1)%>	$<%=formatnumber(lamtplantInv2)%>	$<%=formatnumber(DailyAvg4)%>	$<%=formatnumber(Projection4)%>
Samsung	$<%=formatnumber(Tot_sales_amt_sam-lamtvboard1)%>	$<%=formatnumber(Tot_sales_amt_sam)%>	$<%=formatnumber(DailyAvg3)%>	$<%=formatnumber(Projection3)%>
Total	$<%=formatnumber(Tot_sales_amtAll)%>	$<%=formatnumber(Tot_sales_amtAll2)%>	$<%=formatnumber(Total_2)%>	$<%=formatnumber(Total_3)%>

<% If fulfillment1 < 0.8001 Then colorf = "#ff0000" End If If fulfillment1 > 0.8 And fulfillment1 < 0.9001 Then colorf = "#ff9b00" End If If fulfillment1 > 0.9 Then colorf = "#33cc33" End If If fulfillment2 < 0.801 Then colorf2 = "#ff0000" End If If fulfillment2 > 0.8 And fulfillment2 < 0.9001 Then colorf2 = "#ff9b00" End If If fulfillment2 > 0.9 Then colorf2 = "#33cc33" End If %>

Forecast	Bussines Plan
$<%=formatnumber(forecast)%>	$<%=formatnumber(Bussines)%>
<%=formatnumber(fulfillment1*100)%> %	<%=formatnumber(fulfillment2*100)%> %

<%if ljan2SAM>0 then %> <% else %> <% end if if lfeb2SAM>0 then %> <% else %> <% end if if lmar2SAM>0 then %> <% else %> <% end if if lapr2SAM>0 then %> <% else %> <% end if if lmay2SAM>0 then %> <% else %> <% end if if ljun2SAM>0 then %> <% else %> <% end if if ljul2SAM>0 then %> <% else %> <% end if if laug2SAM>0 then %> <% else %> <% end if if lsep2SAM>0 then %> <% else %> <% end if if loct2SAM>0 then %> <% else %> <% end if if lnov2SAM>0 then %> <% else %> <% end if if ldec2SAM>0 then %> <% else %> <% end if if ltotyear2SAM>0 then %> <% else %> <% end if %> <%if ljan2SAM>0 then %> <% else %> <% end if if lfeb2SAM>0 then %> <% else %> <% end if if lmar2SAM>0 then %> <% else %> <% end if if lapr2SAM>0 then %> <% else %> <% end if if lmay2SAM>0 then %> <% else %> <% end if if ljun2SAM>0 then %> <% else %> <% end if if ljul2SAM>0 then %> <% else %> <% end if if laug2SAM>0 then %> <% else %> <% end if if lsep2SAM>0 then %> <% else %> <% end if if loct2SAM>0 then %> <% else %> <% end if if lnov2SAM>0 then %> <% else %> <% end if if ldec2SAM>0 then %> <% else %> <% end if if ltotyear2SAM>0 then %> <% else %> <% end if %>

<%=lbl_lastyear%> vs <%=lbl_actualyear%>

January

February

March

April

May

June

July

August

September

October

November

December

Total

2014

$<%=formatnumber(jan0)%>

$<%=formatnumber(feb0)%>

$<%=formatnumber(mar0)%>

$<%=formatnumber(apr0)%>

$<%=formatnumber(May0)%>

$<%=formatnumber(jun0)%>

$<%=formatnumber(jul0)%>

$<%=formatnumber(aug0)%>

$<%=formatnumber(sep0)%>

$<%=formatnumber(oct0)%>

$<%=formatnumber(nov0)%>

$<%=formatnumber(dec0)%>

$<%=formatnumber(totyear0)%>

SAMSUNG

$<%=formatnumber(ljan0SAM)%>

$<%=formatnumber(lfeb0SAM)%>

$<%=formatnumber(lmar0SAM)%>

$<%=formatnumber(lapr0SAM)%>

$<%=formatnumber(lMay0SAM)%>

$<%=formatnumber(ljun0SAM)%>

$<%=formatnumber(ljul0SAM)%>

$<%=formatnumber(laug0SAM)%>

$<%=formatnumber(lsep0SAM)%>

$<%=formatnumber(loct0SAM)%>

$<%=formatnumber(lnov0SAM)%>

$<%=formatnumber(ldec0SAM)%>

$<%=formatnumber(ltotyear0SAM)%>

Percent

<%=formatnumber((ljan0SAM/jan0)*100,2)%>%

<%=formatnumber((lfeb0SAM/feb0)*100,2)%>%

<%=formatnumber((lmar0SAM/mar0)*100,2)%>%

<%=formatnumber((lapr0SAM/apr0)*100,2)%>%

<%=formatnumber((lmay0SAM/may0)*100,2)%>%

<%=formatnumber((ljun0SAM/jun0)*100,2)%>%

<%=formatnumber((ljul0SAM/jul0)*100,2)%>%

<%=formatnumber((laug0SAM/aug0)*100,2)%>%

<%=formatnumber((lsep0SAM/sep0)*100,2)%>%

<%=formatnumber((loct0SAM/oct0)*100,2)%>%

<%=formatnumber((lnov0SAM/nov0)*100,2)%>%

<%=formatnumber((ldec0SAM/dec0)*100,2)%>%

<%=formatnumber((ltotyear0SAM/totyear0)*100,2)%>%

Total V-Board 2014

$<%=formatnumber(VBO3_1+VBS3_1)%>

$<%=formatnumber(VBO3_2+VBS3_2)%>

$<%=formatnumber(VBO3_3+VBS3_3)%>

$<%=formatnumber(VBO3_4+VBS3_4)%>

$<%=formatnumber(VBO3_5+VBS3_5)%>

$<%=formatnumber(VBO3_6+VBS3_6)%>

$<%=formatnumber(VBO3_7+VBS3_7)%>

$<%=formatnumber(VBO3_8+VBS3_8)%>

$<%=formatnumber(VBO3_9+VBS3_9)%>

$<%=formatnumber(VBO3_10+VBS3_10)%>

$<%=formatnumber(VBO3_11+VBS3_11)%>

$<%=formatnumber(VBO3_12+VBS3_12)%>

$<%=formatnumber(VBStotyear3+VBOtotyear3)%>

V-Board Percent

<%=formatnumber(((VBO3_1+VBS3_1)/jan0)*100,2)%>%

<%=formatnumber(((VBO3_2+VBS3_2)/feb0)*100,2)%>%

<%=formatnumber(((VBO3_3+VBS3_3)/mar0)*100,2)%>%

<%=formatnumber(((VBO3_4+VBS3_4)/apr0)*100,2)%>%

<%=formatnumber(((VBO3_5+VBS3_5)/may0)*100,2)%>%

<%=formatnumber(((VBO3_6+VBS3_6)/jun0)*100,2)%>%

<%=formatnumber(((VBO3_7+VBS3_7)/jul0)*100,2)%>%

<%=formatnumber(((VBO3_8+VBS3_8)/aug0)*100,2)%>%

<%=formatnumber(((VBO3_9+VBS3_9)/sep0)*100,2)%>%

<%=formatnumber(((VBO3_10+VBS3_10)/oct0)*100,2)%>%

<%=formatnumber(((VBO3_11+VBS3_11)/nov0)*100,2)%>%

<%=formatnumber(((VBO3_12+VBS3_12)/dec0)*100,2)%>%

<%=formatnumber(((VBStotyear3+VBOtotyear3)/totyear0)*100,2)%>%

<%=lbl_lastyear%>

$<%=formatnumber(jan1)%>

$<%=formatnumber(feb1)%>

$<%=formatnumber(mar1)%>

$<%=formatnumber(apr1)%>

$<%=formatnumber(May1)%>

$<%=formatnumber(jun1)%>

$<%=formatnumber(jul1)%>

$<%=formatnumber(aug1)%>

$<%=formatnumber(sep1)%>

$<%=formatnumber(oct1)%>

$<%=formatnumber(nov1)%>

$<%=formatnumber(dec1)%>

$<%=formatnumber(totyear1)%>

SAMSUNG

$<%=formatnumber(ljan1SAM)%>

$<%=formatnumber(lfeb1SAM)%>

$<%=formatnumber(lmar1SAM)%>

$<%=formatnumber(lapr1SAM)%>

$<%=formatnumber(lMay1SAM)%>

$<%=formatnumber(ljun1SAM)%>

$<%=formatnumber(ljul1SAM)%>

$<%=formatnumber(laug1SAM)%>

$<%=formatnumber(lsep1SAM)%>

$<%=formatnumber(loct1SAM)%>

$<%=formatnumber(lnov1SAM)%>

$<%=formatnumber(ldec1SAM)%>

$<%=formatnumber(ltotyear1SAM)%>

Percent

<%=formatnumber((ljan1SAM/jan1)*100,2)%>%

<%=formatnumber((lfeb1SAM/feb1)*100,2)%>%

<%=formatnumber((lmar1SAM/mar1)*100,2)%>%

<%=formatnumber((lapr1SAM/apr1)*100,2)%>%

<%=formatnumber((lmay1SAM/may1)*100,2)%>%

<%=formatnumber((ljun1SAM/jun1)*100,2)%>%

<%=formatnumber((ljul1SAM/jul1)*100,2)%>%

<%=formatnumber((laug1SAM/aug1)*100,2)%>%

<%=formatnumber((lsep1SAM/sep1)*100,2)%>%

<%=formatnumber((loct1SAM/oct1)*100,2)%>%

<%=formatnumber((lnov1SAM/nov1)*100,2)%>%

<%=formatnumber((ldec1SAM/dec1)*100,2)%>%

<%=formatnumber((ltotyear1SAM/totyear1)*100,2)%>%

Total V-Board <%=lbl_lastyear%>

$<%=formatnumber(VBO1+VBS1)%>

$<%=formatnumber(VBO2+VBS2)%>

$<%=formatnumber(VBO3+VBS3)%>

$<%=formatnumber(VBO4+VBS4)%>

$<%=formatnumber(VBO5+VBS5)%>

$<%=formatnumber(VBO6+VBS6)%>

$<%=formatnumber(VBO7+VBS7)%>

$<%=formatnumber(VBO8+VBS8)%>

$<%=formatnumber(VBO9+VBS9)%>

$<%=formatnumber(VBO10+VBS10)%>

$<%=formatnumber(VBO11+VBS11)%>

$<%=formatnumber(VBO12+VBS12)%>

$<%=formatnumber(VBStotyear1+VBOtotyear1)%>

V-Board Percent

<%=formatnumber(((VBO1+VBS1)/jan1)*100,2)%>%

<%=formatnumber(((VBO2+VBS2)/feb1)*100,2)%>%

<%=formatnumber(((VBO3+VBS3)/mar1)*100,2)%>%

<%=formatnumber(((VBO4+VBS4)/apr1)*100,2)%>%

<%=formatnumber(((VBO5+VBS5)/may1)*100,2)%>%

<%=formatnumber(((VBO6+VBS6)/jun1)*100,2)%>%

<%=formatnumber(((VBO7+VBS7)/jul1)*100,2)%>%

<%=formatnumber(((VBO8+VBS8)/aug1)*100,2)%>%

<%=formatnumber(((VBO9+VBS9)/sep1)*100,2)%>%

<%=formatnumber(((VBO10+VBS10)/oct1)*100,2)%>%

<%=formatnumber(((VBO11+VBS11)/nov1)*100,2)%>%

<%=formatnumber(((VBO12+VBS12)/dec1)*100,2)%>%

<%=formatnumber(((VBStotyear1+VBOtotyear1)/totyear1)*100,2)%>%

2016 BP

$3,481 K

$3,592 K

$4,014 K

$4,038 K

$4,160 K

$4,340 K

$4,793 K

$5,414 K

$6,585 K

$7,478 K

$6,131 K

$3,925 K

$57,951 K

<%=lbl_actualyear%> Act

$<%=formatnumber(jan2)%>

$<%=formatnumber(feb2)%>

$<%=formatnumber(mar2)%>

$<%=formatnumber(apr2)%>

$<%=formatnumber(may2)%>

$<%=formatnumber(jun2)%>

$<%=formatnumber(jul2)%>

$<%=formatnumber(aug2)%>

$<%=formatnumber(sep2)%>

$<%=formatnumber(oct2)%>

$<%=formatnumber(nov2)%>

$<%=formatnumber(dec2)%>

$<%=formatnumber(totyear2)%>

2016 %

<%=formatnumber((jan2/bpjan)*100,1)%>%

<%=formatnumber((feb2/bpfeb)*100,1)%>%

<%=formatnumber((mar2/bpmar)*100,1)%>%

<%=formatnumber((apr2/bpapr)*100,1)%>%

<%=formatnumber((may2/bpmay)*100,1)%>%

<%=formatnumber((jun2/bpjun)*100,1)%>%

<%=formatnumber((jul2/bpjul)*100,1)%>%

<%=formatnumber((aug2/bpaug)*100,1)%>%

<%=formatnumber((sep2/bpsep)*100,1)%>%

<%=formatnumber((oct2/bpoct)*100,1)%>%

<%=formatnumber((nov2/bpnov)*100,1)%>%

<%=formatnumber((dec2/bpdec)*100,1)%>%

<%=formatnumber((totyear2/bptot)*100,1)%>%

SAMSUNG

$<%=formatnumber(ljan2SAM)%>

$<%=formatnumber(lfeb2SAM)%>

$<%=formatnumber(lmar2SAM)%>

$<%=formatnumber(lapr2SAM)%>

$<%=formatnumber(lmay2SAM)%>

$<%=formatnumber(ljun2SAM)%>

$<%=formatnumber(ljul2SAM)%>

$<%=formatnumber(laug2SAM)%>

$<%=formatnumber(lsep2SAM)%>

$<%=formatnumber(loct2SAM)%>

$<%=formatnumber(lnov2SAM)%>

$<%=formatnumber(ldec2SAM)%>

$<%=formatnumber(ltotyear2SAM)%>

Percent

<%=formatnumber((ljan2SAM/jan2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((lfeb2SAM/feb2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((lmar2SAM/mar2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((lapr2SAM/apr2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((lMay2SAM/may2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((ljun2SAM/jun2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((ljul2SAM/jul2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((laug2SAM/aug2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((lsep2SAM/sep2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((loct2SAM/oct2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((lnov2SAM/nov2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((ldec2SAM/dec2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber((ltotyear2SAM/totyear2)*100,2)%>%

<%=formatnumber(0,2)%>%

Total V-Board <%=lbl_actualyear%>

$<%=formatnumber(VBO2_1+VBS2_1+(VB1O2_1+VB1S2_1))%>

$<%=formatnumber(VBO2_2+VBS2_2+(VB1O2_2+VB1S2_2))%>

$<%=formatnumber(VBO2_3+VBS2_3+(VB1O2_3+VB1S2_3))%>

$<%=formatnumber(VBO2_4+VBS2_4+(VB1O2_4+VB1S2_4))%>

$<%=formatnumber(VBO2_5+VBS2_5+(VB1O2_5+VB1S2_5))%>

$<%=formatnumber(VBO2_6+VBS2_6+(VB1O2_6+VB1S2_6))%>

$<%=formatnumber(VBO2_7+VBS2_7+(VB1O2_7+VB1S2_7))%>

$<%=formatnumber(VBO2_8+VBS2_8+(VB1O2_8+VB1S2_8))%>

$<%=formatnumber(VBO2_9+VBS2_9+(VB1O2_9+VB1S2_9))%>

$<%=formatnumber(VBO2_10+VBS2_10+(VB1O2_10+VB1S2_10))%>

$<%=formatnumber(VBO2_11+VBS2_11+(VB1O2_11+VB1S2_11))%>

$<%=formatnumber(VBO2_12+VBS2_12+(VB1O2_12+VB1S2_12))%>

$<%=formatnumber(VBStotyear2+VBOtotyear2+(VB1Stotyear2+VB1Ototyear2))%>

V-Board Percent

<%=formatnumber(((VBO2_1+VBS2_1+(VB1O2_1+VB1S2_1))/jan2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_2+VBS2_2+(VB1O2_2+VB1S2_2))/feb2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_3+VBS2_3+(VB1O2_3+VB1S2_3))/mar2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_4+VBS2_4+(VB1O2_4+VB1S2_4))/apr2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_5+VBS2_5+(VB1O2_5+VB1S2_5))/may2)*100,2)%>%

<%=formatnumber(((VBO2_6+VBS2_6+(VB1O2_6+VB1S2_6))/jun2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_7+VBS2_7+(VB1O2_7+VB1S2_7))/jul2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_8+VBS2_8+(VB1O2_8+VB1S2_8))/aug2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_9+VBS2_9+(VB1O2_9+VB1S2_9))/sep2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_10+VBS2_10+(VB1O2_10+VB1S2_10))/oct2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_11+VBS2_11+(VB1O2_11+VB1S2_11))/nov2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBO2_12+VBS2_12+(VB1O2_12+VB1S2_12))/dec2)*100,2)%>%

<%=formatnumber(0,2)%>%

<%=formatnumber(((VBStotyear2+VBOtotyear2+(VB1Stotyear2+VB1Ototyear2))/totyear2)*100,2)%>%

<%=formatnumber(0,2)%>%

<% %> <% %> <% %>

V_BOARD <%=lbl_lastyear%> vs <%=lbl_actualyear%>

January February March April May June July August September October November December Total

V-Board Samsung <%=lbl_lastyear%>

$<%=formatnumber(VBS1+VB1S1)%>

$<%=formatnumber(VBS2+VB1S2)%>

$<%=formatnumber(VBS3+VB1S3)%>

$<%=formatnumber(VBS4+VB1S4)%>

$<%=formatnumber(VBS5+VB1S5)%>

$<%=formatnumber(VBS6+VB1S6)%>

$<%=formatnumber(VBS7+VB1S7)%>

$<%=formatnumber(VBS8+VB1S8)%>

$<%=formatnumber(VBS9+VB1S9)%>

$<%=formatnumber(VBS10+VB1S10)%>

$<%=formatnumber(VBS11+VB1S11)%>

$<%=formatnumber(VBS12+VB1S12)%>

$<%=formatnumber(VBStotyear1+VB1Stotyear1)%>

V-Board Others <%=lbl_lastyear%>

$<%=formatnumber(VBO1+VB1O1)%>

$<%=formatnumber(VBO2+VB1O2)%>

$<%=formatnumber(VBO3+VB1O3)%>

$<%=formatnumber(VBo4+VB1O4)%>

$<%=formatnumber(VBO5+VB1O5)%>

$<%=formatnumber(VBO6+VB1O6)%>

$<%=formatnumber(VBO7+VB1O7)%>

$<%=formatnumber(VBO8+VB1O8)%>

$<%=formatnumber(VBO9+VB1O9)%>

$<%=formatnumber(VBO10+VB1O10)%>

$<%=formatnumber(VBO11+VB1O11)%>

$<%=formatnumber(VBO12+VB1O12)%>
$<%=formatnumber(VBOtotyear1+VB1Ototyear1)%>

Total V-Board <%=lbl_lastyear%> $<%=formatnumber(VBO1+VBS1+(VB1O1+VB1S1))%> $<%=formatnumber(VBO2+VBS2+(VB1O2+VB1S2))%> $<%=formatnumber(VBO3+VBS3+(VB1O3+VB1S3))%> $<%=formatnumber(VBO4+VBS4+(VB1O4+VB1S4))%> $<%=formatnumber(VBO5+VBS5+(VB1O5+VB1S5))%> $<%=formatnumber(VBO6+VBS6+(VB1O6+VB1S6))%> $<%=formatnumber(VBO7+VBS7+(VB1O7+VB1S7))%> $<%=formatnumber(VBO8+VBS8+(VB1O8+VB1S8))%> $<%=formatnumber(VBO9+VBS9+(VB1O9+VB1S9))%> $<%=formatnumber(VBO10+VBS10+(VB1O10+VB1S10))%> $<%=formatnumber(VBO11+VBS11+(VB1O11+VB1S11))%> $<%=formatnumber(VBO12+VBS12+(VB1O12+VB1S12))%> $<%=formatnumber(VBStotyear1+VBOtotyear1+(VB1Stotyear1+VB1Ototyear1))%>

V-Board Samsung <%=lbl_actualyear%>

$<%=formatnumber(VBS2_1+VB1S2_1)%>

$<%=formatnumber(VBS2_2+VB1S2_2)%>

$<%=formatnumber(VBS2_3+VB1S2_3)%>

$<%=formatnumber(VBS2_4+VB1S2_4)%>

$<%=formatnumber(VBS2_5+VB1S2_5)%>

$<%=formatnumber(VBS2_6+VB1S2_6)%>

$<%=formatnumber(VBS2_7+VB1S2_7)%>

$<%=formatnumber(VBS2_8+VB1S2_8)%>

$<%=formatnumber(VBS2_9+VB1S2_9)%>

$<%=formatnumber(VBS2_10+VB1S2_10)%>

$<%=formatnumber(VBS2_11+VB1S2_11)%>

$<%=formatnumber(VBS2_12+VB1S2_12)%>
$<%=formatnumber(VBStotyear2+VB1Stotyear2)%>

V-Board Others <%=lbl_actualyear%>

$<%=formatnumber(VBO2_1+VB1O2_1)%>

$<%=formatnumber(VBO2_2+VB1O2_2)%>

$<%=formatnumber(VBO2_3+VB1O2_3)%>

$<%=formatnumber(VBO2_4+VB1O2_4)%>

$<%=formatnumber(VBO2_5+VB1O2_5)%>

$<%=formatnumber(VBO2_6+VB1O2_6)%>

$<%=formatnumber(VBO2_7+VB1O2_7)%>

$<%=formatnumber(VBO2_8+VB1O2_8)%>

$<%=formatnumber(VBO2_9+VB1O2_9)%>

$<%=formatnumber(VBO2_10+VB1O2_10)%>

$<%=formatnumber(VBO2_11+VB1O2_11)%>

$<%=formatnumber(VBO2_12+VB1O2_12)%>
$<%=formatnumber(VBOtotyear2+VB1Ototyear2)%>

Total V-Board <%=lbl_actualyear%> $<%=formatnumber(VBO2_1+VBS2_1+(VB1O2_1+VB1S2_1))%> $<%=formatnumber(VBO2_2+VBS2_2+(VB1O2_2+VB1S2_2))%> $<%=formatnumber(VBO2_3+VBS2_3+(VB1O2_3+VB1S2_3))%> $<%=formatnumber(VBO2_4+VBS2_4+(VB1O2_4+VB1S2_4))%> $<%=formatnumber(VBO2_5+VBS2_5+(VB1O2_5+VB1S2_5))%> $<%=formatnumber(VBO2_6+VBS2_6+(VB1O2_6+VB1S2_6))%> $<%=formatnumber(VBO2_7+VBS2_7+(VB1O2_7+VB1S2_7))%> $<%=formatnumber(VBO2_8+VBS2_8+(VB1O2_8+VB1S2_8))%> $<%=formatnumber(VBO2_9+VBS2_9+(VB1O2_9+VB1S2_9))%> $<%=formatnumber(VBO2_10+VBS2_10+(VB1O2_10+VB1S2_10))%> $<%=formatnumber(VBO2_11+VBS2_11+(VB1O2_11+VB1S2_11))%> $<%=formatnumber(VBO2_12+VBS2_12+(VB1O2_12+VB1S2_12))%> $<%=formatnumber(VBStotyear2+VBOtotyear2+(VB1Stotyear2+VB1Ototyear2))%>

<% '********************************************************** Inventory Dim Rsinven1, Rsinven2,rswip Dim Sqlinven1,sqlinven2,sqlwip set Rsinven1=dbsql.execute("select b.crp_id,b.cust_cd,(select cust_nm from stb010t(nolock) where cust_cd = b.cust_cd) as customer,b.item, max(b.price) as price,sum(a.in_qty1) - sum(a.out_qty1) as inv_qty1,round(max(b.price) * (sum(a.in_qty1) - sum(a.out_qty1)),3) as inv_amt1, sum(a.in_qty2) - sum(a.out_qty2) as inv_qty2,round(max(b.price) * (sum(a.in_qty2) - sum(a.out_qty2)),3) as inv_amt2, sum(a.in_qty3) - sum(a.out_qty3) as inv_qty3,round(max(b.price) * (sum(a.in_qty3) - sum(a.out_qty3)),3) as inv_amt3, sum(a.in_qty4) - sum(a.out_qty4) as inv_qty4,round(max(b.price) * (sum(a.in_qty4) - sum(a.out_qty4)),3) as inv_amt4 from (select a.cust_cd, a.item, sum(isnull(a.in_qty1,0)) in_qty1, sum(isnull(a.out_qty1,0)) out_qty1, sum(isnull(a.in_qty2,0)) in_qty2, sum(isnull(a.out_qty2,0)) out_qty2, sum(isnull(a.in_qty3,0)) in_qty3, sum(isnull(a.out_qty3,0)) out_qty3,sum(isnull(a.in_qty4,0)) in_qty4, sum(isnull(a.out_qty4,0)) out_qty4 from (select cust_cd, item, sum(qty) in_qty1 , 0 out_qty1, 0 in_qty2 ,0 out_qty2, 0 in_qty3 , 0 out_qty3, 0 in_qty4 , 0 out_qty4 from inout_table where class = '1' and crp_id = '10' and local_cd = '1' group by cust_cd, item union select cust_cd, item,0 in_qty1 , sum(qty) out_qty1,0 in_qty2 , 0 out_qty2,0 in_qty3 , 0 out_qty3, 0 in_qty4 , 0 out_qty4 from inout_table where class = '2' and crp_id = '10' and local_cd = '1' group by cust_cd, item union select cust_cd, item, 0 in_qty2 , 0 out_qty2, sum(qty) in_qty1 , 0 out_qty1, 0 in_qty3, 0 out_qty3, 0 in_qty4 , 0 out_qty4 from inout_table where class = '1' and crp_id = '10' and local_cd = '2' group by cust_cd, item union select cust_cd, item, 0 in_qty2 , 0 out_qty2, 0 in_qty1 , sum(qty) out_qty1, 0 in_qty3 , 0 out_qty3, 0 in_qty4 , 0 out_qty4 from inout_table where class = '2' and crp_id = '10' and local_cd = '2' group by cust_cd, item union select cust_cd, item, 0 in_qty1 , 0 out_qty1,0 in_qty2, 0 out_qty2, sum(qty) in_qty3,0 out_qty3, 0 in_qty4 , 0 out_qty4 from inout_table where class = '1' and crp_id = '10' and local_cd = '3' group by cust_cd, item union select cust_cd, item, 0 in_qty1 ,0 out_qty1, 0 in_qty2 , 0 out_qty2, 0 in_qty3 , sum(qty) out_qty3, 0 in_qty4 , 0 out_qty4 from inout_table where class = '2' and crp_id = '10' and local_cd = '3' group by cust_cd, item union select cust_cd, item, 0 in_qty1 , 0 out_qty1,0 in_qty2, 0 out_qty2, 0 in_qty3,0 out_qty3, sum(qty) in_qty4 , 0 out_qty4 from inout_table where class = '1' and crp_id = '10' and local_cd = '4' group by cust_cd, item union select cust_cd, item, 0 in_qty1 ,0 out_qty1, 0 in_qty2 , 0 out_qty2, 0 in_qty3 , 0 out_qty3, 0 in_qty4 , sum(qty) out_qty4 from inout_table where class = '2' and crp_id = '10' and local_cd = '4' group by cust_cd, item) a group by a.cust_cd, a.item) a, (select crp_id, cust_cd, item, max(price) price from inout_table where class = '1' group by crp_id, cust_cd, item ) b where a.cust_cd = b.cust_cd and a.item = b.item and b.crp_id = '10' and (a.in_qty1 - a.out_qty1 <> 0 or a.in_qty2 - a.out_qty2 <> 0 or a.in_qty3 - a.out_qty3 <> 0 or a.in_qty4 - a.out_qty4 <> 0) group by b.crp_id, b.cust_cd, b.item order by b.crp_id, b.cust_cd, b.item") lspace=" " apostrofe="'" If Rsinven1.EOF And Rsinven1.BOF Then ExisteUsuario = False Msg = "No records exist for this date." Style = vbDefaultButton2 Title = "Msg from System" Help = "" ctxt = 1000 'Response = MsgBox(Msg, Style, Title, Help, ctxt) Else lOBSamsung = 0 lOTSamsung = 0 lOBSamsung2 = 0 lOTSamsung2 = 0 lOBSamsung2WH3 = 0 lOTSamsungWH3 = 0 lOBSamsung3 = 0 lOTSamsung3 = 0 lOBSamsung2WH4 = 0 lOTSamsungWH4 = 0 lSamsungObsOB1 = 0 lSamsungObsOT1 = 0 lSamsungObsOB1WH3 = 0 lSamsungObsOT1WH3 = 0 lSamsungObsOB1WH4 = 0 lSamsungObsOT1WH4 = 0 lOthers1 = 0 lOthers2 = 0 lOthers11 = 0 lOthers12 = 0 lOthers13 = 0 lOthers14 = 0 lTotalQtyInv1 = 0 lTotalQtyInv2 = 0 lTotalM2Inv1 = 0 lTotalM2Inv2 = 0 lTotalDllInv1 = 0 lTotalDllInv2 = 0 lTotalQtyInvD = 0 lTotalM2InvD = 0 lTotalDllInvD = 0 lqtyinven = 0 lqtyinven2 = 0 lamtinven = 0 lm2inven = 0 lcode1="BN69-12806A" lcode2="BN69-12807A" lcode3="BN69-00391U" lcode4="BN69-00391Y" lcode10="BN69-05528A V-BOARD" lcode11="BN69-00391E V-BOARD" lcode12="BN69-06769A" 'lcode13="BN69-12807A" lcode1qty=0 lcode1amt=0 lcode2qty=0 lcode2amt=0 lcode3qty=0 lcode3amt=0 lcode4qty=0 lcode4amt=0 lcode10qty=0 lcode10amt=0 lcode11qty=0 lcode11amt=0 lcode12qty=0 lcode12amt=0 totalvbqty3=0 totalvbqty4=0 totalvbamt3=0 totalvbamt4=0 Rsinven1.MoveFirst %>

V-Board Inventory <% Do While Not Rsinven1.EOF 'response.write (lqtybook&",") 'response.write (Rsinven1("po_qty")&",") lqtyinven = lqtyinven + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lamtinven = lamtinven + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")) lSubqty = cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lSubAmt = cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")) lspace=" " 'apostrofe="'" if InStr(Rsinven1("item"),"'") then set Rsinven3=dbsql.execute("select * from stb040t where cust_cd='" & Rsinven1("cust_cd") & "' and replace(good_nm,char(39),'" & lspace & "')='" & replace(Rsinven1("item"),apostrofe,lspace) & "'") else set Rsinven3=dbsql.execute("select * from stb040t where cust_cd='" & Rsinven1("cust_cd") & "' and good_nm='" & Rsinven1("item") & "'") end if if not rsinven3.eof then localm2=((cdbl(Rsinven3("sht_size1")) * cdbl(Rsinven3("sht_size2")) / 1000000) / cdbl(Rsinven3("poksu")) / cdbl(Rsinven3("julsu")) * cdbl(Rsinven3("hapsu")) * lSubqty) end if lm2inven = lm2inven + cdbl(localm2) if Rsinven1("cust_cd")="20001" then 'CTE if Rsinven1("item") =lcode1 then lcode1qty = lcode1qty + cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3")) lcode1amt = lcode1amt + cdbl(Rsinven1("inv_amt1"))+ cdbl(Rsinven1("inv_amt2"))+ cdbl(Rsinven1("inv_amt3")) lcode1qty4 = lcode1qty4 + cdbl(Rsinven1("inv_qty4")) lcode1amt4 = lcode1amt4 + cdbl(Rsinven1("inv_amt4")) lcode1qty1 = lcode1qty1 + cdbl(Rsinven1("inv_qty1")) lcode1amt1 = lcode1amt1 + cdbl(Rsinven1("inv_amt1")) lcode1qty2 = lcode1qty2 + cdbl(Rsinven1("inv_qty2")) lcode1amt2 = lcode1amt2 + cdbl(Rsinven1("inv_amt2")) end if if Rsinven1("item") =lcode2 then lcode2qty = lcode2qty + cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3")) lcode2amt = lcode2amt + cdbl(Rsinven1("inv_amt1"))+ cdbl(Rsinven1("inv_amt2"))+ cdbl(Rsinven1("inv_amt3")) lcode2qty4 = lcode2qty4 + cdbl(Rsinven1("inv_qty4")) lcode2amt4 = lcode2amt4 + cdbl(Rsinven1("inv_amt4")) lcode2qty1 = lcode2qty1 + cdbl(Rsinven1("inv_qty1")) lcode2amt1 = lcode2amt1 + cdbl(Rsinven1("inv_amt1")) lcode2qty2 = lcode2qty2 + cdbl(Rsinven1("inv_qty2")) lcode2amt2 = lcode2amt2 + cdbl(Rsinven1("inv_amt2")) end if if Rsinven1("item")=lcode3 then lcode3qty = lcode3qty + cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3")) lcode3amt = lcode3amt + cdbl(Rsinven1("inv_amt1"))+ cdbl(Rsinven1("inv_amt2"))+ cdbl(Rsinven1("inv_amt3")) lcode3qty4 = lcode3qty4 + cdbl(Rsinven1("inv_qty4")) lcode3amt4 = lcode3amt4 + cdbl(Rsinven1("inv_amt4")) lcode3qty1 = lcode3qty1 + cdbl(Rsinven1("inv_qty1")) lcode3amt1 = lcode3amt1 + cdbl(Rsinven1("inv_amt1")) lcode3qty2 = lcode3qty2 + cdbl(Rsinven1("inv_qty2")) lcode3amt2 = lcode3amt2 + cdbl(Rsinven1("inv_amt2")) end if if Rsinven1("item")=lcode4 then lcode4qty = lcode4qty + cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3")) lcode4amt = lcode4amt + cdbl(Rsinven1("inv_amt1"))+ cdbl(Rsinven1("inv_amt2"))+ cdbl(Rsinven1("inv_amt3")) lcode4qty4 = lcode4qty4 + cdbl(Rsinven1("inv_qty4")) lcode4amt4 = lcode4amt4 + cdbl(Rsinven1("inv_amt4")) lcode4qty1 = lcode4qty1 + cdbl(Rsinven1("inv_qty1")) lcode4amt1 = lcode4amt1 + cdbl(Rsinven1("inv_amt1")) lcode4qty2 = lcode4qty2 + cdbl(Rsinven1("inv_qty2")) lcode4amt2 = lcode4amt2 + cdbl(Rsinven1("inv_amt2")) end if if Rsinven1("item")=lcode10 then lcode10qty = lcode10qty + cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3")) lcode10amt = lcode10amt + cdbl(Rsinven1("inv_amt1"))+ cdbl(Rsinven1("inv_amt2"))+ cdbl(Rsinven1("inv_amt3")) lcode10qty4 = lcode10qty4 + cdbl(Rsinven1("inv_qty4")) lcode10amt4 = lcode10amt4 + cdbl(Rsinven1("inv_amt4")) lcode10qty1 = lcode10qty1 + cdbl(Rsinven1("inv_qty1")) lcode10amt1 = lcode10amt1 + cdbl(Rsinven1("inv_amt1")) lcode10qty2 = lcode10qty2 + cdbl(Rsinven1("inv_qty2")) lcode10amt2 = lcode10amt2 + cdbl(Rsinven1("inv_amt2")) end if if Rsinven1("item")=lcode11 then lcode11qty = lcode11qty + cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3")) lcode11amt = lcode11amt + cdbl(Rsinven1("inv_amt1"))+ cdbl(Rsinven1("inv_amt2"))+ cdbl(Rsinven1("inv_amt3")) lcode11qty4 = lcode11qty4 + cdbl(Rsinven1("inv_qty4")) lcode11amt4 = lcode11amt4 + cdbl(Rsinven1("inv_amt4")) lcode11qty1 = lcode11qty1 + cdbl(Rsinven1("inv_qty1")) lcode11amt1 = lcode11amt1 + cdbl(Rsinven1("inv_amt1")) lcode11qty2 = lcode11qty2 + cdbl(Rsinven1("inv_qty2")) lcode11amt2 = lcode11amt2 + cdbl(Rsinven1("inv_amt2")) end if if Rsinven1("item")=lcode12 then lcode12qty = lcode12qty + cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3")) lcode12amt = lcode12amt + cdbl(Rsinven1("inv_amt1"))+ cdbl(Rsinven1("inv_amt2"))+ cdbl(Rsinven1("inv_amt3")) lcode12qty4 = lcode12qty4 + cdbl(Rsinven1("inv_qty4")) lcode12amt4 = lcode12amt4 + cdbl(Rsinven1("inv_amt4")) lcode12qty1 = lcode12qty1 + cdbl(Rsinven1("inv_qty1")) lcode12amt1 = lcode12amt1 + cdbl(Rsinven1("inv_amt1")) lcode12qty2 = lcode12qty2 + cdbl(Rsinven1("inv_qty2")) lcode12amt2 = lcode12amt2 + cdbl(Rsinven1("inv_amt2")) end if ltypeBox="x" ltypeBox2="x" set Rsinven2=cnn.execute("select * from SamsungItems where good_nm='" & Rsinven1("item") & "'") if not Rsinven2.eof then 'RS ltypeBox=rsinven2("Note_4") ltypeBox2=rsinven2("Note_5") if rsinven2("Note_5")= "INBOX / PAD" then 'PAD lOTSamsung2 = lOTSamsung2 + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lTotalQtyInvD = lTotalQtyInvD + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lOTSamsungWH3 = lOTSamsungWH3 + cdbl(Rsinven1("inv_qty3")) lOTSamsungWH4 = lOTSamsungWH4 + cdbl(Rsinven1("inv_qty4")) lOTSamsungWH1 = lOTSamsungWH1 + cdbl(Rsinven1("inv_qty1")) lOTSamsungWH2 = lOTSamsungWH2 + cdbl(Rsinven1("inv_qty2")) lTotalM2InvD = lTotalM2InvD + localm2 lTotalDllInvD =lTotalDllInvD + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")) else if rsinven2("Note_5")= "NA" then 'NA if rsinven2("Note_4")= "Full Litho" or rsinven2("Note_4")= "Spot Label" or rsinven2("Note_4")= "No Label" then 'lOBSamsung = lOBSamsung + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3")) lSamsungObsOB1 = lSamsungObsOB1 + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lSamsungObsOB1WH3 = lSamsungObsOB1WH3 + cdbl(Rsinven1("inv_qty3")) lSamsungObsOB1WH4 = lSamsungObsOB1WH4 + cdbl(Rsinven1("inv_qty4")) lSamsungObsOB1WH1 = lSamsungObsOB1WH1 + cdbl(Rsinven1("inv_qty1")) 'lTotalM2Inv1 = lTotalM2Inv1 + localm2 'lTotalDllInv1 =lTotalDllInv1 + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3")) else 'lOTSamsung = lOTSamsung + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3")) lSamsungObsOT1 = lSamsungObsOT1 + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lSamsungObsOT1WH3 = lSamsungObsOT1WH3 + cdbl(Rsinven1("inv_qty3")) lSamsungObsOT1WH2 = lSamsungObsOT1WH2 + cdbl(Rsinven1("inv_qty2")) lSamsungObsOT1WH4 = lSamsungObsOT1WH4 + cdbl(Rsinven1("inv_qty4")) lSamsungObsOT1WH1 = lSamsungObsOT1WH1 + cdbl(Rsinven1("inv_qty1")) 'lTotalM2Inv1 = lTotalM2Inv1 + localm2 'lTotalDllInv1 =lTotalDllInv1 + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3")) end if else ' response.write("cod "&Rsinven1("item")) lOBSamsung2 = lOBSamsung2 + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lOBSamsung2WH3 = lOBSamsung2WH3 + cdbl(Rsinven1("inv_qty3")) lOBSamsung2WH4 = lOBSamsung2WH4 + cdbl(Rsinven1("inv_qty4")) lOBSamsung2WH1 = lOBSamsung2WH1 + cdbl(Rsinven1("inv_qty1")) lTotalQtyInvD = lTotalQtyInvD + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lTotalM2InvD = lTotalM2InvD + localm2 lTotalDllInvD =lTotalDllInvD + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")) end if 'NA end if 'PAD else lOTSamsung = lOTSamsung + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3")) + cdbl(Rsinven1("inv_qty4")) lOTSamsungWH3 = lOTSamsungWH3 + cdbl(Rsinven1("inv_qty3")) lOTSamsungWH4 = lOTSamsungWH4 + cdbl(Rsinven1("inv_qty4")) lOTSamsungWH1 = lOTSamsungWH1 + cdbl(Rsinven1("inv_qty1")) end if 'RS lTotalQtyInv1 = lTotalQtyInv1 + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3")) + cdbl(Rsinven1("inv_qty4")) lTotalM2Inv1 = lTotalM2Inv1 + localm2 lTotalDllInv1 =lTotalDllInv1 + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")) Rsinven2.Close Set Rsinven2 = Nothing else lspace=" " if instr(Rsinven1("item"),"'") then set Rsother=cnn.execute("select * from Items where good_nm='" & replace(Rsinven1("item"),apostrofe,lspace) & "'") else set Rsother=cnn.execute("select * from Items where good_nm='" & Rsinven1("item") & "'") end if if not Rsother.eof then 'RS ltypeBox=rsother("Note_4") ltypeBox2=rsother("Note_5") if rsother("Note_5")= "NA" then 'NA lOtherObs1 = lOtherObs1 + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3") )+ cdbl(Rsinven1("inv_qty4")) lOther1Obs1 = lOther1Obs1 + cdbl(Rsinven1("inv_qty1")) lOther2Obs1 = lOther2Obs1 + cdbl(Rsinven1("inv_qty2")) lOther3Obs1 = lOther3Obs1 + cdbl(Rsinven1("inv_qty3")) lOther4Obs1 = lOther4Obs1 + cdbl(Rsinven1("inv_qty4")) lOtherObsM2 = lOtherObsM2 + localm2 lOtherObsDll =lOtherObsDll + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")) end if ELSE end if lOthers1 = lOthers1 + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lOthers11 = lOthers11 + cdbl(Rsinven1("inv_qty1")) lOthers12 = lOthers12 + cdbl(Rsinven1("inv_qty2")) lOthers13 = lOthers13 + cdbl(Rsinven1("inv_qty3")) lOthers14 = lOthers14 + cdbl(Rsinven1("inv_qty4")) 'lOthers2 = 0 lTotalQtyInv2 = lTotalQtyInv2 + cdbl(Rsinven1("inv_qty1")) + cdbl(Rsinven1("inv_qty2")) + cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) lTotalM2Inv2 = lTotalM2Inv2 + localm2 lTotalDllInv2 =lTotalDllInv2 + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")) end if if Rsinven1("item")=lcode1 or Rsinven1("item")=lcode2 or Rsinven1("item")=lcode3 or Rsinven1("item")=lcode4 or Rsinven1("item")=lcode10 or Rsinven1("item")=lcode11 or Rsinven1("item")=lcode12 then totalvbqty=totalvbqty + cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4")) totalvbamt=totalvbamt + cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")) if Rsinven1("cust_cd")<>"20001" then totalvbqty3=totalvbqty3 + cdbl(Rsinven1("inv_qty3")) totalvbqty4=totalvbqty4 + cdbl(Rsinven1("inv_qty4")) totalvbamt3=totalvbamt3 + cdbl(Rsinven1("inv_amt3")) totalvbamt4=totalvbamt4 + cdbl(Rsinven1("inv_amt4")) end if %> <% end if Rsinven1.MoveNext Loop End If Rsinven1.Close Set Rsinven1 = Nothing %>

Customer	Item	TOTAL
Customer	Item	Qty	Dlls
<%=Rsinven1("customer")%>	<%=Rsinven1("item")%>	<%=cdbl(Rsinven1("inv_qty1"))+ cdbl(Rsinven1("inv_qty2"))+ cdbl(Rsinven1("inv_qty3"))+ cdbl(Rsinven1("inv_qty4"))%>	<%=formatnumber(cdbl(Rsinven1("inv_amt1")) + cdbl(Rsinven1("inv_amt2")) + cdbl(Rsinven1("inv_amt3"))+ cdbl(Rsinven1("inv_amt4")),2)%>
		<%=formatnumber(totalvbqty,0)%>	<%=formatnumber(totalvbamt,2)%>

<% '**************end inventory '********************************************************** Inventory V-Board '***********************Planta 1 Vboard '********************** End VB planta 1 Dim Rsinvenvb2 set Rsinvenvb2=dbsql2.execute("select a.crp_id, a.cust_cd, (select cust_nm from stb010t(nolock) where cust_cd = a.cust_cd) cust_nm, a.good_cd, a.good_nm, max(a.inv_qty1) inv_qty1, max(a.inv_qty2) inv_qty2, max(a.inv_qty3) inv_qty3, max(a.inv_qty4) inv_qty4, max(a.inv_qty5) inv_qty5, max(a.inv_amt1) inv_amt1, max(a.inv_amt2) inv_amt2, max(a.inv_amt3) inv_amt3, max(a.inv_amt4) inv_amt4, max(a.inv_amt5) inv_amt5 from ( select a.crp_id, a.cust_cd, a.good_cd, a.good_nm, sum(isnull(a.jego_qty,0) - isnull(a.mov_qty,0) - isnull(a.sales_qty,0)) inv_qty1, 0 inv_qty2, 0 inv_qty3, 0 inv_qty4, 0 inv_qty5, sum(round((isnull(a.jego_qty,0) - isnull(a.mov_qty,0) - isnull(a.sales_qty,0)) * b.good_price,3)) inv_amt1, 0 inv_amt2, 0 inv_amt3, 0 inv_amt4, 0 inv_amt5 from sal011t a(nolock), boa010t b(nolock) where a.crp_id = b.crp_id and a.goods_class = b.goods_class and a.ord_date = b.ord_date and a.ord_seq = b.ord_seq and b.del_yn = '0' and a.crp_id = '10' and a.local_cd = '1' and a.cust_cd ='20001' and a.real_jego_qty - a.mov_qty - a.sales_qty > 0 group by a.crp_id, a.cust_cd, a.good_cd, a.good_nm union all select a.crp_id, a.cust_cd, a.good_cd, a.good_nm, 0, sum(isnull(a.jego_qty,0) - isnull(a.mov_qty,0) - isnull(a.sales_qty,0)), 0 , 0 , 0, 0 inv_amt2, sum(round((isnull(a.jego_qty,0) - isnull(a.mov_qty,0) - isnull(a.sales_qty,0)) * b.good_price,3)) inv_amt1, 0 inv_amt3, 0 inv_amt4, 0 inv_amt5 from sal011t a(nolock), ooa010t b(nolock) where a.crp_id = b.crp_id and a.goods_class = b.goods_class and a.ord_date = b.ord_date and a.ord_seq = b.ord_seq and b.del_yn = '0' and a.crp_id = '10' and a.local_cd in('A','B') and a.cust_cd ='20001' and a.real_jego_qty - a.mov_qty - a.sales_qty > 0 group by a.crp_id, a.cust_cd, a.good_cd, a.good_nm union all select a.crp_id, a.cust_cd, a.good_cd, a.good_nm, 0, 0, sum(isnull(a.jego_qty,0) - isnull(a.mov_qty,0) - isnull(a.sales_qty,0)) inv_qty1, 0 inv_qty4, 0 inv_qty5, 0 inv_amt2, 0 inv_amt3, sum(round((isnull(a.jego_qty,0) - isnull(a.mov_qty,0) - isnull(a.sales_qty,0)) * b.good_price,3)) inv_amt1, 0 inv_amt4, 0 inv_amt5 from sal011t a(nolock), boa010t b(nolock) where a.crp_id = b.crp_id and a.goods_class = b.goods_class and a.ord_date = b.ord_date and a.ord_seq = b.ord_seq and b.del_yn = '0' and a.crp_id = '10' and a.local_cd <> '1' and a.cust_cd ='20001' and a.real_jego_qty - a.mov_qty - a.sales_qty > 0 group by a.crp_id, a.cust_cd, a.good_cd, a.good_nm union all select a.crp_id, a.cust_cd, a.good_cd, a.good_nm, 0, 0, 0, sum(isnull(a.mov_qty,0)), 0, 0 inv_amt2, 0 inv_amt3, 0 inv_amt4, sum(round(isnull(a.mov_qty,0) * b.good_price,3)) inv_amt1, 0 inv_amt5 from sal011t a(nolock), boa010t b(nolock) where a.crp_id = b.crp_id and a.goods_class = b.goods_class and a.ord_date = b.ord_date and a.ord_seq = b.ord_seq and b.del_yn = '0' and a.crp_id = '10' and a.cust_cd ='20001' and a.mov_qty <> 0 and a.real_jego_qty - a.sales_qty > 0 group by a.crp_id, a.cust_cd, a.good_cd, a.good_nm union all select a.crp_id, a.cust_cd, a.good_cd, a.good_nm, 0, 0, 0, 0, sum(isnull(a.mov_qty,0)), 0 inv_amt2, 0 inv_amt3, 0 inv_amt4, 0 inv_amt5, sum(round(isnull(a.mov_qty,0) * b.good_price,3)) inv_amt1 from sal011t a(nolock), ooa010t b(nolock) where a.crp_id = b.crp_id and a.goods_class = b.goods_class and a.ord_date = b.ord_date and a.ord_seq = b.ord_seq and b.del_yn = '0' and a.crp_id = '10' and a.cust_cd ='20001' and a.mov_qty <> 0 and a.real_jego_qty - a.sales_qty > 0 group by a.crp_id, a.cust_cd, a.good_cd, a.good_nm ) a group by a.crp_id, a.cust_cd, a.good_cd, a.good_nm order by a.crp_id, a.cust_cd, a.good_cd") txx=0 if txx=1 then larchivo="\\server2\reporte\InvTotSamsungVB.xlsx" Path=larchivo Set ConexionBD = Server.CreateObject("ADODB.Connection") ConexionBD.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & path & ";Extended Properties='Excel 12.0 Xml;HDR=no;IMEX=1';" Set rsVac = Server.CreateObject("ADODB.Recordset") rsVac.Open "Select * From [InvTotSamsungVB$]", ConexionBD,3 ,3 if rsVac.eof or rsVac.bof then ExisteUsuario = False Msg = "No inventory exist for this date." Style = vbDefaultButton2 Title = "Msg from System" Help = "" ctxt = 1000 'Response = MsgBox(Msg, Style, Title, Help, ctxt) Else lqtyvb=0 lamtvb=0 ltotqtyvb=0 ltotamtvb=0 lcode1="BN69-12806A" lcode2="BN69-12807A" lcode3="BN69-00391U" lcode4="BN69-00391Y" lcode5="0330325 (V BOARDS)" lcode6="V Boards 2x2x96" lcode7="31"& Chr(34) &" Kraft V-Board" lcode8="45"& Chr(34) &" Kraft V-Board" lcode9="8 Feets V-Board" lcode10="BN69-05528A V-BOARD" lcode11="BN69-00391E V-BOARD" lcode12="BN69-06769A" lcode13="BN69-12807A" rsVac.MoveFirst Do While Not RsVac.EOF if rsVac(3) =lcode1 then lcode1qty = cdbl(rsVac(14)) lcode1amt = cdbl(rsVac(15)) end if if rsVac(3) =lcode2 then lcode2qty = cdbl(rsVac(14)) lcode2amt = cdbl(rsVac(15)) end if if rsVac(3)=lcode3 then lcode3qty = cdbl(rsVac(14)) lcode3amt = cdbl(rsVac(15)) end if if rsVac(3)=lcode4 then lcode4qty = cdbl(rsVac(14)) lcode4amt = cdbl(rsVac(15)) end if RsVac.MoveNext Loop End If RsVac.Close Set RsVac = Nothing else if Rsinvenvb2.eof or Rsinvenvb2.bof then ExisteUsuario = False Msg = "No inventory exist for this date." Style = vbDefaultButton2 Title = "Msg from System" Help = "" ctxt = 1000 'Response = MsgBox(Msg, Style, Title, Help, ctxt) Else lqtyvb=0 lamtvb=0 ltotqtyvb=0 ltotamtvb=0 lcode1="BN69-12806A" lcode2="BN69-12807A" lcode3="BN69-00391U" lcode4="BN69-00391Y" lcode5="0330325 (V BOARDS)" lcode6="V Boards 2x2x96" lcode7="31"& Chr(34) &" Kraft V-Board" lcode8="45"& Chr(34) &" Kraft V-Board" lcode9="8 Feets V-Board" lcode10="BN69-05528A V-BOARD" lcode11="BN69-00391E V-BOARD" lcode12="BN69-06769A" lcode13="BN69-12807A" Rsinvenvb2.MoveFirst Do While Not Rsinvenvb2.EOF if Rsinvenvb2("good_nm") =lcode1 then lcode1qty = lcode1qty + cdbl(Rsinvenvb2("inv_qty1"))+ cdbl(Rsinvenvb2("inv_qty2"))+ cdbl(Rsinvenvb2("inv_qty3"))+ cdbl(Rsinvenvb2("inv_qty4"))+ cdbl(Rsinvenvb2("inv_qty5")) lcode1amt = lcode1amt + cdbl(Rsinvenvb2("inv_amt1"))+ cdbl(Rsinvenvb2("inv_amt2"))+ cdbl(Rsinvenvb2("inv_amt3"))+ cdbl(Rsinvenvb2("inv_amt4"))+ cdbl(Rsinvenvb2("inv_amt5")) end if if Rsinvenvb2("good_nm") =lcode2 then lcode2qty = lcode2qty + cdbl(Rsinvenvb2("inv_qty1"))+ cdbl(Rsinvenvb2("inv_qty2"))+ cdbl(Rsinvenvb2("inv_qty3"))+ cdbl(Rsinvenvb2("inv_qty4"))+ cdbl(Rsinvenvb2("inv_qty5")) lcode2amt = lcode2amt + cdbl(Rsinvenvb2("inv_amt1"))+ cdbl(Rsinvenvb2("inv_amt2"))+ cdbl(Rsinvenvb2("inv_amt3"))+ cdbl(Rsinvenvb2("inv_amt4"))+ cdbl(Rsinvenvb2("inv_amt5")) end if if Rsinvenvb2("good_nm")=lcode3 then lcode3qty = lcode3qty + cdbl(Rsinvenvb2("inv_qty1"))+ cdbl(Rsinvenvb2("inv_qty2"))+ cdbl(Rsinvenvb2("inv_qty3"))+ cdbl(Rsinvenvb2("inv_qty4"))+ cdbl(Rsinvenvb2("inv_qty5")) lcode3amt = lcode3amt + cdbl(Rsinvenvb2("inv_amt1"))+ cdbl(Rsinvenvb2("inv_amt2"))+ cdbl(Rsinvenvb2("inv_amt3"))+ cdbl(Rsinvenvb2("inv_amt4"))+ cdbl(Rsinvenvb2("inv_amt5")) end if if Rsinvenvb2("good_nm")=lcode4 then lcode4qty = lcode4qty + cdbl(Rsinvenvb2("inv_qty1"))+ cdbl(Rsinvenvb2("inv_qty2"))+ cdbl(Rsinvenvb2("inv_qty3"))+ cdbl(Rsinvenvb2("inv_qty4"))+ cdbl(Rsinvenvb2("inv_qty5")) lcode4amt = lcode4amt + cdbl(Rsinvenvb2("inv_amt1"))+ cdbl(Rsinvenvb2("inv_amt2"))+ cdbl(Rsinvenvb2("inv_amt3"))+ cdbl(Rsinvenvb2("inv_amt4"))+ cdbl(Rsinvenvb2("inv_amt5")) end if Rsinvenvb2.MoveNext Loop End If Rsinvenvb2.Close Set Rsinvenvb2 = Nothing end if '**************end inventory V-Board set Rswip=cnn.execute("select * from wip") lsheetwip=rswip("SHEETWIP") lboxwip=rswip("boxwip") lboxrwr=rswip("boxrwr") rswip.close set rswip = nothing cnn.close set cnn = nothing dbsql.Close Set dbsql = Nothing dbsql2.Close Set dbsql2 = Nothing dbsql3.Close Set dbsql3 = Nothing 'db.close lsamsungvbqty=(lcode1qty+lcode2qty+lcode3qty+lcode4qty+lcode10qty+lcode11qty+lcode12qty) lsamsungvbamt=(lcode1amt+lcode2amt+lcode3amt+lcode4amt+lcode10amt+lcode11amt+lcode12amt) lsamsungvbqty4=(lcode1qty4+lcode2qty4+lcode3qty4+lcode4qty4+lcode10qty4+lcode11qty4+lcode12qty4) lsamsungvbamt4=(lcode1amt4+lcode2amt4+lcode3amt4+lcode4amt4+lcode10amt4+lcode11amt4+lcode12amt4) lsamsungvbqty1=(lcode1qty1+lcode2qty1+lcode3qty1+lcode4qty1+lcode10qty1+lcode11qty1+lcode12qty1) lsamsungvbamt1=(lcode1amt1+lcode2amt1+lcode3amt1+lcode4amt1+lcode10amt1+lcode11amt1+lcode12amt1) lsamsungvbqty2=(lcode1qty2+lcode2qty2+lcode3qty2+lcode4qty2+lcode10qty2+lcode11qty2+lcode12qty2) lsamsungvbamt2=(lcode1amt2+lcode2amt2+lcode3amt2+lcode4amt2+lcode10amt2+lcode11amt2+lcode12amt2) lvbinv=0 if lvbinv=1 then %>

V-Board Inventory

Item	TOTAL
Item	Qty	Dlls
<%=lcode1%>	<%=lcode1qty+lcode1qty4%>	<%=formatnumber(lcode1amt+lcode1amt4,2)%>
<%=lcode2%>	<%=lcode2qty+lcode2qty4%>	<%=formatnumber(lcode2amt+lcode2amt4,2)%>
<%=lcode3%>	<%=lcode3qty+lcode3qty4%>	<%=formatnumber(lcode3amt+lcode3amt4,2)%>
<%=lcode4%>	<%=lcode4qty+lcode4qty4%>	<%=formatnumber(lcode4amt+lcode4amt4,2)%>
<%=lcode10%>	<%=lcode10qty+lcode10qty4%>	<%=formatnumber(lcode10amt+lcode10amt4,2)%>
<%=lcode11%>	<%=lcode11qty+lcode11qty4%>	<%=formatnumber(lcode11amt+lcode11amt4,2)%>
<%=lcode12%>	<%=lcode12qty+lcode12qty4%>	<%=formatnumber(lcode12amt+lcode12amt4,2)%>
	<%=formatnumber((lcode1qty+lcode2qty+lcode3qty+lcode4qty+lcode10qty+lcode11qty+lcode12qty+lcode1qty4+lcode2qty4+lcode3qty4+lcode4qty4+lcode10qty4+lcode11qty4+lcode12qty4),0)%>	<%=formatnumber((lcode1amt+lcode2amt+lcode3amt+lcode4amt+lcode10amt+lcode11amt+lcode12amt+lcode1amt4+lcode2amt4+lcode3amt4+lcode4amt4+lcode10amt4+lcode11amt4+lcode12amt4),2)%>

<% end if %> ACTUAL INVENTORY

Generated: <%=time%>		OB WH3 Nordika	WH4	OB Transfer	OB Total	Others WH3 Nordika	WH4	Others Transfer	WH2	Others Total	TOTAL
Generated: <%=time%>		OB WH3 Nordika	WH4	OB Transfer	OB Total	Others WH3 Nordika	WH4	Others Transfer	WH2	Others Total	Qty	M2	Dlls
Samsung	Obsolete	<%=(lSamsungObsOB1WH3)%>	<%=(lSamsungObsOB1WH4)%>	<%=(lSamsungObsOB1WH1)%>	<%=(lSamsungObsOB1)%>	<%=(lSamsungObsOT1WH3)%>	<%=(lSamsungObsOT1WH4-lSamsungvbqty4)%>	<%=(lSamsungObsOT1WH1-lSamsungvbqty1)%>		<%=(lSamsungObsOT1-lSamsungvbqty-lSamsungvbqty4)%>	<%=formatnumber(lSamsungObsOB1+lSamsungObsOT1-lSamsungvbqty-lSamsungvbqty4,0)%>	<%=formatnumber(lTotalM2Inv1-lTotalM2InvD,0)%>	$<%=formatnumber(lTotalDllInv1-lTotalDllInvD)%>
	Actual	<%=lOBSamsung2WH3%>	<%=lOBSamsung2WH4%>	<%=lOBSamsung2WH1%>	<%=lOBSamsung2%>	<%=lOTSamsungWH3%>	<%=lOTSamsungWH4%>	<%=lOTSamsungWH1%>		<%=lOTSamsung2+lOTSamsung%>	<%=formatnumber(lTotalQtyInvD+lOTSamsung,0)%>	<%=formatnumber(lTotalM2InvD,0)%>	$<%=formatnumber(lTotalDllInvD-lsamsungvbamt-lsamsungvbamt4)%>
	VB Actual					<%=(lSamsungvbqty-lSamsungvbqty1)%>	<%=lSamsungvbqty4%>	<%=lSamsungvbqty1%>		<%=(lSamsungvbqty+lSamsungvbqty4)%>	<%=formatnumber(lSamsungvbqty+lSamsungvbqty4,0)%>		$<%=formatnumber(lsamsungvbamt+lsamsungvbamt4)%>
	Total Samsung				<%=(lSamsungObsOB1+lOBSamsung2)%>					<%=(lSamsungObsOT1+lOTSamsung2+lOTSamsung)%>	<%=formatnumber((lSamsungObsOB1+lSamsungObsOT1+lTotalQtyInvD+lOTSamsung),0)%>	<%=formatnumber(lTotalM2Inv1,0)%>	$<%=formatnumber(lTotalDllInv1+lsamsungvbamt)%>
Others	Obsolete				0	<%=(lOther3Obs1)%>	<%=(lOther4Obs1)%>	<%=(lOther1Obs1)%>	<%=(lOther2Obs1)%>	<%=(lOtherObs1)%>	<%=(lOtherObs1)%>	<%=formatnumber(lOtherObsM2,0)%>	$<%=formatnumber(lOtherObsDll)%>
	Actual				0	<%=(lOthers13-lOther3Obs1-totalvbqty3)%>	<%=(lOthers14-lOther4Obs1-totalvbqty4)%>	<%=(lOthers11-lOther1Obs1)%>	<%=(lOthers12-lOther2Obs1)%>	<%=(lOthers1-lOtherObs1-totalvbqty3-totalvbqty4)%>	<%=formatnumber(lTotalQtyInv2-lOtherObs1-totalvbqty3-totalvbqty4,0)%>	<%=formatnumber(lTotalM2Inv2-lOtherObsM2,0)%>	$<%=formatnumber(lTotalDllInv2-lOtherObsDll-totalvbamt3-totalvbamt4)%>
	VB					<%=totalvbqty3 %>	<%=totalvbqty4 %>				<%=totalvbqty3+totalvbqty4 %>		$<%=formatnumber(totalvbamt3+totalvbamt4)%>
	Total Others				0	<%=lOthers13%>	<%=lOthers14%>	<%=lOthers11%>	<%=lOthers12%>	<%=lOthers1%>	<%=formatnumber(lTotalQtyInv2,0)%>	<%=formatnumber(lTotalM2Inv2,0)%>	$<%=formatnumber(lTotalDllInv2)%>
Total					<%=(lSamsungObsOB1+lOBSamsung2)%>					<%=(lOthers1+lSamsungObsOT1+lOTSamsung2+lOTSamsung)%>	<%=formatnumber((lSamsungObsOB1+lSamsungObsOT1+lTotalQtyInvD+lOTSamsung)+lTotalQtyInv2,0)%>	<%=formatnumber(lTotalM2Inv1+lTotalM2Inv2,0)%>	$<%=formatnumber(lTotalDllInv1+lTotalDllInv2++lsamsungvbamt)%>

W I P <% if lsheetwip=0 then%> <%else%> <%end if%> <% if lboxwip=0 then%> <%else%> <%end if%>

	TOTAL
	Qty	Dlls
SHEET	No Data	<%=formatnumber(lsheetwip,0)%>
BOX	No Data	<%=formatnumber(lboxwip,0)%>
	<%=formatnumber((lsheetwip+lboxwip),0)%>

R W R <% if lboxrwr=0 then%> <%else%> <%end if%> <% if lboxrwr=0 then%> <%else%> <%end if%>

	TOTAL
	Qty
BOX	No Data	<%=formatnumber(lboxrwr,0)%>
	0	<%=formatnumber(lboxrwr,0)%>