jsoto/MBS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Commit inicial: fuentes MBS ERP (Genero 6) + .gitignore + docs/SETUP_PC_MBS.md

Browse Source
This commit is contained in:
jsoto
2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
PROYECTOS/irdir/irfmmt036.per
+87
View File
@@ -0,0 +1,87 @@
----------------------------------------------------------------------------------
-- File created from C:\Users\egarcia\OneDrive - MARMOTECH, S. A\Equipo Tecnologia\Fuentes\MARMOTECH\PROYECTOS\irdir\irfmmt036.4fd by Genero Studio
-- WARNING! All changes made in this file will be lost!
----------------------------------------------------------------------------------
SCHEMA smarmotech
TOOLBAR toolbar1
ITEM nuevo(image="new", text=%"Documento", comment=%"Nuevo Documento Transaccional")
ITEM buscar(image="find", text=%"Buscar Documentos", comment=%"Criterio de busqueda")
SEPARATOR toolbarseparator1
ITEM salir(image="quit", text=%"Salir")
END -- toolbar1
LAYOUT (text=%"TRANSACCIONES INVENTARIOS", style="basic")
GRID grid1
{
<G group1 >
[label1 ] [co] [descrip_mov ]
[label2 |num_do|label3|ti][orden_co]
[label4 |c1][cod_] [nom_sp ]
[label] [fecha ] [label6 ] [conduce_no ]
[label7 ] [departamento ]
< >
<G group2 >
<T s_movi1 >
[cod_n |cod_grup|cod_tipo|cod_sec |cantidad|unidad_m|descrip_|codigo |orden_tr|existenc]
[cod_n |cod_grup|cod_tipo|cod_sec |cantidad|unidad_m|descrip_|codigo |orden_tr|existenc]
[cod_n |cod_grup|cod_tipo|cod_sec |cantidad|unidad_m|descrip_|codigo |orden_tr|existenc]
[cod_n |cod_grup|cod_tipo|cod_sec |cantidad|unidad_m|descrip_|codigo |orden_tr|existenc]
[cod_n |cod_grup|cod_tipo|cod_sec |cantidad|unidad_m|descrip_|codigo |orden_tr|existenc]
< >
< >
}
END -- grid1
END -- irfmmt036
TABLES
irtb00006
ATTRIBUTES
GROUP group1:group1, text=%"encabezado";
LABEL label1:label1, text=%"Tipo Movimiento";
EDIT co=formonly.cod_mov type SMALLINT, tabIndex=1, autoNext, scroll, comment=%"Digite Codigo Del Movimiento Correspondiente";
EDIT descrip_mov=formonly.descrip_mov, tabIndex=2, noEntry, scroll;
LABEL label2:label2, text=%"Documento Numero";
EDIT num_do=formonly.num_doc, tabIndex=3, scroll;
LABEL label3:label3, text=%"Orden";
EDIT ti=formonly.tipo, tabIndex=4, autoNext, scroll;
EDIT orden_co=irtb00006.orden_compra, tabIndex=5, autoNext, scroll, comment=%"Digite Orden Compras para devolver ";
LABEL label4:label4, text=%"Suplidor";
EDIT c1=formonly.cod_sp, tabIndex=6, scroll;
EDIT cod_=formonly.cod_sp_sec, tabIndex=7, scroll;
EDIT nom_sp=formonly.nom_sp, tabIndex=8, noEntry, scroll;
LABEL label:label5, text=%"Fecha";
EDIT fecha=irtb00006.fecha, tabIndex=9, not null, required, autoNext, scroll, format="dd/mm/yyyy", comment=%"Digite Fecha Documento";
LABEL label6:label6, text=%"Conduce No.";
EDIT conduce_no=formonly.conduce_no, tabIndex=10, scroll;
LABEL label7:label7, text=%"Departamento";
COMBOBOX departamento=formonly.departamento, tabIndex=11, scroll;
GROUP group2:group2, text=%"detalle";
TABLE s_movi1:s_movi1;
BUTTONEDIT cod_n=formonly.cod_n, action=buscaprod, title=%"Codigo", unmovable;
BUTTONEDIT cod_grup=formonly.cod_grupo, action=buscaprod, title=%"", unmovable;
BUTTONEDIT cod_tipo=formonly.cod_tipo, action=buscaprod, title=%"", unmovable;
BUTTONEDIT cod_sec=formonly.cod_sec, action=buscaprod, title=%"", unmovable;
EDIT cantidad=formonly.cantidad_2, title=%"Cantidad", unmovable;
EDIT unidad_m=formonly.unidad_med, title=%"Unidad Medida", noEntry, unmovable;
EDIT descrip_=formonly.descrip_esp, title=%"Descripcion", noEntry, scroll, unmovable;
COMBOBOX codigo=formonly.codigo, default = "NULL", title=%"Maquina", unmovable, items=(("NULL", ""));
EDIT orden_tr=formonly.orden_trabajo, title=%"Orden trabajo", scroll;
EDIT existenc=formonly.Existencia, title=%"Existencia", unmovable;
END -- ATTRIBUTES
INSTRUCTIONS
SCREEN RECORD record1(formonly.cod_mov,formonly.descrip_mov,formonly.num_doc,formonly.tipo,irtb00006.orden_compra,formonly.cod_sp,formonly.cod_sp_sec,formonly.nom_sp,irtb00006.fecha,formonly.conduce_no,formonly.departamento)
SCREEN RECORD s_movi1(formonly.cod_n,formonly.cod_grupo,formonly.cod_tipo,formonly.cod_sec,formonly.cantidad_2,formonly.unidad_med,formonly.descrip_esp,formonly.codigo,formonly.orden_trabajo,formonly.Existencia)
END -- INSTRUCTIONS