Commit inicial: fuentes MBS ERP (Genero 6) + .gitignore + docs/SETUP_PC_MBS.md
This commit is contained in:
@@ -0,0 +1,18 @@
|
||||
GLOBALS "cgprgb000.4gl"
|
||||
|
||||
MAIN
|
||||
|
||||
DEFER INTERRUPT
|
||||
CALL STARTLOG("cgprmt020.log")
|
||||
CALL ARG_VAL(1) RETURNING usuarios
|
||||
CALL ARG_VAL(2) RETURNING clave
|
||||
|
||||
CONNECT TO "smarmotech" AS "MSSQL" USER usuarios USING clave
|
||||
|
||||
CALL cgprmt020()
|
||||
|
||||
END MAIN
|
||||
FUNCTION cgprmt020()
|
||||
|
||||
|
||||
END FUNCTION
|
||||
Reference in New Issue
Block a user