Cobol Foro
Navegación en el Foro
Retroceder   Cobol Foro Entornos de desarrollo y compiladores Cobol Fujitsu COBOL PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
 
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Comando Perform... Fito PowerCOBOL (ActiveX, v4 - v11) 8 6 de enero de 2023 22:57
[Sintaxis] Ordenar fichero con comando Sort Begoguay PowerCOBOL (ActiveX, v4 - v11) 4 14 de noviembre de 2016 10:43
[Duda] Leer con comando START Roger PowerCOBOL (ActiveX, v4 - v11) 5 21 de septiembre de 2016 16:54
[Sintaxis] Equivalente al comando System de RM Cobol apetro PowerCOBOL (ActiveX, v4 - v11) 1 21 de julio de 2016 07:58
[Noticia] Comando Impresion serial Roger PowerCOBOL (ActiveX, v4 - v11) 3 20 de enero de 2016 18:01

Respuesta

  #1
Antiguo 3 de febrero de 2016, 04:17
Ciro
Forero Junior
Última Actividad 26.05.2025 17:37
Posts Posts: 19
Likes enviados Enviados: 19
Likes recibidos Recibidos: 2
Consola Ejecutar comando DOS
0 Inactivo Inactivo

Por favor solicito ayuda.
Necesito dentro de un programa powercobol version 9, ejecutar otro programa power que está en otro directorio, por lo tanto necesito hacer el cambio de ruta.
Probe con estas dos instrucciones y no funciona.
Código COBOL:
  1. INVOKE CmDDE1 "Execute" USING "CD \sydwin\DAT\CONI"
  2. INVOKE POW-SELF "Execute" USING "CD \sydwin\DAT\CONI".

Gracias.
Ciro is offline   Responder Con Cita
  #2
Antiguo 3 de febrero de 2016, 06:02
Gatomalo
Forero
Última Actividad 01.07.2020 18:41
Posts Posts: 58
Likes enviados Enviados: 6
Likes recibidos Recibidos: 2

Código COBOL:
  1. INVOKE POW-SELF "Execute" USING "D:\sydwin\DAT\debug\CONI.exe"
debes poner la ruta donde se encuentra el exe lo de arriba solo es un ejemplo.
Gatomalo is offline   Responder Con Cita
  #3
Antiguo 4 de febrero de 2016, 16:46
Ciro
Forero Junior
Última Actividad 26.05.2025 17:37
Posts Posts: 19
Likes enviados Enviados: 19
Likes recibidos Recibidos: 2

Gracias amigo gatomalo y perdone que no me supe explicar.

Lo que necesito es ejecutar una aplicación para dos empresas teniendo una sola entrada.
Que entre a empresa 1, y sin salirme poder ir al directorio de la empresa 2 y ejecutar la empresa 2, con los datos de la empresa 2 que se encuentran fisicamente en otra ruta.

Con la instrucción que Ud, me da, busca en la ruta el programa y ejecuta el .exe
(empresa 2) pero no cambia fisicamente de directorio, por lo tanto toma los datos del directorio de la empresa1.

Necesito si hay forma de hacer cambio de directorio, desde la aplicación, (ejectutar comandos MS-DOS: cd, dir, rename etc.) Muchas gracias.
Ciro is offline   Responder Con Cita
  #4
Antiguo 4 de febrero de 2016, 18:24
Kuk
Administrador
Última Actividad 19.09.2026 20:11
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207

Ciro, para estas cosas no es la mejor solución lo que quieres hacer. Porque controlar en cada momento dónde te encuentras de manera implícita puede llevar a un desastre...

Se puede hacer, por ejemplo via "GetFileName" y POW-CDCHANGEDIR (que es la opción por defecto) o con "GetFolderName" con NoChangeCurrent = POW-FALSE, pero no te lo aconsejo.

Lo que yo hago para este tipo de cosas es indicar la ruta para cada fichero con un prefijo de la ruta en una variable global. Así puedo acceder a diferentes directorios de manera controlada (explicita). Además, no tengo el riesgo de guardar en sitios diferentes (por error, es decir por no saber o controlar bien dónde me encuentro en cuanto al directorio) ficheros temporales, de configuración y demás historias...



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita
  #5
Antiguo 4 de febrero de 2016, 19:05
Hrmcobol
Guardián del Foro
Guardián del Foro: Guardián del espíritu y clima del Foro - Issue reason: Por implicación en la vida del Foro 
Última Actividad 01.03.2022 02:59
Posts Posts: 323
Likes enviados Enviados: 102
Likes recibidos Recibidos: 120

De Acuerdo con Kuk, es lo mas saludable, puedes tener un archivo/tabla con las rutas de cada empresa.
Saludos
Hrmcobol is offline   Responder Con Cita
  #6
Antiguo 6 de febrero de 2016, 02:47
Ciro
Forero Junior
Última Actividad 26.05.2025 17:37
Posts Posts: 19
Likes enviados Enviados: 19
Likes recibidos Recibidos: 2

Esa solución me parece excelente, voy a desarrollarla así. Muchas gracias a todos.
Ciro is offline   Responder Con Cita
  #7
Antiguo 6 de febrero de 2016, 06:56
Roger
Forero Activo
Última Actividad 04.02.2021 13:03
Posts Posts: 236
Likes enviados Enviados: 26
Likes recibidos Recibidos: 60

Hola amigo yo uso de esta manera
Código COBOL:
  1. SELECT VACUNA ASSIGN TO WF-VACUNA ORGANIZATION INDEXED
  2.            ACCESS MODE IS DYNAMIC
  3.            RECORD   KEY IS  VACUNA-KEY
  4.            LOCK MODE IS AUTOMATIC WITH LOCK ON RECORD
  5.              FILE STATUS IS FS-04.

luego muevo a la variable WF-VACUNA en este caso la ruta de esta forma

Código COBOL:
  1. move "d:\archivos\debug\VACUNA.DAT" TO WF-VACUNA

de esta forma lee y graba donde le indique la ruta.
Roger is offline   Responder Con Cita
Respuesta


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

Saltar a Foro


La franja horaria es GMT +2. Ahora son las 16:24.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.