Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all 8500 articles
Browse latest View live

Suggestions & Feedback :: RE: E-mail notifications

$
0
0
Author: steve-myers
Posted: Sun Apr 15, 2018 7:27 pm (GMT 5.5)

Nic - It's been behaving this way as long as I can remember.

Suggestions & Feedback :: RE: E-mail notifications

$
0
0
Author: mcmillan
Posted: Sun Apr 15, 2018 9:00 pm (GMT 5.5)

Yes Nic, Quick Reply automatically tick the checkbox.
_________________
Ever Loving,
McMillan

Google Certified Analytics Expert
--------------------------------------------------------------------
We are not here to Stay, we are here to Live.
--------------------------------------------------------------------

Testing & Performance analysis :: RE: TCPIP MSU consumption

$
0
0
Author: mvsman
Posted: Mon Apr 16, 2018 5:26 pm (GMT 5.5)

Thanks Robert. This is really interesting.
I will investigate that more.

COBOL Programming :: Comparing two sequential files

$
0
0
Author: Mohan Kothakota
Subject: Comparing two sequential files
Posted: Mon Apr 16, 2018 6:35 pm (GMT 5.5)

Hi All,

I have two sequential files, one file with LRECL = 80 (FB) and other file LRECL = 3000 (VB).

The first file with LRECL = 80 is input where account number (key field) with other details will be provided.

I have to search the second file using the key fields and update the second file using the details/values of the first file.

I have followed below logic

START
Open INPUT first-file
Open I-O second-file


Read FIRST-FILE
PERFORM VERIFY-RECORDS (verification for the second file)

VERIFY-RECORDS.
Compared KEY values of the Input file with all records

IF matched then REWRITE the second-file

CLOSE FILES

END

somehow I am not getting desired results. Can anyone share other ideas please.
_________________
Mohan Kothakota

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: Robert Sample
Subject: Reply to: Comparing two sequential files
Posted: Mon Apr 16, 2018 6:44 pm (GMT 5.5)

Quote:
somehow I am not getting desired results. Can anyone share other ideas please.
My first idea would be to post meaningful data. "not getting desired results" -- could mean, among other things:
- program abends with a system code
- program abends with a COBOL code
- program runs to normal completion but produces no results
- program runs to normal completion but produces incorrect results
- program generates a file status code during processing

Furthermore:
- are the two files sorted on the key?
- if not, why are you not sorting them before starting the process? Unsorted, you have to read the second file from the beginning for each record to find the match so you have to do a lot more work.
- what results do you desire?
- how do the actual results differ from what you desire?
- is your desired results what the system can produce or are you wanting something impossible to produce?
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: Mohan Kothakota
Subject: Reply to: Comparing two sequential files
Posted: Mon Apr 16, 2018 7:19 pm (GMT 5.5)

Hi Robert,

Sorry for the confusion. Please find my response

- Program abends with System code.

- Files have been sorted before running the program.

- I have record in the second file but I want to update some fields in it. So I am using the first file as Input.
Using the Input, the second file needs to be updated.

The desired result is the second file needs to get updated same as first file values.
_________________
Mohan Kothakota

All Other Mainframe Topics :: Call COBOL or PLI with a click from web without CICS

$
0
0
Author: vaibhav gs
Subject: Call COBOL or PLI with a click from web without CICS
Posted: Mon Apr 16, 2018 7:29 pm (GMT 5.5)

is it possible to call COBOL program in mainframes on a click from web without CICS intervention.
If yes then is there any reference manual or related documents to understand it better.
_________________
VaibhavGS
India

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: Robert Sample
Posted: Mon Apr 16, 2018 7:37 pm (GMT 5.5)

Quote:
- Program abends with System code.
OK -- WHAT SYSTEM CODE DID IT ABEND WITH?
Your answer is responsive but meaningless. A system abend S0C7 is quite different from a system abend S001 is quite different from a system abend SB37 and each has a different resolution. There are hundreds, if not thousands, of system abend codes and without telling us which one, there is nothing we can do to help you.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth


All Other Mainframe Topics :: RE: Call COBOL or PLI with a click from web without CICS

$
0
0
Author: Robert Sample
Posted: Mon Apr 16, 2018 7:45 pm (GMT 5.5)

Yes, you can use CGI (Common Gateway Interface) code to connect the web page to the mainframe. Google z/os cgi programming to get about 1,250,000 hits and several on the first page will help you. Depending upon which version of z/OS you're using, you may be using the HTTP Server that used to be delivered with z/OS, or you may be using the Apache HTTP Server on z/OS. If the latter, start reading IBM HTTP Server - Powered by Apache. If you are not sure which is being used, you MUST contact your site support group to find out.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

CICS :: 3270 Data stream error

$
0
0
Author: Benchwarmer
Subject: 3270 Data stream error
Posted: Tue Apr 17, 2018 12:06 am (GMT 5.5)

Receiving following error in a existing CICS transaction

Quote:
An SFE, SA or MF order was received with an unrecognized attribute type. The error occurred at location 0x424 in the write.


Once the user received error on different location

Quote:
An SFE, SA or MF order was received with an unrecognized attribute type. The error occurred at location 0x41e in the write.


Sending the map via below command

Code:

EXEC CICS                           
  SEND MAP('MAPNAME')               
       MAPSET('MAPSET')           
       FROM(COPYOUT) ERASE         
       CURSOR                       
END-EXEC. 


I would like to know how to map this location in physical or symbolic map to determine the field causing the issue.

Did not find anything that talks about what am looking for. Any pointers will be helpful.

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: sergeyken
Posted: Tue Apr 17, 2018 1:49 am (GMT 5.5)

Looks like the ABEND code is equal to the word "SYSTEM", isn't it? icon_fU.gif
_________________
Tyrannosaurus-REXX

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: sergeyken
Posted: Tue Apr 17, 2018 1:49 am (GMT 5.5)

Preliminary my guess is that using any of standard SORT utilities for this task requires approx. 300 times less coding compared to COBOL solution, isn't it?

My second guess: SORT utility can provide 100 times better performance on huge datasets, compared to primitive hand-made COBOL code.
_________________
Tyrannosaurus-REXX

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: Nic Clouston
Subject: Reply to: Comparing two sequential files
Posted: Tue Apr 17, 2018 2:38 am (GMT 5.5)

You are comparing two sequential data sets. Did you follow the logic in the "sticky" topic (among the first 5 topics in this part of the forum) - amende for your particular requirement?
_________________
Regards
Nic

CICS :: RE: 3270 Data stream error

$
0
0
Author: Robert Sample
Posted: Tue Apr 17, 2018 3:23 am (GMT 5.5)

Are you sure the map storage is initialized to nulls before sending the map? There should be a MOVE LOW-VALUES TO MAPNAMEO somewhere before the SEND MAP.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

CICS :: RE: 3270 Data stream error

$
0
0
Author: Benchwarmer
Subject: Reply to: 3270 Data stream error
Posted: Tue Apr 17, 2018 9:29 am (GMT 5.5)

Yes, the map storage is initialized. I don't see an issue with that. This issue does not happen often. There is no distinguishable scenario causing the issue. It happens randomly.
_________________
Thanks,
Kratos


COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: Mohan Kothakota
Subject: Reply to: Comparing two sequential files
Posted: Tue Apr 17, 2018 3:47 pm (GMT 5.5)

Hi Robert,

I am getting SOC7,

Below is the Input

Code:
05  IPD350-ACTUALS.                           
   10  IPD350-HOURS             PIC  S9(05)V99.
   10  IPD350-DOLLARS           PIC  S9(07)V99.
   10  IPD350-UNITS             PIC  S9(07)
.


Values of Input

Code:
IPD350-HOURS       :   14.39 
IPD350-DOLLARS     :   148.22
IPD350-UNITS       :   275   


I am moving to below fields

Code:
10  RLD-CUR-MTH-ACTUALS       COMP-3.       
    15  RLD-CMA-HOURS   PIC  S9(05)V99.     
    15  RLD-CMA-DOLLARS PIC  S9(07)V99.     
    15  RLD-CMA-UNITS   PIC  S9(07).   



I tried with and without COMP-3 for Input but still getting SOC7.
_________________
Mohan Kothakota

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: enrico-sorichetti
Subject: Reply to: Comparing two sequential files
Posted: Tue Apr 17, 2018 4:52 pm (GMT 5.5)

show the hexadecimal values of the input ...
NOT an edited value
_________________
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort icon_cool.gif

CICS :: RE: 3270 Data stream error

$
0
0
Author: Robert Sample
Posted: Tue Apr 17, 2018 5:10 pm (GMT 5.5)

Quote:
There is no distinguishable scenario causing the issue. It happens randomly.
Which is a strong indication that the issue is caused by a storage overlay in the program.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: Robert Sample
Subject: Reply to: Comparing two sequential files
Posted: Tue Apr 17, 2018 5:13 pm (GMT 5.5)

Have you done the elementary debugging of figuring out which line of code and which variable(s) are causing the S0C7? If not, start by finding the line of code and the variable(s) involved. You may need to rewrite the code to prevent the S0C7.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

COBOL Programming :: RE: Comparing two sequential files

$
0
0
Author: sergeyken
Subject: Re: Reply to: Comparing two sequential files
Posted: Tue Apr 17, 2018 7:28 pm (GMT 5.5)

Robert Sample wrote:
Have you done the elementary debugging of figuring out which line of code and which variable(s) are causing the S0C7? If not, start by finding the line of code and the variable(s) involved. You may need to rewrite the code to prevent the S0C7.


Just recently the topic starters with low level of understanding in IT technologies were directed straightforward to the Beginners Forum.

The level of this question is even worse than "zero degree"; does it make sense to carefully explain here the very standard, and obvious steps in program coding, and debugging?
_________________
Tyrannosaurus-REXX

Viewing all 8500 articles
Browse latest View live