Search results for query: *

Hi kevinpink, can you please post the link to the PARSEXML exec on IBM's website, because I can't find it... Thanks It's File #647 of the CBT Tape: File # 647 An XML parser written in REXX from Andrew Armstrong http://www.cbttape.org/cbtdowns.htm The site will provide you with the...

Pnut123, I thought I'd pass along a few bits of advice. You really shouldn't try to make things harder than they need to be. Two things you could've done: 1. Use the IPOUPDTE program instead for it's intended purpose (i.e. mass JCL updates)...

There is a PARSEXML exec on IBM's website that you can download and use as-is, if it meets your needs. I understand that it uses the same basic logic as the COBOL XML parsing function. Personally, I use my own scaled-down version. Really, all you need to do is parse the xml string, looking for...

Guys, don't forget that DISP=MOD is NOT a supported dispostion for a PDS. If you really want to append information to an existing member, edit it and do an INSERT.

I think ISREDIT code should work anywhere right??? Uh, no. ISREDIT is the command to invoke an ISPF Edit Macro function. ISPF Edit Macros can ONLY run from within an Edit or View session. You can't run ISREDIT outside of the ISPF Edit/View environment.

I see what you mean, the left-most column is not shown and the DISPLAY CC / DISPLAY NOCC option for browse doesn't seem to matter. I'll have to see what, if anything, can be done to fix this.

Agreed. If you want to edit the data, you'll need a properly defined ISPF Edit Macro. Just remember that ISPF Edit is an ISPF Service, and requires ISPF to work. So, your batch job must provide all of the necessary address spaces and dataset allocations for your code to work: TSO/E, which is...

First, you should NOT use SORTWK** statements unless you've been specifically directed by IBM or your technical support team to do so. Using them could restrict your ability to properly process your sort using the best resource options. Second, you NEVER specify DCB parameters on a SORT output...

I don't know for sure. On my system (z/OS V1R9) the backslash is a hex 'E0' and it shows up just fine in a SAY statement. Maybe it's your 3270-emulator?

Actually, that's z/OS TSO/E REXX Code. Interesting that it doesn't work in another IBM O/S.

/* REXX */ Parse Value '06/15/2009' With mm '/' dd '/' ccyy . datem = Date('M',ccyy||mm||dd,'S') Say datem

Where exactly would REXX play a role in this?

What always concerns me is where does it end? First it was the lower-paying labor-intensive industries. Then, accounting, bookeeping, customer service and call centers, now IT. They're already talking about how healthcare is being outsourced. I'll bet that some municipalities will start looking...

This sounds like the type of task you'd perform through your console automation (i.e. Netview or other products), but the O/P is being rather vague for anyone to offer much more input on this.

Two thoughts: 1. This process sounds better suited to a SORT routine. 2. When you say "edit macro", I have to presume that you mean an ISPF Edit Macro (i.e. uses the ISREDIT services). In order to use ISPF services in batch, you have to add ISPF to batch. You have to start ISPF with the...

Wow. Anyway, here are a few options: "EXECIO * DISKR INPFILE (STEM INPREC. FINIS" DO I=1 TO INPREC.0 IF SUBSTR(INPREC.I,1,3)=111 THEN ITERATE ELSE QUEUE INPREC.I END "EXECIO "QUEUED()" DISKW OUTFILE (FINIS" "EXECIO * DISKR INPFILE (STEM INPREC. FINIS" O=0 DO I=1 TO INPREC.0 IF...

I like the first approach. This would be a possible alternative: string = 'àDD!cli_ver!àTT!cli_org' Parse Var string 'à' arg1 '!' arg2 '!à' arg3 '!' arg4 cli_org . Say arg1 Say arg2 Say arg3 Say arg4

Also, I find that the ISPF Edit Models for all of the ISPF objects and services are invaluable as templates for your own custom applications. Take advantage of them whenever possible.

Here's my thoughts. I don't think it's ever a good idea to try to learn too many things at once. I think you need to learn how to program and write procedural code and how to think logically. It doesn't really matter to me what language you choose to learn all of that in. Once you've mastered...

According to the ISPF Edit Model I looked at for the EDIT Service, the RC=4 indicates that the dataset has not been saved. Looking back at the macro code, I don't see any ISREDIT END or ISREDIT SAVE command occuring before the exit.