Order Information
<<
FOR NAME=Store8.ShoppingCart ROWNAME=t DO
DISPLAY
'| Item '+t[11]+
') | '+t[2]+' | '+t[5]+" "+t[6]+' |
delete
| '+t[12]+
' each @ | $'+FORMAT(t[4],"COMMA")+
' = | $'+FORMAT(t[13],"COMMA")+' | '
/DISPLAY
/FOR
Store8.SubTotal = ROUNDSIG(SUMCOL( Store8.ShoppingCart, 13 ),2)
Store8.TotalShipping = SUMCOL( Store8.ShoppingCart, 14 )
Store8.TotalShipping = Store8.TotalShipping+Store8.Shippingbase+
Store8.shippingpercent*Store8.Subtotal
Store8.Totalshipping = ROUNDSIG(Store8.Totalshipping,2)
IF Store8.AddTax="TRUE" THEN
Store8.Tax = ROUNDSIG((Store8.SubTotal * Store8.TaxRate),2)
ELSE
Store8.Tax = "0.00"
/IF
Store8.Total =
ROUNDSIG((Store8.SubTotal + Store8.TotalShipping + Store8.Tax),2)
>>
| |
| Subtotal: |
<> |
| UPS Ground shipping: |
<> |
<<
IF Store8.allowsalestax != "NO" THEN
DISPLAY
'
| Sales Tax
(Resident of '+Store8.TaxState+':
Yes No): |
'+Store8.Tax+' |
| | '
/DISPLAY
/IF
>>
| Total: |
$<> |
|