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
+19
View File
@@ -0,0 +1,19 @@
{
PROGRAMA : noprmt039.4gl
OBJETIVO : Administrar los carnets de los contratistas
DESARROLLADO POR : ING. JUAN SOTO
FECHA : AGOSTO 17, 2023
}
GLOBALS "noprgb000.4gl"
MAIN
DEFER INTERRUPT
CALL ARG_VAL(1) RETURNING usuarios
CALL ARG_VAL(2) RETURNING clave
CONNECT to "smarmotech" USER usuarios USING clave
SELECT * INTO p_companias.* FROM companias
CALL noprmt039()
END MAIN
FUNCTION noprmt039()
END FUNCTION