if file('t_orders.dbf')
drop table t_orders
endif
if not file('t_orders.dbf')
create table t_orders (id autoinc, t_size_order numeric (2),;
t_size character(13),t_color character(8),qty numeric(10))
endif
tshirt1 = new query()
tshirt1.sql = 'select * from packet where tshirtquant > 0 order by tshirtsize,tshirtcolor'
tshirt1.active = true
t_orders1 = new query()
t_orders1.sql = 'select * from t_orders'
t_orders1.active = true
do while not tshirt1.rowset.endofset
cColor = tshirt1.rowset.fields['TshirtColor'].value
if tshirt1.rowset.fields['TshirtSize'].value = 'XXS'
cSize = 'XX-Small'
cSizeOrder = 1
elseif tshirt1.rowset.fields['TshirtSize'].value = 'XS'
cSize = 'X-Small'
cSizeOrder = 2
elseif tshirt1.rowset.fields['TshirtSize'].value = 'SM'
cSize = 'Small'
cSizeOrder = 3
elseif tshirt1.rowset.fields['TshirtSize'].value = 'MD'
cSize = 'Medium'
cSizeOrder = 4
elseif tshirt1.rowset.fields['TshirtSize'].value = 'LG'
cSize = 'Large'
cSizeOrder = 5
elseif tshirt1.rowset.fields['TshirtSize'].value = 'XL'
cSize = 'X-Large'
cSizeOrder = 6
elseif tshirt1.rowset.fields['TshirtSize'].value = 'XXL'
cSize = 'XX-Large'
cSizeOrder = 7
elseif tshirt1.rowset.fields['TshirtSize'].value = '3XL'
cSize = '3X-Large'
cSizeOrder = 8
elseif tshirt1.rowset.fields['TshirtSize'].value = 'YS'
cSize = 'Youth Small'
cSizeOrder = 9
elseif tshirt1.rowset.fields['TshirtSize'].value = 'YM'
cSize = 'Youth Medium'
cSizeOrder = 10
elseif tshirt1.rowset.fields['TshirtSize'].value = 'YL'
cSize = 'Youth Large'
cSizeOrder = 11
elseif tshirt1.rowset.fields['TshirtSize'].value = 'WS'
cSize = 'Women Small'
cSizeOrder = 12
elseif tshirt1.rowset.fields['TshirtSize'].value = 'WM'
cSize = 'Women Medium'
cSizeOrder = 13
elseif tshirt1.rowset.fields['TshirtSize'].value = 'WL'
cSize = 'Women Large'
cSizeOrder = 14
elseif tshirt1.rowset.fields['TshirtSize'].value = 'WXL'
cSize = 'Women X-Large'
cSizeOrder = 15
endif
nQty = tshirt1.rowset.fields['TshirtQuant'].value
if not t_orders1.rowset.applyLocate( "t_size = '" + cSize+ "' and t_color = '" + cColor +"'" )
//no record in _ordered table. Add it
t_orders1.rowset.beginAppend()
t_orders1.rowset.fields['t_size' ].value = cSize
t_orders1.rowset.fields['t_size_order' ].value = cSizeOrder
t_orders1.rowset.fields['t_color' ].value = cColor
t_orders1.rowset.fields['qty' ].value = nQty
t_orders1.rowset.save()
elseif t_orders1.rowset.applyLocate( "t_size = '" +cSize +"' and t_color = '"+cColor +"'" )
//size and color already in table. Increment count.
t_orders1.rowset.fields['qty' ].value += nQty
t_orders1.rowset.save()
elseif t_orders1.rowset.applyLocate( "t_size = '" +cSize +"' and not t_color = '"+cColor+"'" )
// size already in t_orders table but not color. Add it
t_orders1.rowset.beginAppend()
t_orders1.rowset.fields['t_size' ].value = cSize
t_orders1.rowset.fields['t_size_order' ].value = cSizeOrder
t_orders1.rowset.fields['t_color' ].value = cColor
t_orders1.rowset.fields['qty' ].value = nQty
t_orders1.rowset.save()
elseif not t_orders1.rowset.applyLocate( " t_size = '" +cSize +"'" )
//size not in table. Add it
t_orders1.rowset.beginAppend()
t_orders1.rowset.fields['t_size' ].value = cSize
t_orders1.rowset.fields['t_size_order' ].value = cSizeOrder
t_orders1.rowset.fields['t_color' ].value = cColor
t_orders1.rowset.fields['qty' ].value = nQty
t_orders1.rowset.save()
endif
tshirt1.rowset.next()
enddo
tshirt1.active = false
t_orders1.active = false
msgbox( "The T_orders table should now have data in it" )
Warning: Unknown: write failed: No space left on device (28) in Unknown on line 0
Warning: Unknown: Failed to write session data (files). Please verify that the current setting of session.save_path is correct () in Unknown on line 0