[Sintaxis] Cambiar variable de entorno "Path" en ejecución

[Recato53]

Buenas tardes.

Quiero cambiar el Path en modo ejecución, en rmcobol cuando ejecutaba un programa cambiaba el path en un .BAT

PATH=%PATH%;\Cobview;\RT_700

En PowerCobol intento hacer lo mismo en modo ejecución, pero no funciona.

Un saludo y muchas gracias.

[Kuk]

Recato53, por que no funciona? Has intentado con? :

INVOKE POW-SELF "Execute" USING "C:\zzz\Cambio_Path.bat"

[Recato53]

Ya he probado con este código.

Pero después intento ejecutar un programa que tengo en la carpeta que he incluido en el Path y me da error.

También he comprobado si realmente me guarda el Path, mediante:

INVOKE POW-SELF "Execute" USING "CMD /C SET > PATHNUEVO" POW-SWSHOWMINIMIZED

Y no añade el Path nuevo.

[Roger]

Recato
Prueba de esta forma inserta un CMFOLDER1, CMFILE1 en tu form

 WORKING STORAGE.
01 FOLDER-NAME PIC X(256).
PROCEDURE DIVISION. 
MOVE "path" OF CmFolder1 TO FOLDER-NAME.
INVOKE POW-SELF "Execute" USING "C:\zzz\Cambio_Path.bat"
invoke pow-self "THRUEVENTS".
MOVE FOLDER-NAME  TO "Path" OF CmFile1.

[Kuk]

Para mi, es un problema de derechos del usuario desde el cual ejecutas el programa.

[Rapinto]

Recato,

Utiliza o seguinte:

Na Form em Special Names :

    ENVIRONMENT-NAME IS ENVNAME          
    ENVIRONMENT-VALUE IS ENVVAL.  

Na form coloca o seguinte código:

 ENVIRONMENT     DIVISION.
 DATA            DIVISION.
 WORKING-STORAGE SECTION.
 01   ENVVAR               PIC X(032).
 01   RESULTADO            PIC X(1024).
 PROCEDURE       DIVISION.
    DISPLAY "PATH" UPON ENVNAME.
    ACCEPT  RESULTADO FROM ENVVAL.
    MOVE RESULTADO TO "CAPTION" OF CMSTATIC1.

Para alterar a variável utiliza o seguinte código:

    DISPLAY "PATH" UPON ENVNAME.
    DISPLAY "c:\" UPON ENVVAL.

Pela Documentação do Fujitsu Cobol, diz que funciona.

Un Saludo,
Rui PInto

[Recato53]

La solución de RAPINTO funciona correctamente.

Muchas gracias.

[Recato53]

Cita del post de Rapinto

Recato, Utiliza o seguinte: Na Form em Special Names :     ENVIRONMENT-NAME IS ENVNAME               ENVIRONMENT-VALUE IS ENVVAL.   Na form coloca o seguinte código:  ENVIRONMENT     DIVISION.  DATA            DIVISION.  WORKING-STORAGE SECTION.  01   ENVVAR               PIC X(032).  01   RESULTADO            PIC X(1024).  PROCEDURE       DIVISION.     DISPLAY "PATH" UPON ENVNAME.     ACCEPT  RESULTADO FROM ENVVAL.     MOVE RESULTADO TO "CAPTION" OF CMSTATIC1. Para alterar a variável utiliza o seguinte código:     DISPLAY "PATH" UPON ENVNAME.     DISPLAY "c:\" UPON ENVVAL. Pela Documentação do Fujitsu Cobol, diz que funciona. Un Saludo, Rui PInto

Cuando ejecuto programas en RmCobol tengo separado los programas de los ficheros, la solución que tengo para poder ejecutar los programas de RmCobol estando situado en la carpeta de los ficheros es mediante la instrucción en un Bat.

SET RUNPATH=C:\Programas

Como puedo conseguir esto mismo en PowerCobol.

---------- Post added at 14:25 ---------- Previous post was at 14:03 ----------

Soluccionado, es lo mismo que para el PATH.

 
    DISPLAY "RUNPATH" UPON ENVNAME
    MOVE "\ProgramasRmCobol" TO PATH-NEW
              DISPLAY PATH-NEW UPON ENVVAL