prprmt003: imprimir fallaba (-1260): el arreglo del reporte no tenia el campo num_oc

Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
2026-10-26 16:36:53 -04:00
parent 282c4ce7fa
commit c744b6fd61
1 changed files with 4 additions and 2 deletions
@@ -32,7 +32,8 @@ FUNCTION imprime (datos_c, arr_costos)
        codigo_bloque LIKE cttb00003.codigo_bloque,
        turno         SMALLINT,
        depto_receptor SMALLINT,
-        ref INT 
+        ref INT,
+        num_oc INT
    END RECORD

    DEFINE nombre, descripcion, movimiento, departamento, turno, maquina, depto_receptor STRING 
@@ -125,7 +126,8 @@ REPORT p_diaria(datos_c, arr_costos, nombre, descripcion, movimiento, departamen
        codigo_bloque LIKE cttb00003.codigo_bloque,
        turno         SMALLINT,
        depto_receptor SMALLINT,
-        ref INT 
+        ref INT,
+        num_oc INT
    END RECORD

    DEFINE nombre, descripcion, movimiento, departamento, descrip_turno,