Quantcast
Channel: Enterprise Developer Team Edition Support - Recent Threads
Viewing all 75 articles
Browse latest View live

Error COBLK0004 linking native (legacy) code in EDTE 2.1

$
0
0

We successfully ported a multi-million lines legacy system on Windows in 20006. However it's on NetExpress 4.0, therefore we want to migrate it to Enterprise Developer.

We have this problem with 385 batch programs but I will explain what's going on with a "typical" program...

The main program calls 5 sub-programs among which one is not a legacy but a DAL (Data Acces Layer) written while porting to Windows.

They all share the same directives except these 2 (The DAL does not use it)
  AMODE"31"
  FOLDCALLNAME"UPPER"

When I build the project, I get the following error (when using the almost-common directives)
COBLK0004 : Cannot read file :  DAL.obj

If however I swith to the DAL's directives, the error disappear but reappear with the other sub-programs
COBLK0004 : Cannot read file :  SUB1.obj
COBLK0004 : Cannot read file :  SUB2.obj
COBLK0004 : Cannot read file :  SUB3.obj
COBLK0004 : Cannot read file :  SUB4.obj

I think it's because of the FOLDCALLNAME directive (Sub1-Sub4 uses it while DAL does not)

All the programs are static linked and there is a reason for it. The system has a complex network of "ENTRY" statements.
I suppose I could try to build the DAL as a DLL Project, but I would rather keep it static to avoid a mix & match.

Any advice?


MQ PUT Error - File 'DFH0MQIS' error code: 114

$
0
0

Hi,

I have a Cobol program that connects to Oracle tables, fetch some values and then write those values to MQ.

Related to MQ, I have two steps, OPEN and PUT.

OPEN step works well with return code of zero.

But the PUT step (CALL "MQPUT1") fails with following error:

CASKC0027E Error executing service 'PGM#MQTEST' Execution error : file 'DFH0MQIS' error code: 114, pc=0, call=1, seg=0 114 Attempt to access item beyond bounds of memory (Signal 11)

I am using following directives.

ASSIGN (EXTERNAL) PROTECT-LINKAGE FCDCAT INDD(SYSIN 80 R) OUTDD(SYSOUT 121 R) INITCALL"ORASQL11" p(cobsql) CSQLT=ORACLE8 MAKESYN VERBOSE KEEPCBL END-C  VARCHAR=YES MODE=ANSI DECLARE_SECTION=NO  p(cp) ENDP ENDP

 

Strange is that if I remove p(cp) ENDP the programs works well and MQ PUT step works fine.

But due to my project requirement I need to have p(cp) ENDP in directives.

 

Any idea why this p(cp) ENDP cause to failuar of file 'DFH0MQIS'?

 

Regards

Dheeraj

CICS App written by C/C++

$
0
0

Hi,

My customer has CICS Programs written by IBM C/C++. They want to migrate those CICS programs to run on Enterprise Server of Windows.

I know Mainframe Subsysytem Support of Enterprise Server don't support to C/C++, but..

Is there any idea to run CICS App written by C/C++  on Enterprise Server/Developer ?

DEBUG COBOL program in Linux command

$
0
0

I have complied my program using cob -iav MTFBOX40.cbl and while running using cobrun command on Linux, I am getting "Illegal character in numeric field" error, It looks like some character data is getting incorrectly passed to numberic field. The problem is I have more than 150 input fields in my commarea and it is difficult to debug the same.

The same program is working fine on windows environment

Please advise how to debug the program in linux to find root cause.


Execution error : file '/home/z993007/work/mtfbox40/MTFBOX40.int'
error code: 163, pc=3FA, call=1, seg=0
163     Illegal character in numeric field

Thanks

Anil

PROCOB autoconnect Oracle database

$
0
0

Hi

In my cobol program instead of specifying the direct db connect statement like  EXEC SQL CONNECT :USERNAME END-EXEC

Can we have some directive like INIT which can execute SQL statement directly and load the connection automatically without explicitly specifying the in cobol program

This works fine when I trigger the job using JCL with Oracle XA connection with IKJEFT01 program.

But if I compile and run using command prompt like cob -iv test.cbl

and run with cobrun command as cobrun test.int then it fails and gives error oracle not logon (error code ORA 1012)

I tested with directive DBMAN=ODBC , INIT and DB it worked and auto connected.

I wanted to know if we can use same with procob directives to auto connect.

please advise

 

 

I need information about best practice to use GIT in Microfocus Enterprise Developer

$
0
0

I need information about best practice to use GIT in Microfocus Enterprise Developer

Team Edition

$
0
0

My Team Edition trail period expired. How to uninstall the team edition and go  back to the EDPE? I am not able continue my education on mainframe dure the Team Edition trial ends.

Is SAS, EZETREIVE supported for rehosting

$
0
0

Hi,

Is Source code in EZETRIEVE, SAS are supported to be rehost in Micro Focus or do we need to reengineer for using in Micro Focus?

 

Regards,

Ekam


SPOOL HouseKeeping ARCHIVE

$
0
0

Hello,

I am actually running the Spool House keeping Archive utility  and i am getting this return code :

 SPOOL clean-up failed - return code = 08 reason code = 41

I think  this error is returnd by the sub-program MVSP0027  but i don't kb*now the meaning of this error and return code.

Here's the JCL which i run   on   Linux :

//STEP10 EXEC PGM=MFSPHK01
//SYSIN DD *
LOCATION /shared/spool/archive/wk2912
GLOBAL RETAIN=15 ARCHIVE=Y
/*
//SYSPRINT DD SYSOUT=*
//CMDS DD DSN=&&CMDS,DISP=(,CATLG)
//*
//RUNCMDS EXEC PGM=MFCMDLNE,PARM='DEBUG'
//STDIN DD DSN=&&CMDS,DISP=(OLD,CATLG,CATLG)
//STDENV DD DUMMY
//STDOUT DD SYSOUT=*,RECFM=LSEQ
//STDERR DD SYSOUT=*,RECFM=LSEQ
//CMDS DD DUMMY

Can anyone help^me to fix this issue please ?

Best regardds

Rodolphe

 

DB2 Table Locked

$
0
0

Hello !

I'm running a Cobol program that executes a insert in a DB2 table.

The program is executed OK but, after that, I try to open the table in SQL Wizard and its locked !

The only way to unlock the table is stopping the server.

Is there any configuration to solve that ?

Thanks,

Douglas

compiling without restarting CICS

$
0
0

Our shop was  long time user of MFEE so this is what I am comparing Enterprise Developer with.

Is there a way to compile a program in Enterprise Developer and test the code through debugger without restarting the CICS server, essentially a new copy?

enterprise developer - not saving data

$
0
0

Something happened where now my application does not save data in XDB. It writes it to XDB but once I log off, it seems to rollback the database. Is there some setting that I set? I cannot find it. 

Ant build report success even when compile fails

$
0
0

I'm using ANT to compile and link a COBOL program from a window DOS prompt,  using the .cobolBuild file generated by MF Enterprise Developer for Eclipse with the following command:  

ant -f  .cobolBuild

I've noticed that even when the compile step fails, in this case due to invalid syntax, with an message like this:

[cobol] Compiling RD24E100.cbl...
[cobol] MOVEX 'Y' TO SYS201-EOF
[cobol] COBCH0301S Unrecognized verb : C:\MFWorkspace\RD24E100\RD24E100.cbl(133,18,14)
[cobol] Compilation complete with 1 errors, 0 warnings, 0 notices and an exit code of 12

However the ant build still ends with the BUILD SUCCESSFUL message. This is throwing off an automated build/deploy tool I am trying to configure.

The other puzzling thing is that when the MF Enterprise Developer for Eclipse runs the same build against the same COBOL program it does end with a BUILD FAILED message.  

Any thought on why this is happening would be appreciated.

Thanks,

Ray H.

 

ESDEMO Creation

$
0
0

I am a teacher and am attempting to get Enterprise Developer 2.2 installed and tested so I can use it for both Cobol and CICS development for my students. The software is installed (correctly, I believe) and all Cobol elements are behaving properly.

I am having an issue trying to create the demonstration CICS region ESDEMO. I believe this may be an SQL Server 2012 Express Configuration issue. The following is the info displayed from SQL Server Management Studio Help / About:

Microsoft SQL Server Management Studio            11.0.3128.0
Microsoft Analysis Services Client Tools        11.0.3128.0
Microsoft Data Access Components (MDAC)            6.1.7601.17514
Microsoft MSXML                                    3.0 5.0 6.0
Microsoft Internet Explorer                        9.11.9600.17691
Microsoft .NET Framework                        4.0.30319.18444
Operating System                                6.1.7601

I normally use Windows Authentication to access SQL Server Management Studio, and my ID does have both SysAdmin and DBAdmin authority - I can Create Database etc while in Management Studio.

I follow the procedure outlined in "To Define a New Region With an Existing Region Startup File". I have tried various formats when I specify the Database Server Instance - (local)\SQLEXPRESS is indicated in the documentation. My database instance is called SQLEXPRESS and this does seem to work. I have also tried manually specifying my machine name as shown when I sign on SQL Server Management Studio. Regardless of what I specify (assuming syntax is OK) when I create the ESDEMO region the Database State column shows "Connection Failed".

I read that the database is only created when I start the region for the first time so I always Cold Start after this. This churns for a while, but no messages are initially displayed - after a few minutes I get "CF0103E Error Querying Region Startup Progress on localhost". Nothing is displayed in the View Console display, and the title bar in both says CICS Region ESDEMO - Connection Failed.

I have checked in SQL Server Configuration Manager and all 3 protocols are enabled. SQL Server / SQLEXPRESS is running and so is SQL Server Browser. SQL Server Agent is not - does it need to be? I tried to start it manually and it would not, but from what I have read this is not supported with SQL Express and is not needed.

So, I have several questions:

1) Did SQL Server 2012 need to have any particular parameters specified when it was installed? I have read about Mixed Mode Authentication, is this needed? I tried signing onto SQL Server with SQL Authentication but it did not work - I suspect that Mixed Mode was not used during installation.

2) Is SQL Server Agent needed?

3) I have Micro Focus SEE Monitor and Listener Log On tabs specified to Log On as "This Account" / Local Service - is this correct? Should I be using Local System Account? Or something else?

Any help or advice would be greatly appreciated.

failOnError in .cobolBuld defaults to false

$
0
0

Using Micro Focus Enterprise Developer for Eclipse v.2.2.    It appears that the property failOnError in the ant file .cobolBuild, which the IDE generates, is defaulting to a value of 'false'.    I can change this to 'true' by editing the .cobolBuild file but then if I change any other project properties via the IDE it gets set back to 'false' again.  How can I keep this value set to 'true'?

Thanks,

Ray H.


Server Name

$
0
0

From within a exit process. How can I found out the Enterprise server name the job is running in.

Would like to be able to add the Enterprise Server name as part of the print banner page so that you can see from which environment the printout originated. 

This will be in the Printer Exit module.

open error on empty file

$
0
0

need to get passed an open of empty file (i-o error) (RTS 13) file not found.there are times when this file is empty and previous was opended and closed without data.  If I can get by the open error then on the read it should go out the at end exit.

any thoughts how to accomplish this?

Moving low-values to S999 field

$
0
0

I am using Micro Focus Enterprise Developer 2.2 Update 2 for Visual Studio 2010 with Microsoft Visual Basic 2010.

The COBOL dialect is: Enterprise COBOL for z/OS

Within a CICS program I am moving low-values to the entire map, which is customary in CICS.

But when the program hits this line: IF FIELDI = LOW-VALUES it does not find low-values. FIELDI is defined as S999.

Perhaps I am missing a directive in the "Additional Directives"?

CTG Demo - ecicall.cbl

$
0
0

Enterprise Developer provide sample programs, eci2oper.cbl and eci-call.cbl, for testing CTG.

These sample programs work fine as it is in the documentation.  I used ED for Eclipse v2.2 U2.

For testing purpose,

I rebuilt COBOL JVM Project with ecicall.cbl. It is same program with eci-call.cbl, just file anme renamed.

When I ran ecicall.cbl as COBOL JVM Application, I got following errors on Console view:

===== Copy of CONSOLE View ==========

Enter the message you want to send to the console (enter only to terminate program)
==> 1234567890
#
# A fatal error has been detected by the Java Runtime Environment:
#
#  EXCEPTION_ACCESS_VIOLATION (0xc0000005) at pc=0x72c9e9b5, pid=4280, tid=4520
#
# JRE version: Java(TM) SE Runtime Environment (8.0_45-b15) (build 1.8.0_45-b15)
# Java VM: Java HotSpot(TM) Client VM (25.45-b02 mixed mode windows-x86 )
# Problematic frame:
# C  [CCLAPI32.dll+0xe9b5]
#
# Failed to write core dump. Minidumps are not enabled by default on client versions of Windows
#
# An error report file with more information is saved as:
# C:\CTG\CTGCLIjvm\hs_err_pid4280.log
#
# If you would like to submit a bug report, please visit:
#   http://bugreport.java.com/bugreport/crash.jsp
# The crash happened outside the Java Virtual Machine in native code.
# See problematic frame for where to report the bug.
#
The function under MTO has returned the                                                                                                                                                                                                         following return codes.
EIBRESP  : +38976288
EIBRESP2 : +38976288
Enter the message you want to send to the console (enter only to terminate program)
==>

-----------------------------------------------------------------------------------------------------------------

I have two questions:

  1. Can I make ecicall.cbl as JVM COBOL Program by help of any wrapper program ?

  2. Can I have Java program running equivalently with eci-call.cbl ?

Many Thanks

Web service calling native Cobol

$
0
0

In Visual Studio 2012 I have created a C# WCF service (based on the WCF service library project template).

This weservice calls a managed Cobol class, which in turn calls native Cobol modules.

When I test the webservice the first call is handled correctly. But when I invoke the webservice again I get strange results.

After some analysis I learned that the cause of the problem is that when the native Cobol modules are called in the second webservice request the state of their Working-Storage is still as it was left after the first invocation of the webservice. In other words, the native modules are still in memory and their state has bee preserved.

Does anybody know how I can solve this?

 

Viewing all 75 articles
Browse latest View live


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>