{
========================================================================
 FORMULARIO         : CPFMRP006
 OBJETIVO           : Captura de datos para la condicion de busqueda
 PROGRAMA Q. LO USA : CPPRRP006
 PROGRAMADOR        : Tadeo A. Ferreras
 FECHA              : Septiembre 15, 1993
=========================================================================
}
database smarmotech      
screen size 24 by 80
{

   Fecha De Corte  [d       ]     Total 1-30    [t1            ] 
   Codigo Suplidor [cc][cd  ]     Total 31-60   [t2            ] 
                                  Total 61-90   [t3            ]
                                  Total 91 a 120[t4            ]
                                  Total Mas 120 [t6            ]
                                  Total Saldo   [t5            ]

}
end
tables
cptb00001
attributes
d  = formonly.fecha_final type date, autonext, format = "dd/mm/yy", 
     comments = "Digite la Fecha de Corte del Reporte"; 
cc = formonly.cod_sp1 type smallint,autonext;
cd = cptb00001.cod_sp_sec,comments=
 "   Digite el codigo del suplidor";
t1 = formonly.total1 type decimal(10,2),noentry;
t2 = formonly.total2 type decimal(10,2),noentry;
t3 = formonly.total3 type decimal(10,2),noentry;
t4 = formonly.total4 type decimal(10,2),noentry;
t5 = formonly.total5 type decimal(10,2),noentry;
t6 = formonly.total6 type decimal(10,2),noentry;
end