{ ------------------------------------------------------------------------------- FORMULARIO : CTFMMT018 OBJETIVO : Capturar, Modificar, Eliminar registros de la Tabla de Costos Estandares con y sin Impuestos PROGRAMADOR : Ing. Betania Guerrero Perez FECHA REALIZACION : Diciembre 20, 1993 ------------------------------------------------------------------------------- } database marmotech screen size 24 by 80 { Codigo [a]-[b]-[c ]-[d ][e ] [g ] Costo Real con Impuesto [f005 ] Costo Real sin Impuesto [f004 ] [j] Usuario Creador [f006 ] Usuario Modificador [f008 ] Fecha Creacion [f007 ] Fecha Modificacion [f009 ] } end tables cttb00023,intb00001 attributes a = cttb00023.cod_n,autonext,comments = "Digite el NIVEL"; b = cttb00023.cod_grupo,autonext,comments = "Digite el GRUPO"; c = cttb00023.cod_tipo,autonext,comments = "Digite el TIPO"; d = cttb00023.cod_sec,autonext,comments = "Digite la SECUENCIA"; e = intb00001.descrip_esp,noentry; g = intb00001.unidad_med,noentry; f005 = cttb00023.costo_imp,comments = "Digite el costo con impuesto"; f004 = cttb00023.costo_s_imp,comments = "Digite el costo sin impuesto"; j = cttb00023.status_t,noentry; f006 = cttb00023.us_crea,noentry; f007 = cttb00023.fech_crea,noentry; f008 = cttb00023.us_mod,noentry; f009 = cttb00023.fech_mod,noentry; instructions delimiters " " end