{ ------------------------------------------------------------------------------ FORMULARIO : CTFMMT001 OBJETIVO : Mantenimiento del catalogo de semielaborados (cttb00001). Pagina "Tabla Maestra": lista todos los items. Pagina "Informacion" : detalle / alta / modificacion del item. USADO POR : CTPRMT001 ------------------------------------------------------------------------------ } SCHEMA smarmotech ACTION DEFAULTS ACTION nuevo (TEXT="Nuevo", IMAGE="new", COMMENT="Adiciona un nuevo semielaborado") ACTION modificar (TEXT="Modificar", IMAGE="edit", COMMENT="Modifica el item seleccionado") ACTION desactivar (TEXT="Desactivar", IMAGE="delete", COMMENT="Marca el item como ELIMINADO (status_t=E)") ACTION reactivar (TEXT="Re-activar", IMAGE="ok", COMMENT="Reactiva el item (status_t=ACTIVO)") ACTION refrescar (TEXT="Refrescar", IMAGE="refresh", COMMENT="Recarga la lista") ACTION salir (TEXT="Salir", IMAGE="exit", COMMENT="Sale del programa") END TOOLBAR ITEM nuevo (TEXT="Nuevo", IMAGE="new") ITEM modificar (TEXT="Modificar", IMAGE="edit") ITEM desactivar (TEXT="Desactivar", IMAGE="delete") ITEM reactivar (TEXT="Re-activar", IMAGE="ok") ITEM refrescar (TEXT="Refrescar", IMAGE="refresh") SEPARATOR ITEM salir (TEXT="Salir", IMAGE="exit") END LAYOUT (TEXT="Catalogo de Semielaborados") FOLDER PAGE pg_lista (TEXT="Tabla Maestra") GRID { Codigo [busca_cod ] Descripcion [busca_desc ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] [list_cod][list_desc ][list_uni][list_nom ][list_desg ][list_est ] } END END PAGE pg_info (TEXT="Informacion") GRID { Origen [cod_cia ][descripcion_origen ] Codigo [cod_prod ] Descripcion [descripcion ] Unidad de Medida [unidad_med] Nomenclatura [nomenclatura ] Desglose [desglose ] Estado [status_t] Usuario Creador [us_crea ] Usuario Modificador [us_mod ] Fecha de Creacion [fech_crea ] Fecha Modificacion [fech_mod ] } END END END TABLES cttb00001 ATTRIBUTES # ---------------- Pagina Tabla Maestra (lista) ---------------- busca_cod = formonly.busca_cod type integer, comments="Filtra por codigo"; busca_desc = formonly.busca_desc, upshift, comments="Filtra por descripcion"; LABEL list_cod = formonly.list_cod type integer, TITLE="Codigo"; LABEL list_desc = formonly.list_desc, TITLE="Descripcion"; LABEL list_uni = formonly.list_uni, TITLE="Unidad"; LABEL list_nom = formonly.list_nom, TITLE="Nomenclatura"; LABEL list_desg = formonly.list_desg, TITLE="Desglose"; LABEL list_est = formonly.list_est, TITLE="Estado"; # ---------------- Pagina Informacion (detalle) ---------------- cod_cia = cttb00001.cod_cia, comments="Codigo de origen (iptb00022)"; descripcion_origen = formonly.descripcion_origen, color=yellow, noentry; cod_prod = cttb00001.cod_prod, comments="Digite el codigo del semielaborado"; descripcion = cttb00001.descripcion, upshift, required, comments="Digite la descripcion"; unidad_med = cttb00001.unidad_med, upshift, required, comments="Digite la unidad de medida"; nomenclatura = cttb00001.nomenclatura, upshift, required, comments="Digite la nomenclatura"; desglose = formonly.desglose, noentry; status_t = cttb00001.status_t, noentry; us_crea = cttb00001.us_crea, noentry; fech_crea = cttb00001.fech_crea, noentry; us_mod = cttb00001.us_mod, noentry; fech_mod = cttb00001.fech_mod, noentry; INSTRUCTIONS SCREEN RECORD s_semi[15] (list_cod, list_desc, list_uni, list_nom, list_desg, list_est) DELIMITERS " " END