{
----------------------------------------------------------------------------
FORMULARIO    : COFMMT
OBJETIVO      : Mantener La Tabla Para el Reporte del ITBI por Compras
DISENADO POR  : JUAN F. SOTO
FECHA         : Noviembre 26, 1996.
----------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{

 FECHA DEL REPORTE :[fe      ]
 PROVEEDOR         :[F1][F2  ][A                             ]
 NUMERO DE ORDEN   : [O1][O2  ]
 FECHA DE LA ORDEN : [F4      ]
 PLANILLA          :[K1        ]
 EXENTA            :[e1        ]
 NOTA DE CREDITO   :[N1      ] 
 ITBI CR           :[i         ]
 VALOR             :[V1          ]
 [t]
 USUARIO CREADOR:[US       ]            USUARIO MODIFICADOR:[US1      ]
 FECHA CREACION :[F5              ]     FECHA MODIFICACION :[F6             ]
}
tables
cotb00001,
cotb00009,
cotb00014
attributes
fe = cotb00009.fecha_rep,required,format="dd/mm/yy",comments = 
"Entre Fecha Del Reporte del ITBI";
f1 = cotb00001.cod_sp,noentry;
f2 = cotb00001.cod_sp_sec,noentry;
a  = cotb00001.nom_sp,noentry;
o1 = cotb00014.tipo,autonext,comments = "Digite Tipo De La Orden";
o2 = cotb00014.num_oc,comments = "Digite Numero De La Orden";        
f4 = cotb00014.fech_oc,noentry;
k1 = cotb00009.planilla,required;
e1 = cotb00009.exenta,required;
i  = cotb00009.itbi_nc;
n1 = cotb00009.nota_credito,comments = 
"Digite Numero Nota de Credito Que este dentro del mes";
v1 = cotb00009.valor_credito;
us = cotb00009.us_crea,noentry;
us1 = cotb00009.us_mod,noentry;
f5  = cotb00009.fech_crea,noentry;
f6 = cotb00009.fech_mod,noentry;
t  = cotb00009.status_t,noentry;
instructions
delimiters " "
end