Welcome Serena Central users! CLICK HERE
The migration of the Serena Central community is currently underway. Be sure to read THIS MESSAGE to get your new login set up to access your account.
Knowledge Partner
Knowledge Partner
1098 views

Calling Acucobol program from Java

Hi,

We need from java to call a cobol program with the following linkage on Acu 9.1 on Unix:


  01 lnk-proc-block.       
        02 tbl-exams-lnk.
         03 tea-exam-lnk         occurs 500.
          04 tea-exam              pic 9(5).
          04 tea-analisis          occurs 500.
           05 tea-anal             pic 9(8).
           05 tea-resu             pic x(45).        
           05 tea-uni              pic x(15).
           05 tea-ran              pic x(12).
           05 tea-ens              pic x(2).
           05 tea-est              pic x(1).
           05 tea-estmuc           pic x(1).
           05 tea-orden            pic 9(3).
          04 tea-cantAnal          pic 9(4).
          04 tea-socio             pic 9(8).
          04 tea-tubo              pic 9(12).
          04 tea-check.
             05 tea-chalf          pic x(5).
             05 tea-chnum          pic 9(4).
          04 tea-impreso           pic x.
          04 tea-repetido          pic x.
          04 tea-bloque-fallido    pic x.
        02 totalRegistros          pic 9(4).
        02 nombreArchivoLogLnk     pic x(20).
        02 nombreArchivoModulabLnk pic x(80).
        02 graboArchivoTmpLnk      pic x.
        02 varIntentosLnk          pic 9(2) value 1.
        02 retorno-lnk             pic 9.

The samples that come with Extend do not include how to deal with an array of string.

Any ideas or samples to use?

Regards,

Juan Urraburu
ProRM

Juan Manuel Urraburu
Director of Technology @ ProRM & Axtrio
Micro Focus Knowledge Partner
LinkedIn

0 Likes
1 Reply
Micro Focus Expert
Micro Focus Expert

RE: Calling Acucobol program from Java

I believe you need to consider this as one large string .. when using the CVM for Java calling COBOL, there is a CALL_OPTIONS which allows you to specify the amount of bytes the COBOL will receive. A Guide to Interoperating with ACUCOBOL-GT  Chapter 2: Working with Java Technology > 2.2 Calling COBOL from Java > 2.2.3 Using the Java API, "CVM.jar"  >

2.2.3.2 CALL_OPTIONS class

The CALL_OPTIONS class contains a linkage_signature property that describes the data in the linkage section. For example, a linkage_signature of "X45X20SSIJ" describes two PIC X items of 45 and 20 bytes respectively, two shorts, an integer, and a long.

The linkage_signature ensures that there is enough memory for Java strings to get passed in, even when the Java string has a shorter length than the PIC X data item in the linkage section. For example, a Java string of length 10 can be passed into a PIX X(45) data item. In this case, 45 bytes are allocated to memory, not 10 bytes.

0 Likes
The opinions expressed above are the personal opinions of the authors, not of Micro Focus. By using this site, you accept the Terms of Use and Rules of Participation. Certain versions of content ("Material") accessible here may contain branding from Hewlett-Packard Company (now HP Inc.) and Hewlett Packard Enterprise Company. As of September 1, 2017, the Material is now offered by Micro Focus, a separately owned and operated company. Any reference to the HP and Hewlett Packard Enterprise/HPE marks is historical in nature, and the HP and Hewlett Packard Enterprise/HPE marks are the property of their respective owners.