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

This commit is contained in:
2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
+17
View File
@@ -0,0 +1,17 @@
FUNCTION tiposModificacion()
DEFINE ketiquetas SMALLINT, detiquetas CHAR(30),
petiquetas ui.ComboBox
LET petiquetas = ui.combobox.forname("formonly.idtipo")
DECLARE betiquetas CURSOR FOR
SELECT a.idtipo,a.titulo FROM cctb00037 a
ORDER BY a.idtipo
CALL petiquetas.clear()
FOREACH betiquetas INTO ketiquetas,detiquetas
CALL petiquetas.additem(ketiquetas,detiquetas)
END FOREACH
END FUNCTION