Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Cobol » analista de sistemas

Cobol - analista de sistemas

Volver
Nuevo Tema
<<>>
 
Vista:

analista de sistemas

Publicado por castro osvaldo (1 intervención) el 16/08/2007 16:54:54
como hago desde cobol wow llamar un programa, como PhotoEd, Execl, o un programa .BAT.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Alejandro

Ejecutar programas externos (Excel, .BAT, PhotoEd) desde COBOL

Publicado por Alejandro (300 intervenciones) el 07/09/2023 16:32:54
En COBOL (particularmente en el entorno de Mainframe o sistemas z/OS) puedes usar el comando `CALL` para ejecutar programas externos como PhotoEd, Excel o archivos por lotes (programas .BAT). Aquí tienes ejemplos de cómo hacerlo:

1. Ejecutar un programa .BAT desde COBOL:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
IDENTIFICATION DIVISION.
       PROGRAM-ID. CallBat.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  COMMAND-TO-EXECUTE       PIC X(100).
       01  RETURN-CODE              PIC S9(4) COMP.
 
       PROCEDURE DIVISION.
       MOVE 'C:\ruta\al\archivo.bat' TO COMMAND-TO-EXECUTE
       CALL 'BPXBATCH' USING COMMAND-TO-EXECUTE
                                 RETURN-CODE.
       IF RETURN-CODE = 0 THEN
           DISPLAY 'Programa .BAT ejecutado exitosamente.'
       ELSE
           DISPLAY 'Error al ejecutar el programa .BAT.'
       END-IF
       .
 
       STOP RUN.

2. Ejecutar Excel desde COBOL en un entorno Windows:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
IDENTIFICATION DIVISION.
       PROGRAM-ID. CallExcel.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  COMMAND-TO-EXECUTE       PIC X(100).
       01  RETURN-CODE              PIC S9(4) COMP.
 
       PROCEDURE DIVISION.
       MOVE 'excel.exe' TO COMMAND-TO-EXECUTE
       CALL 'BPXBATCH' USING COMMAND-TO-EXECUTE
                                 RETURN-CODE.
       IF RETURN-CODE = 0 THEN
           DISPLAY 'Excel ejecutado exitosamente.'
       ELSE
           DISPLAY 'Error al ejecutar Excel.'
       END-IF
       .
 
       STOP RUN.

3. Ejecutar un editor de fotos (por ejemplo, PhotoEd) desde COBOL:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
IDENTIFICATION DIVISION.
       PROGRAM-ID. CallPhotoEd.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  COMMAND-TO-EXECUTE       PIC X(100).
       01  RETURN-CODE              PIC S9(4) COMP.
 
       PROCEDURE DIVISION.
       MOVE 'photoed.exe' TO COMMAND-TO-EXECUTE
       CALL 'BPXBATCH' USING COMMAND-TO-EXECUTE
                                 RETURN-CODE.
       IF RETURN-CODE = 0 THEN
           DISPLAY 'PhotoEd ejecutado exitosamente.'
       ELSE
           DISPLAY 'Error al ejecutar PhotoEd.'
       END-IF
       .
 
       STOP RUN.

Ten en cuenta que estos ejemplos utilizan `BPXBATCH`, que es una utilidad en sistemas z/OS que permite ejecutar comandos externos. Asegúrate de modificar la ruta y el nombre del programa o archivo .BAT según tu configuración. Además, ten en cuenta que la disponibilidad de estas funciones puede variar según el entorno y la configuración específicos de tu sistema COBOL.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar