Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
  COBOL Foro > IDE-s y compiladores COBOL > Fujitsu COBOL > PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
Comunicados
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Uso Equivalente al Timer Anthony AcuCobol 6 25 de marzo de 2019 18:40
[Sintaxis] Imprimir PDF desde DOS (CALL "SYSTEM") Roger RM/COBOL 1 1 de julio de 2016 15:40
[Sintaxis] Ejecutar comando DOS Ciro PowerCOBOL (ActiveX, v4 - v11) 6 6 de febrero de 2016 05:56
[Sintaxis] Equivalente COBOL a campos Numeric(15,6) Hrmcobol SQL Server 7 3 de febrero de 2016 07:53
[Noticia] Comando Impresion serial Roger PowerCOBOL (ActiveX, v4 - v11) 3 20 de enero de 2016 17:01
Respuesta
 
Herramientas

  #1
Antiguo 20 de julio de 2016, 22:19
IDENTIFICATION DIVISION
apetro
 Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de apetro
DATA DIVISION
marzo 2016
Caba
28.10.2018 20:24
PROCEDURE DIVISION
Posts: 2
Enviado: 2
Recibido: 0
Soluiones: 0
Reputación: 0
apetro is on a distinguished road
Consola Equivalente al comando System de RM Cobol

Buenos Dias
Estoy tratando de pasar algunos programas que tengo en RM85 a Netcobol

Desde un formulario llamo a un programa que utiliza 6 ficheros y ejecuta algunos comandos System.

Ese programa lo he compilado con Pgem sin errores y he obtenido un .obj al cual llamo desde el form.

Cuando compilo el form me da el siguiente error
adm.obj error LNK 2001 unresolved external symbol _SYSTEM
FATAL ERROR LNK1120

No he encontrado la forma de transformar el .obj en .exe para probar si funciona como lo hacia en RM.

Desde ya agradezco la ayuda que puedan brindarme.
apetro no ha iniciado sesión   Responder Con Cita
  #2
Antiguo 21 de julio de 2016, 06:58
IDENTIFICATION DIVISION
Josber
 Super Moderador
Activista del Foro: Activista del Foro - Razón: Por aportar manuales y enriquecer   Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Razón: Por muchos agradecimientos 
ENVIRONMENT DIVISION
Avatar de Josber
DATA DIVISION
febrero 2015
Alicante
27.10.2021 10:43
PROCEDURE DIVISION
Posts: 598
Enviado: 275
Recibido: 296
Soluiones: 41
Reputación: 30
Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road
Predeterminado

Lo puedes hacer con Execute ó ExecuteSync, por ejemplo

Código COBOL:
  1.         STRING "notepad.exe "
  2.                FILE-TEXT
  3.                DELIMITED BY SIZE INTO FICTEXT
  4.         END-STRING
  5.         INVOKE POW-SELF "Execute" USING FICTEXT POW-SWSHOWMAXIMIZED

La diferencia entre uno y otro es que ExecuteSync no te deja volver al programa hasta que no se ha completado y cerrado el comando, (o llamada) y Execute si deja.

POW-SWSHOWMAXIMIZED es para que lo ejecute a pantalla completa, lo puedes cambiar por POW-SWHIDE, POW-SWSHOWNORMAL y POW-SWSHOWMINIMIZED.

Un saludo.-
Josber no ha iniciado sesión   Responder Con Cita
Respuesta

Tags
execute , executesync , powercobol , rmcobol , system


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 13:39.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2021, Jelsoft Enterprises Ltd.