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

2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
@@ -0,0 +1,18 @@
+
+FUNCTION coperacion()
+ DEFINE  ketiquetas SMALLINT, detiquetas CHAR(30),
+         petiquetas ui.ComboBox
+ 
+ LET petiquetas = ui.combobox.forname("formonly.tipo")
+ CALL petiquetas.clear()
+ 
+ DECLARE betiquetas CURSOR FOR
+   SELECT a.codigo,a.descripcion FROM prtb00005 a
+   ORDER BY a.descripcion
+   
+ 
+ FOREACH betiquetas INTO ketiquetas,detiquetas
+  CALL petiquetas.additem(ketiquetas,detiquetas)
+ END FOREACH
+  
+END FUNCTION