{
============================================================================
 FORMULARIO          : CCFMRP040
 OBJETIVO            : Pantalla para el proceso de almacenar informaciones de
                       los clientes en ASCII
 PROGRAMADOR         : Juan F. Soto
 FECHA REALIZACION   : Junio 23, 1997.
============================================================================
}
database marmotech    
screen size 24 by 80
{

   Tipo de Venta  [b]           Total 1-30     [t1         ]
   Fecha de Corte [c       ]    Total 31-45    [t2         ]
   Cliente        [c1]-[c2   ]  Total 46-60    [t3         ]
                                Total Mayor 60 [t4         ]   
                                Total Saldo    [t5         ]
                                
}
end
tables
cctb00001
vetb00002
attributes
b  = formonly.tipo_venta type char, autonext, 
     comments = "1 = Ventas Locales,  2 = Ventas de Exportacion"; 
c  = formonly.fecha_corte type date, autonext, format = "dd/mm/yy", 
     comments = "Digite la fecha de Corte del Reporte"; 

c1 = vetb00002.tipo_cliente,comments = "Digite el codigo del cliente";
c2 = vetb00002.sec_cliente,comments = "Digite el codigo del cliente";
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;
end