Mainframe, MVS and zOS Discussion

Hope the year starts on good note for everyone, Happy New Year!

Hi,

Can we pass parms for ISRSUPC using COBOL. Can someone please guide me on this.

It has started bugging me now. There is nearly no commute. You can't go anywhere freely within city. Going from one city to another is like going on a war. I've not met my family for nearly 3 months now.

We had been upgrading from COBOL 4.2 to COBOL 6.2. There was a program that ran fine under COBOL v4.2 and gets S0C7 under COBOL v6.2. it needed to initialize a field to prevent the abend. COBOL v6.2 is not forgiving of uninitialized fields. Any experience with this, please? And is there some documen...

I'll try to explain more. We've CICS Test regions. These test regions can execute some of the transaction using Tibco and APIs and we don't have any control on that. These 'interfaces' don't have the visibility of mainframe transaction they just wait for the "result set". If they don't get...

Hi,

Is there a way to limit the time a CICS transaction can execute in CICS? If yes, could you please guide how to do that?

Actually they were moving the servers physically as the office premises were changed but we had 50+ abends because of that even though we knew it! IT did not do anything apart from resubmitting the failed job after the server was up - after 20 hrs on a working day! In my past companies they will alw...

enrico-sorichetti wrote: ↑Sun Oct 06, 2019 6:01 pmhow do they behave NOW for an unplanned servers downtime ???

They just let it abend.

only somebody technically challenged would run jobs which rely on the servers availability

Actually they just let the job abended and then restarted when the server was available.

Want to know how do you handle a FTP server maintenance at your shop? I'm at a new shop and they have announced a maintenance window during which there will be some Jobs running on mainframe. These are Fusion Jobs and send data to these servers and will fail as the server is not avaliable. How do yo...

This is what I tried; Compuware Abend-AID --------- Fault Summary --------------------- Row 000001 COMMAND ===> SCROLL ===> CSR Shared Directory/Database... ABCDE.AAV17R2.ABCD.ABCD170.SHDRRPT For a list of databases, select DBLIST To view the Fault Summary for a specific type, select View Job Name o...

Hi,

We have got a S0C7 is the production for a Job. We have abend-Aid installed and I tried to analyze it. But I could not figure out how to know which record is in error? How to find that?

Yes, I was talking about KSDS. In general, key size has NO relationship to CI size. did you mean that there are case when there is a connection in between key-size and CI? CI size can only be certain values (512 to 8192 by 512, 8192 to 32760 by 2048) and you select the CI size based on the data set ...

And the answer to your question is no, COBOL has no function to trim spaces. This is because COBOL does not have strings like languages such as C or Java. COBOL has variables. Variables are (almost always) fixed length and if there are not enough characters provided for the length of the variable, ...

HI All,

Is there any COBOL built-in function to trim spaces at the starting and ending of a variable.. please let me know.

Hi,

Am not very familiar with VSAM so asking this. How to determine CI size by key length? If the file length 25 and the file length is 2000? Is it based on CA size?

Thanks Robert for the reply. I read about PLT program and it is not easy to understand it. Will have more questions.

We have invoked the TRAN directly and experimenting if it if working as per test cases.

Hi,

There is a requirement which requires to issue a print as soon as the CICS region is brought up. Is there a way to really create a test case for such a situation, I mean apart from really bringing down or up the region, what can be possible way to do it? Can region up/down be mimicked?

:unknown: Can any one suggest solution for GE status code while trying to insert data in ims database (ISRT call) ... IBM manual says For an ISRT call, DL/I cannot find one of the parents of the segment being inserted.For an ISRT call, DL/I was requested to insert a root segment outside of the acces...

Hi

is it possible to use reference modification for a receiving field in a COBOL program? For example, can we use something like this:
?

I am still getting the same results. As this is for learning only... I shall do some more experiments.