How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
+2- Moderator
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Can you please clarify your question by telling us what Visual COBOL product version you are using, (Visual Studio or Eclipse) and how you are running the application? (within the IDE or outside of the IDE).
Also, are these managed code applications (.NET or JVM) or native applications?
If you are within the IDE you should be able to debug from the calling program into the called program without a problem.
If you are running outside of the IDE, from the command line and you wish the debugger to start on a specific program then you can place a CALL "CBL_DEBUGBREAK" statement in the desired program and the debugger will start when the program is entered.
There are many other methods of starting the debugger so I really need some additional details as to what it is exactly that you are wishing to do...
Thanks.
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Dear Chris,
My application is Running in Visual Cobol for Eclipse. It a native Cobol application and >I running it within de IDE.
I only can see the animating of the principal program .
Here you are the animating :
COPY "uleeusr.cpy" IN "C:\\home1\\compilacion\\parametros".
*
PROCEDURE DIVISION.
*-------------------------------------------
Principal.
*---------
CALL "C:\\home1\\compilacion\\urutinas\\ufecsis"
USING ufecsis-parametros
CANCEL "C:\\home1\\compilacion\\urutinas\\ufecsis"
MOVE "hmeg" TO vtbor01-user.
MOVE ufecsis-parametros TO vtbor01-fecha-actr
va-fecha-actr.
MOVE 6 TO vtbor01-objetivo.
MOVE 1 TO vtbor01-operacion.
CALL "C:\\home1\\compilacion\\urutinas\\vtbor01"
USING vtbor01-parametros.
CANCEL "C:\\home1\\compilacion\\urutinas\\vtbor01".
move 0 TO vtbor01-status.
IF vtbor01-status = 1
DISPLAY "User no existe " LINE 23 COL 1 ERASE
ACCEPT va-pausa
STOP RUN
ELSE
MOVE vtbor01-empresa TO vtbor35-empresa
MOVE vtbor01-rut TO vtbor35-rut
MOVE vtbor01-linea-1 TO vtbor35-linea
CALL "C:\\home1\\compilacion\\urutinas\\vtbor35"
USING vtbor35-parametros
CANCEL "C:\\home1\\compilacion\\urutinas\\vtbor35"
END-IF.
MOVE "hmeg" TO vtbor130-user-id
MOVE vtbor01-rut TO vtbor130-rut-cajero.
MOVE vtbor01-empresa TO vtbor130-empresa
MOVE vtbor35-linea TO vtbor130-linea.
MOVE vtbor35-nombre-linea TO vtbor130-nombre-linea.
MOVE 0 TO vtbor130-tipo-validacion.
MOVE va-fecha-actr TO vtbor130-fecha-apertura.
MOVE vtbor01-correl-agencia(vtbor130-linea)
TO vtbor130-correl-agencia.
MOVE "vtbor130" TO vtbor130-programa
MOVE vtbor130-parametros TO vtbor130-parametros
CALL "C:\\home1\\compilacion\\urutinas\\vtbor130"
USING vtbor130-parametros
CANCEL "C:\\home1\\compilacion\\urutinas\\vtbor130".
*
Terminar.
*--------
EXIT PROGRAM.
STOP RUN.
*-----------------------*
* Fin Programa vtboi69 *
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Dear Chris,
My application is Running in Visual Cobol for Eclipse. It a native Cobol application and >I running it within de IDE.
I only can see the animating of the principal program .
Here you are the animating :
COPY "uleeusr.cpy" IN "C:\\home1\\compilacion\\parametros".
*
PROCEDURE DIVISION.
*-------------------------------------------
Principal.
*---------
CALL "C:\\home1\\compilacion\\urutinas\\ufecsis"
USING ufecsis-parametros
CANCEL "C:\\home1\\compilacion\\urutinas\\ufecsis"
MOVE "hmeg" TO vtbor01-user.
MOVE ufecsis-parametros TO vtbor01-fecha-actr
va-fecha-actr.
MOVE 6 TO vtbor01-objetivo.
MOVE 1 TO vtbor01-operacion.
CALL "C:\\home1\\compilacion\\urutinas\\vtbor01"
USING vtbor01-parametros.
CANCEL "C:\\home1\\compilacion\\urutinas\\vtbor01".
move 0 TO vtbor01-status.
IF vtbor01-status = 1
DISPLAY "User no existe " LINE 23 COL 1 ERASE
ACCEPT va-pausa
STOP RUN
ELSE
MOVE vtbor01-empresa TO vtbor35-empresa
MOVE vtbor01-rut TO vtbor35-rut
MOVE vtbor01-linea-1 TO vtbor35-linea
CALL "C:\\home1\\compilacion\\urutinas\\vtbor35"
USING vtbor35-parametros
CANCEL "C:\\home1\\compilacion\\urutinas\\vtbor35"
END-IF.
MOVE "hmeg" TO vtbor130-user-id
MOVE vtbor01-rut TO vtbor130-rut-cajero.
MOVE vtbor01-empresa TO vtbor130-empresa
MOVE vtbor35-linea TO vtbor130-linea.
MOVE vtbor35-nombre-linea TO vtbor130-nombre-linea.
MOVE 0 TO vtbor130-tipo-validacion.
MOVE va-fecha-actr TO vtbor130-fecha-apertura.
MOVE vtbor01-correl-agencia(vtbor130-linea)
TO vtbor130-correl-agencia.
MOVE "vtbor130" TO vtbor130-programa
MOVE vtbor130-parametros TO vtbor130-parametros
CALL "C:\\home1\\compilacion\\urutinas\\vtbor130"
USING vtbor130-parametros
CANCEL "C:\\home1\\compilacion\\urutinas\\vtbor130".
*
Terminar.
*--------
EXIT PROGRAM.
STOP RUN.
*-----------------------*
* Fin Programa vtboi69 *
+2- Moderator
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Are the subprograms available within the same Visual COBOL project as the calling program or are they in a different project or possibly not within a project at all?
I noticed that you are using the full path name to find the subprograms which leads me to believe that they are not within a project at all, which means that their .idy files are probably not available for debugging.
How do you have these projects setup?
Thanks.
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Chis,
All are in the same project.
I put a full patch becouse in the other way (..\\..\\Files \\name file) dont work.
I see the .idy files and object files in the :
New_Configuration.bin
Tur-Bus-visual.exe
vtboi69.idy
....
....
....
vtboi69.obj
.....
....
....
I setup the project as Debuggins.
Maybe I need something additional setup ???
Many Thanks
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Chis,
All are in the same project.
I put a full patch becouse in the other way (..\\..\\Files \\name file) dont work.
I see the .idy files and object files in the :
New_Configuration.bin
Tur-Bus-visual.exe
vtboi69.idy
....
....
....
vtboi69.obj
.....
....
....
I setup the project as Debuggins.
Maybe I need something additional setup ???
Many Thanks
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Chis,
All are in the same project.
I put a full patch becouse in the other way (..\\..\\Files \\name file) dont work.
I see the .idy files and object files in the :
New_Configuration.bin
Tur-Bus-visual.exe
vtboi69.idy
....
....
....
vtboi69.obj
.....
....
....
I setup the project as Debuggins.
Maybe I need something additional setup ???
Many Thanks
+2- Moderator
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Is the project target type set to be a single executable file?
Right click on project name and select Properties-->Micro Focus-->COBOL
If it is then you should be calling the program using just the name of the program and no path at all because the .obj files are being linked together into the same .EXE file. What you are calling is the entry point name of the subprogram.
CALL "ufecsis"
USING ufecsis-parametros
CANCEL "ufecsis"
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
$SET DIALECT(RM)
IDENTIFICATION DIVISION.
PROGRAM-ID. "vtboi69".
*
* Programa Contingencia
*
ENVIRONMENT DIVISION.
*--------------------
CONFIGURATION SECTION.
SPECIAL-NAMES.
DECIMAL-POINT IS COMMA.
*
DATA DIVISION.
*-------------
*
WORKING-STORAGE SECTION.
01 va-pausa pic X(01).
*
01 va-fecha-act.
05 va-siglo-act PIC 99 VALUE 19.
05 va-fec-act PIC 9(06).
01 va-fecha-actr REDEFINES va-fecha-act PIC 9(08).
*
COPY "ufecsis.cpy" IN "C:\\home1\\compilacion\\parametros".
COPY "vtbor01.cpy" IN "C:\\home1\\compilacion\\parametros".
COPY "vtbor35.cpy" IN "C:\\home1\\compilacion\\parametros".
COPY "vtbor130.cpy" IN "C:\\home1\\compilacion\\parametros".
*
LINKAGE SECTION .
*
COPY "uleeusr.cpy" IN "C:\\home1\\compilacion\\parametros".
*
PROCEDURE DIVISION.
*-------------------------------------------
Principal.
*---------
CALL "ufecsis"
USING ufecsis-parametros
CANCEL "ufecsis"
MOVE "hmeg" TO vtbor01-user.
MOVE ufecsis-parametros TO vtbor01-fecha-actr
va-fecha-actr.
MOVE 6 TO vtbor01-objetivo.
MOVE 1 TO vtbor01-operacion.
CALL "vtbor01"
USING vtbor01-parametros.
CANCEL "vtbor01".
move 0 TO vtbor01-status.
IF vtbor01-status = 1
DISPLAY "User no existe " LINE 23 COL 1 ERASE
ACCEPT va-pausa
STOP RUN
ELSE
MOVE vtbor01-empresa TO vtbor35-empresa
MOVE vtbor01-rut TO vtbor35-rut
MOVE vtbor01-linea-1 TO vtbor35-linea
CALL "vtbor35"
USING vtbor35-parametros
CANCEL "vtbor35"
END-IF.
MOVE "hmeg" TO vtbor130-user-id
MOVE vtbor01-rut TO vtbor130-rut-cajero.
MOVE vtbor01-empresa TO vtbor130-empresa
MOVE vtbor35-linea TO vtbor130-linea.
MOVE vtbor35-nombre-linea TO vtbor130-nombre-linea.
MOVE 0 TO vtbor130-tipo-validacion.
MOVE va-fecha-actr TO vtbor130-fecha-apertura.
MOVE vtbor01-correl-agencia(vtbor130-linea)
TO vtbor130-correl-agencia.
MOVE "vtbor130" TO vtbor130-programa
MOVE vtbor130-parametros TO vtbor130-parametros
CALL "vtbor130"
USING vtbor130-parametros
CANCEL "vtbor130".
*
Terminar.
*--------
EXIT PROGRAM.
STOP RUN.
*-----------------------*
* Fin Programa vtboi69 *
*-----------------------*
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
$SET DIALECT(RM)
IDENTIFICATION DIVISION.
PROGRAM-ID. "vtboi69".
*
* Programa Contingencia
*
ENVIRONMENT DIVISION.
*--------------------
CONFIGURATION SECTION.
SPECIAL-NAMES.
DECIMAL-POINT IS COMMA.
*
DATA DIVISION.
*-------------
*
WORKING-STORAGE SECTION.
01 va-pausa pic X(01).
*
01 va-fecha-act.
05 va-siglo-act PIC 99 VALUE 19.
05 va-fec-act PIC 9(06).
01 va-fecha-actr REDEFINES va-fecha-act PIC 9(08).
*
COPY "ufecsis.cpy" IN "C:\\home1\\compilacion\\parametros".
COPY "vtbor01.cpy" IN "C:\\home1\\compilacion\\parametros".
COPY "vtbor35.cpy" IN "C:\\home1\\compilacion\\parametros".
COPY "vtbor130.cpy" IN "C:\\home1\\compilacion\\parametros".
*
LINKAGE SECTION .
*
COPY "uleeusr.cpy" IN "C:\\home1\\compilacion\\parametros".
*
PROCEDURE DIVISION.
*-------------------------------------------
Principal.
*---------
CALL "ufecsis"
USING ufecsis-parametros
CANCEL "ufecsis"
MOVE "hmeg" TO vtbor01-user.
MOVE ufecsis-parametros TO vtbor01-fecha-actr
va-fecha-actr.
MOVE 6 TO vtbor01-objetivo.
MOVE 1 TO vtbor01-operacion.
CALL "vtbor01"
USING vtbor01-parametros.
CANCEL "vtbor01".
move 0 TO vtbor01-status.
IF vtbor01-status = 1
DISPLAY "User no existe " LINE 23 COL 1 ERASE
ACCEPT va-pausa
STOP RUN
ELSE
MOVE vtbor01-empresa TO vtbor35-empresa
MOVE vtbor01-rut TO vtbor35-rut
MOVE vtbor01-linea-1 TO vtbor35-linea
CALL "vtbor35"
USING vtbor35-parametros
CANCEL "vtbor35"
END-IF.
MOVE "hmeg" TO vtbor130-user-id
MOVE vtbor01-rut TO vtbor130-rut-cajero.
MOVE vtbor01-empresa TO vtbor130-empresa
MOVE vtbor35-linea TO vtbor130-linea.
MOVE vtbor35-nombre-linea TO vtbor130-nombre-linea.
MOVE 0 TO vtbor130-tipo-validacion.
MOVE va-fecha-actr TO vtbor130-fecha-apertura.
MOVE vtbor01-correl-agencia(vtbor130-linea)
TO vtbor130-correl-agencia.
MOVE "vtbor130" TO vtbor130-programa
MOVE vtbor130-parametros TO vtbor130-parametros
CALL "vtbor130"
USING vtbor130-parametros
CANCEL "vtbor130".
*
Terminar.
*--------
EXIT PROGRAM.
STOP RUN.
*-----------------------*
* Fin Programa vtboi69 *
*-----------------------*
+2- Moderator
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
You do not say what the issue is that you are having with the code modified like your screenshot.
Your project type is All native Libraries which means that a .dll will be created for each source program in your project.
Is this what you want?
If you are calling one of these .dlls from a main program in an .exe project then you will need to set the PATH to indicate the location of these .dll files in the build folder of the .dll project.
You can set this under Run-->Debug Configurations and then click the Environment tab.
Modify the PATH to include your projects output folder:
When you debug the main program it should now find the subprogram .dll and debug it accordingly.
You may have a problem if the subprogram is not also compiled with the directive DIALECT"RM" as this changes the default call-convention used.
You may wish to remove that directive and try again...
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Chris,
You do not say what the issue is that you are having with the code modified like your screenshot.
Answer : The result is the same.
Your project type is All native Libraries which means that a .dll will be created for each source program in your project.
Is this what you want?
Answer : NO.
The ONLY thing that I want is :
1.-Have only ONE project named Tur-Bus Visual
2.-Execute the Principal program : vtboi69
3.- When the principal program call another like this :
CALL "vtbor130"
USING vtbor130-parametros
CANCEL "vtbor130".
That I can see the animating of this program. Like I see when executing them in MFE with animating.
4.- That is all.
Any help in regards will be welcome.
Many thanks
PJM
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Chris,
You do not say what the issue is that you are having with the code modified like your screenshot.
Answer : The result is the same.
Your project type is All native Libraries which means that a .dll will be created for each source program in your project.
Is this what you want?
Answer : NO.
The ONLY thing that I want is :
1.-Have only ONE project named Tur-Bus Visual
2.-Execute the Principal program : vtboi69
3.- When the principal program call another like this :
CALL "vtbor130"
USING vtbor130-parametros
CANCEL "vtbor130".
That I can see the animating of this program. Like I see when executing them in MFE with animating.
4.- That is all.
Any help in regards will be welcome.
Many thanks
PJM
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Chris,
You do not say what the issue is that you are having with the code modified like your screenshot.
Answer : The result is the same.
Your project type is All native Libraries which means that a .dll will be created for each source program in your project.
Is this what you want?
Answer : NO.
The ONLY thing that I want is :
1.-Have only ONE project named Tur-Bus Visual
2.-Execute the Principal program : vtboi69
3.- When the principal program call another like this :
CALL "vtbor130"
USING vtbor130-parametros
CANCEL "vtbor130".
That I can see the animating of this program. Like I see when executing them in MFE with animating.
4.- That is all.
Any help in regards will be welcome.
Many thanks
PJM
+2- Moderator
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
If you would like this to run as it did in MFE then you will most likely want to generate .int or .gnt files.
Create a single project and set its type to all .int/gnt files as shown below:
The default is to create .int files.
If you wish to generate .gnt files instead then click the checkbox next to the "Compile to .gnt" option.
This will cause either an .int or .gnt file to be generated for each program source file in the project so add all of your programs to this project.
To configure the starting program to use when debugging under Debugging Configurations browse to the program that you wish to be the main program.
Now when you start debugging it will run the main program and you should be able to step directly into your sub programs when they are called.
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Chris,
So sorry but is not work...I Generated all .int files I put the patch to the principal program and nothing.
Here you are the screns with the propiertes ...In adition I retired all references to $SET DIALECT(RM) from all programs.
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Chris,
So sorry but is not work...I Generated all .int files I put the patch to the principal program and nothing.
Here you are the screns with the propiertes ...In adition I retired all references to $SET DIALECT(RM) from all programs.
+2- Moderator
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Can you please zip up your project folder containing the source programs, etc and send it to me at chris.glazier@microfocus.com?
Thanks.
+2- Moderator
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
I received your zip file via e-mail, thank you.
I started with an empty workspace and then I imported your project from c:\\home1 into my workspace while copying the project and when I start debugging it works fine, starting with vtb0169.cbl and then when I step through the program it steps into the called programs and debugs them just fine also.
What product version are you using?
I tested with Visual COBOL 2.1 update 1.
Thanks.
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Is a quite different from MFE , but run.
TKS,
- Rocketeer
How can I see the animating of call programs in Visual Cobol like I can see in Mainframe Express ???
Is a quite different from MFE , but run.
TKS,
Recent badge winners
Sign up
Already have an account? Login
Welcome to the Rocket Forum!
Please log in or register:
Employee Login | Registration Member Login | RegistrationEnter your E-mail address. We'll send you an e-mail with instructions to reset your password.
77 4th Avenue
Waltham, MA 02451 USA
