Insert Select order by

INSERT INTO SHMR_ORDERLOAD
(ORDI,LINE,RECORDTYPE,PARTNAME, SHMR_MPARTNAME,
DUEDATE,SPHERE,CYL,AXIS
,ADDITION,HPRISEM,ISIN,VPRISEM,ISUP,DIAMETER,SPECIALBASE,TEXT
,FARPD,FITINGH,SIDE,PANOANG,PANTOANG,COATCUST,MINCENTTHICK
,MINEDGETHICK,POLARPRISEM,POLARPRISEMD,COATING,PAINTING
,DECENTRATION,SHMR_MINOR,SHMR_EALLOWANCE,SHMR_CUSTHEIGHT,COLOR
,UNCUTDIA, SHMR_TQUANT)
SELECT O.ORDI,SQL.LINE + :KLINE,'2',PART.PARTNAME,P1.PARTNAME
,O.DUEDATE ,O.SMIR_SPHERE,O.SMIR_CYL,O.SMIR_AXIS,O.SMIR_ADD
,O.SMIR_HORZPRISM,O.SMIR_ISIN,O.SMIR_VERTPRISM,O.SMIR_ISUP
,SHMR_DIAMETER.DIAMETER,O.SMIR_SPECIALBASE
,OA.REMARK1,O.SMIR_FARPD,O.SMIR_FITTHGHT,SHMR_SIDES.SIDECODE
,O.SMIR_ANGPANO,O.SMIR_ANGPANTOS,O.SHMR_CLISOLDER
,O.SHMR_MINCENTTHICK,O.SHMR_MINEDGETHICK,O.SHMR_POLARPRISM
,O.SHMR_POLARPRISMD,SHMR_COATING.CODE,SHMR_PAINTING.CODE
,O.SHMR_DESENTRATION,O.SHMR_MINOR,O.SHMR_ALLOWANCE
,O.SHMR_CUSTHEIGHT,SMIR_COLOR.CODE,O.SMIR_UNCUTDIAMETER
,O.TQUANT
FROM ORDERS,PART,PART P1,SHMR_SIDES,ORDERITEMS O,ORDERITEMSA OA ?
,SHMR_DIAMETER,SHMR_COATING, SHMR_PAINTING,SMIR_COLOR
WHERE O.ORD = ORDERS.ORD
AND O.ORDI = OA.ORDI
AND O.PART = PART.PART
AND PART.MPART = P1.PART
AND O.SHMR_SIDE = SHMR_SIDES.SIDE
AND O.SHMR_DIAMETER = SHMR_DIAMETER.DIAMETERID
AND O.SHMR_COATINGS = SHMR_COATING.COATING
AND O.SHMR_PAINTINGS = SHMR_PAINTING.PAINTING
AND O.SMIR_COLOR = SMIR_COLOR.SMIR_COLOR
AND PART.PARTNAME <> "
ORDER BY 1;