wip

opensourcecobol · Sep 7, 2023 · 2b7565e · 2b7565e
1 parent ada2ad5
commit 2b7565e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/ocesql/ppout.c b/ocesql/ppout.c
@@ -580,7 +580,7 @@ void ppoutputresgroup(struct cb_field *cf, int lineno, int iteration) {
   if (type == HVARTYPE_GROUP) {
     ppoutputresgroup(cf->children, lineno, iteration);
   } else {
-    ppoutputresparam(cf->sname, type, digits, scale, iteration);
+    ppoutputresparambyfield(cf, type, digits, scale, iteration);
   }
 
   if (cf->sister != NULL) {
@@ -1695,7 +1695,7 @@ void ppbuff(struct cb_exec_list *list) {
             printerrormsg(child->sname, wk_res_host->lineno, buff);
             return;
           }
-          ppoutputresparam(child->sname, var_type, var_len, var_scale,
+          ppoutputresparam(child, var_type, var_len, var_scale,
                            iteration);
           child = child->sister;
           reshostreferenceCount++;