diff --git a/PROYECTO/PRDIR/prprmt020.4gl b/PROYECTO/PRDIR/prprmt020.4gl
index 20f1740..3bf1e53 100644
--- a/PROYECTO/PRDIR/prprmt020.4gl
+++ b/PROYECTO/PRDIR/prprmt020.4gl
@@ -54,7 +54,7 @@ FUNCTION prprmt020()
          
  OPEN WINDOW w1 WITH FORM "prfmmt012"  
     DIALOG ATTRIBUTES(UNBUFFERED,FIELD ORDER FORM)
-    INPUT  BY NAME prtb09.num_oc
+    INPUT  BY NAME prtb08.num_oc
     
       BEFORE INPUT
          LET d_tipos="PDF"
@@ -86,7 +86,7 @@ FUNCTION prprmt020()
    AFTER FIELD num_oc
       SELECT a.cotizacion_no,b.nombre,a.sec_vend,ISNULL(c.nom1_emp,' ')+ISNULL(c.apell1_emp,' '),
              a.tipo_cliente,a.sec_cliente
-      INTO prtb09.cotizacion_no,nombre_cliente,psec_vend,vendedor,
+      INTO prtb08.cotizacion_no,nombre_cliente,psec_vend,vendedor,
            prtb08.tipo_cliente,prtb08.sec_cliente 
       FROM prtb00012 a,vetb00004 b,adtb00003 c
       WHERE a.num_oc = prtb08.num_oc AND