Search found 50 matches

by Sandy
Fri May 17, 2019 9:00 am
Forum: CICS, Middleware and MQ Series.
Topic: Resolve SQLCODE -805 for CICS programs.
Replies: 1
Views: 1027

Resolve SQLCODE -805 for CICS programs.

Hi, We have many CICS Test regions. Many a times programmers will NEWCOPY the production code to these test regions with out really a DB2 BIND. Because these programs are not part of their testing and they just need to test trough them. Now as the program was not bound they will stuck in CICS region...
by Sandy
Fri Jan 18, 2019 2:15 pm
Forum: SMS & VSAM and BDAM, BSAM, QSAM, BPAM, ISAM, OAM.
Topic: READ the last record from VSAM always.
Replies: 2
Views: 1845

Re: READ the last record from VSAM always.

If by "last record" you mean the associated base cluster primary key with the highest value, you will need to initialize a SAVEKEY. Loop through the alternate index READ and if the primary key is greater than the SAVEKEY value, replace SAVEKEY. When you get to end of file, you have the pr...
by Sandy
Tue Jan 15, 2019 11:57 am
Forum: SMS & VSAM and BDAM, BSAM, QSAM, BPAM, ISAM, OAM.
Topic: READ the last record from VSAM always.
Replies: 2
Views: 1845

READ the last record from VSAM always.

Hi,

There is a VSAM file I am using. I'm reading this VSAM with alternate key but this gives more than one record from the VSAM. Could you please guide on what logic should I use so that I can to the last record every time for the given key.

Any help in this regard is appreciated.
by Sandy
Wed Oct 03, 2018 2:52 pm
Forum: Other Mainframe Topics, Off-Topics, FAQs.
Topic: | on the keyboard in a notepad file it appears | on the screen whereas in mainframe it appears ¦ .
Replies: 7
Views: 1479

Re: | on the keyboard in a notepad file it appears | on the screen whereas in mainframe it appears ¦ .

Robert Sample wrote: Sun Sep 16, 2018 6:16 pmWhat is the hex value for the character on the Windows system?

Code: Select all

|
4
F
-
¦
6
A
Robert Sample wrote: Sun Sep 16, 2018 6:16 pmWhat is the hex value for the character on the mainframe?
This I don't know how to find? Can you guide?
What is the code page being used on the mainframe (there are at least 2 common ones)?
US Code page.
by Sandy
Sun Sep 16, 2018 6:10 pm
Forum: Other Mainframe Topics, Off-Topics, FAQs.
Topic: | on the keyboard in a notepad file it appears | on the screen whereas in mainframe it appears ¦ .
Replies: 7
Views: 1479

| on the keyboard in a notepad file it appears | on the screen whereas in mainframe it appears ¦ .

When we type | on the keyboard in a notepad file it appears | on the screen whereas in mainframe it appears ¦ . Bow due to this the program is that we are sending a file from mainframe to windows and their load jobs are failing all of sudden with this conversion which I think normal from EBCDIC to A...
by Sandy
Tue Jul 03, 2018 8:03 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: SORT help required.
Replies: 6
Views: 2861

Re: SORT help required.

Try this:

Code: Select all

INREC FIELDS=(1,1,C'0001')
SORT FIELDS=(1,1,CH,A)
SUM FIELDS=(2,10,ZD)
INCLUDE COND=(2,10,CH,EQ,C'0001')
OUTREC FIELDS=(1,1)
by Sandy
Fri Apr 06, 2018 11:32 am
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: TRACE I does not seem to work.
Replies: 6
Views: 2917

Re: TRACE I does not seem to work.

prino wrote: Tue Mar 20, 2018 2:47 pmUse Code: Select alltrace ?i

and drown in messages. Better use
How do I stop these message if mistakenly done that? Attention key does help in this.
by Sandy
Fri Apr 06, 2018 11:31 am
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: Doug Nadel' s REXX code.
Replies: 17
Views: 9476

Re: Doug Nadel' s REXX code.

Thank you so much! :)
by Sandy
Tue Mar 27, 2018 2:28 pm
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: Doug Nadel' s REXX code.
Replies: 17
Views: 9476

Re: Doug Nadel' s REXX code.

What about the people who are already using these codes? They have it already right?
by Sandy
Thu Mar 22, 2018 4:16 pm
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: TRACE I does not seem to work.
Replies: 6
Views: 2917

Re: TRACE I does not seem to work.

Thank you prino. How could I overlook that! :oops:
by Sandy
Thu Mar 22, 2018 4:13 pm
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: Doug Nadel' s REXX code.
Replies: 17
Views: 9476

Re: Doug Nadel' s REXX code.

Yes, learned it hard way. :x
by Sandy
Mon Mar 19, 2018 5:56 pm
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: Doug Nadel' s REXX code.
Replies: 17
Views: 9476

Re: Doug Nadel' s REXX code.

Yes, actually I was looking for SDSFHIGH REXX of his, in case someone has it it'll help or if there can be more that will be great.
by Sandy
Mon Mar 19, 2018 3:59 pm
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: Doug Nadel' s REXX code.
Replies: 17
Views: 9476

Re:Doug Nadel's REXX code.

Thanks Enrico but the site shows this: The MVS related content on this site is unavailable. I have retired from IBM and much of the MVS related content on this site was developed as part of my tenure there. It was published here with the permission of IBM during my employment. I was diligent about a...
by Sandy
Mon Mar 19, 2018 11:23 am
Forum: Interview Questions.
Topic: Change lower casee to upper case.
Replies: 6
Views: 1319

Re: Change lower casee to upper case.

RYO Roll Your Own once upon a time when cigarettes in packs where not available it was a form of courtesy when somebody asked for some tobacco to hand him the tobacco pouch and say Roll Your Own it was a way of showing trust in the other person - that he would not make the cigarette too fat now it ...
by Sandy
Mon Mar 19, 2018 11:22 am
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: Doug Nadel' s REXX code.
Replies: 17
Views: 9476

Doug Nadel' s REXX code.

Hi,

I used to have may of the Doug Nadel's REXX with me but it seems his website if no working now. And I don't have the backup of those REXXs in my new company, does anyone of you have them with you?
by Sandy
Mon Mar 19, 2018 11:20 am
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: TRACE I does not seem to work.
Replies: 6
Views: 2917

Re: TRACE I does not seem to work.

My REXX is an edit macro and I have used the TRACE I like this: /* REXX EDIT MACRO */ /* EXPAND ALL COPY STATEMENTS IN A COBOL PROGRAM */ TRACE I ADDRESS ISREDIT "MACRO PROCESS" /* ============================================================ */ .. There is more code after that.
by Sandy
Sun Mar 18, 2018 1:54 pm
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: TRACE I does not seem to work.
Replies: 6
Views: 2917

TRACE I does not seem to work.

Hi,

I have written a REXX code which I want to debug. I used TRACE I but for some reason it does not seem to work. I mean when I execute the code it does not go in tracer? What can be the reason?
by Sandy
Tue Mar 13, 2018 2:33 pm
Forum: Interview Questions.
Topic: Change lower casee to upper case.
Replies: 6
Views: 1319

Re: Change lower casee to upper case.

nicc wrote: Mon Mar 12, 2018 3:48 pmUCC on first line UCC on last line and press <enter>
TRANSLATE bif in Rexx and PL/1
Thank you nicc.
by Sandy
Tue Mar 13, 2018 2:33 pm
Forum: Interview Questions.
Topic: Change lower casee to upper case.
Replies: 6
Views: 1319

Re: Change lower casee to upper case.

enrico-sorichetti wrote: Mon Mar 12, 2018 1:49 pm2) RYO program
What is RYO program? You mean 'write your own' program?

Go to advanced search