@@ -1,3 +1,4 @@
*.pbd
*.pbl
ewiserp.exe
+/*.pbd
@@ -8,7 +8,7 @@ end prototypes
global function integer f_get_defsptprice (long arg_sptid, long arg_mtrlid, string arg_unit, string arg_status, string arg_pcode, string arg_woodcode, ref decimal arg_def_dftsptprice);Long rslt = 1,a
Decimal rtn_price
-a = 1
+
SELECT top 1 fprice
INTO :rtn_price