|
View previous topic :: View next topic
|
| Author |
Message |
George Tillmon
New User
Joined: 22 Mar 2010
Posts: 27
Location: Montgomery, AL
|
|
|
|
Hello.
I have two files that I use Eztrieve to check the month and year in each files' header record. If the dates are the same, I write to one file if the dates are not the same I write to two files. Is there a way to set a condition code that I can use in the next step to uncatalog or catalog a file?
Thanks,
George |
|
| Back to top |
|
 |
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
|
|
|
|
| Have you looked in the manual? |
|
| Back to top |
|
|
George Tillmon
New User
Joined: 22 Mar 2010
Posts: 27
Location: Montgomery, AL
|
|
|
|
| Bill Woodger wrote: |
| Have you looked in the manual? |
Yes I have.
Thanks. |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
Did you find RETURN-CODE?
Is there still a question? |
|
| Back to top |
|
|
George Tillmon
New User
Joined: 22 Mar 2010
Posts: 27
Location: Montgomery, AL
|
|
|
|
| dick scherrer wrote: |
Hello,
Did you find RETURN-CODE?
Is there still a question? |
Thank you.
I have found RETURN-CODE.
Thank you all!!!!! |
|
| Back to top |
|
|
George Tillmon
New User
Joined: 22 Mar 2010
Posts: 27
Location: Montgomery, AL
|
|
|
|
I am trying to use RETURN-CODE, however, it is giving me strange results.
If the file do not match I mover +0900 to RETURN-CODE.
When I look at the COND CODE in the executed jcl, it shows 2544.
When I display RETURN-CODE in the Easytrieve program, it displays as 1324415472.
Thanks,
George |
|
| Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA
|
|
|
|
| Since a return code is a value in the range 0 to 4095, if you take 1324415472 modulo 4096, you get 2544 -- hence the return code 2544. Where the 1324415472 came from, I'm not sure -- the hexadecimal value is 4EF0F9F0 |
|
| Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
|
|
|
|
When you say move, do you mean MOVE?
I've never done that. Try with an assignment instead, please. |
|
| Back to top |
|
|
George Tillmon
New User
Joined: 22 Mar 2010
Posts: 27
Location: Montgomery, AL
|
|
|
|
| Bill Woodger wrote: |
When you say move, do you mean MOVE?
I've never done that. Try with an assignment instead, please. |
Yes. As in MOVE +900 to RETURN-CODE. |
|
| Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1787
Location: Bloomington, IL
|
|
|
|
| Robert Sample wrote: |
| Since a return code is a value in the range 0 to 4095, if you take 1324415472 modulo 4096, you get 2544 -- hence the return code 2544. Where the 1324415472 came from, I'm not sure -- the hexadecimal value is 4EF0F9F0 |
Is not the EBCDIC glyph for 4E is a plus sign? It sounds as if Mr. Tillmon is moving a character string to a binary word. |
|
| Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA
|
|
|
|
| Akatsukami, I didn't think of that -- and with a typo, +090 (character) would be the mysterious value .... |
|
| Back to top |
|
|
George Tillmon
New User
Joined: 22 Mar 2010
Posts: 27
Location: Montgomery, AL
|
|
|
|
| Akatsukami wrote: |
| Robert Sample wrote: |
| Since a return code is a value in the range 0 to 4095, if you take 1324415472 modulo 4096, you get 2544 -- hence the return code 2544. Where the 1324415472 came from, I'm not sure -- the hexadecimal value is 4EF0F9F0 |
Is not the EBCDIC glyph for 4E is a plus sign? It sounds as if Mr. Tillmon is moving a character string to a binary word. |
I moved 0900 to RETURN-CODE and the COND CODE was 0240. |
|
| Back to top |
|
|
George Tillmon
New User
Joined: 22 Mar 2010
Posts: 27
Location: Montgomery, AL
|
|
|
|
I got it to work.
I used REURN-CODE = 0900.
Thank you all.
THANK GOD!!!!!! |
|
| Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
|
|
|
|
An assignment (=) is like a Cobol move. A MOVE is like an Assembler MVC/MVCL.
Confusing, but it's in the manual.
Use assign, except for files and when you need to do an MVC/MVCL type thing. |
|
| Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
|
|
|
|
| Also, when DISPLAYing for any investigative purpose, the DISPLAY HEX should be preferred. You'd have seen +090 (with the last zero chopped, as it got MOVEd to a four-byte field) and got a bit of a hint. |
|
| Back to top |
|
|
|
|
