Chris ,

We have the fooling in PL-SQL :

Chris ,

We have the fooling in PL-SQL :

I found the following in the Oracle Pro*COBOL documentation about embedded PL/SQL in embedded SQL programs:

Embedding PL/SQL

Pro*COBOL treats a PL/SQL block like a single embedded SQL statement. So, you can place a PL/SQL block anywhere in a host program that you can place a SQL statement.

To embed a PL/SQL block in your host program, declare the variables to be shared with PL/SQL and bracket the PL/SQL block with the EXEC SQL EXECUTE and END-EXEC keywords.

Dear Chris,

We did all of this in the enclosed Cobol Program and ALWAYS we get the same ERROR  on the same line :

Dear Chris,

We did all of this in the enclosed Cobol Program and ALWAYS we get the same ERROR  on the same line :

01  COD_CLI.
           05  ENTRADA-COD-CLI.
               10 token_encript PIC X(50).
               10 pior_header   HEADER.
               10 pic_rut       PIC X(19).
               10 pon_cod_cli   PIC 9(08).
               10 pon_errornum  PIC 9(10).
               10 poc_errortxt  PIC X(255).

Dear Chris,

How I didn´t  find a solution for this problema I want to test another approuch. I want to build a JVM Cobol program that read the HEADER Object and then Call a Cobol program with SQL Embedded to do the Data Base Access.

Please say to me if this if posible and what I need to Licensed from Micro Focus  to do this.

Many thanks in advanced for your Help.

PJM

Hi Pedro,

Have you talked to Oracle about the correct way to handle this in Pro*COBOL? Pro*COBOL is an Oracle product and not a Micro Focus one.

If you have to execute some PL/SQL that is not supported in Pro*COBOL then it might be best to create a stored procedure for this and then execute this from within COBOL.

Dear Chris,

WE did that. But how PRO*Cobol don´t accept Type Object we get always the same error on Type Header.

 For that we are trying to do an JVM Cobol program to read the Object Header and then Call a Native Cobol program Using this header translated.

Thanks,

PJM

Dear Chris,

WE did that. But how PRO*Cobol don´t accept Type Object we get always the same error on Type Header.

 For that we are trying to do an JVM Cobol program to read the Object Header and then Call a Native Cobol program Using this header translated.

Thanks,

PJM

You can call a native COBOL program from a JVM COBOL program. Look in the Samples Browser under COBOL for JVM and then select the JVM COBOL to Native COBOL example.