MSSQL 操作结果集

SQL code:
For Ls_desc IN (Select Di_ename ,Di_Pcs,Di_Unitprice
from T_BO_DeclareInvoice Di
WHERE bs_code = as_bs_code)
LOOP
IF Ls_desc.Di_ename IS NOT NULL THEN
--Quantity 1
ls_dhl_string := ls_dhl_string ||To_Char(Ls_desc.Di_Pcs)||'|';

--Actual Dimensional Weight --不提供单件毛重、体积重
--实际数据显示DHL，显示总中转重量
If Rt_expresshawb.Ect_code_TransFer = 'ADOX' Then
ls_dhl_string := ls_dhl_string ||'0.50|';
Else
If Rt_expresshawb.Eh_Transfergrossweight is Not Null Then
ls_dhl_string := ls_dhl_string ||Trim(To_Char(Rt_expresshawb.Eh_Transfergrossweight,'999990.00'))||'|';
Else
ls_dhl_string := ls_dhl_string ||'0.00|';
End if;
END IF ;



--Unit price 12 可能变化,暂时为零*********
IF Ls_desc.Di_Unitprice IS NOT NULL THEN
ls_dhl_string := ls_dhl_string ||Trim(To_Char(Ls_desc.Di_Unitprice,'999990.00'))||'|';
ELSE
ls_dhl_string := ls_dhl_string ||'0.00|';
END IF;

END IF;