PB調用帶返回參數的存儲過程

string ls_doc_no
 
 DECLARE sp_generate_doc_no PROCEDURE FOR sp_generate_doc_no 
         @comp_code = :comp_code,  
         @doc_type = :doc_type,  
         @doc_month = :doc_month,  
         @doc_year = :doc_year,  
         @doc_no = :ls_doc_no out;

execute sp_generate_doc_no ;
fetch sp_generate_doc_no into :ls_doc_no ;

if    sqlca.sqlcode <> 0 then
    gf_message("","失敗")
    close sp_generate_doc_no ;
    return -1
end if
doc_no = ls_doc_no
close sp_generate_doc_no ;
return 1

 

說明:在帶返回帶數過程調用的時候一定要注意在提交後一定要close sp_generate_doc_no ;,不然執行時將報錯