Search found 274 matches

by MrSpock
Tue Sep 24, 2013 3:01 pm
Forum: JCL INTERVIEW QUESTIONS
Topic: difference between 'version' and 'generation' in gdg
Replies: 3
Views: 2864

This is what the manual has to say about this topic. Does it help you with your answer?
by MrSpock
Mon Aug 12, 2013 9:30 am
Forum: JCL
Topic: How to concatenate 2 files in FTP card
Replies: 2
Views: 2203

I would concatenate them on a DD statement in the JCL and put that, rather than attempting to do it within the FTP itself. However, outside of that, my guess (if your server supports it) would be to put the first file and append the second.
by MrSpock
Wed Jul 17, 2013 5:53 pm
Forum: JCL
Topic: REG: DCB
Replies: 2
Views: 2341

Sounds like your program overrides whatever you specify in the JCL.
by MrSpock
Mon May 27, 2013 9:42 pm
Forum: TSO, CLIST & REXX
Topic: RC(-3) while executing VGET in REXX
Replies: 6
Views: 5106

Re: RC(-3) while executing VGET in REXX

Hi I am submitting a rexx code using a jCL, in the rexx VGET command is giving below return code . ADDRESS ISPEXEC "VGET (C2NDVSYS)" Error in job spool: 23 *-* "VGET (C2NDVSYS)" +++ RC(-3) +++ If i use the same command in Rexx and execute with out JCL , the command is running fine. I find that stat...
by MrSpock
Fri Apr 19, 2013 1:59 am
Forum: TSO, CLIST & REXX
Topic: Unstring a record using REXX
Replies: 4
Views: 5164

Well, theoretically, you could PARSE them all out:

Code: Select all

Parse Var v tok1 ',"' tok2 '",' '"' tok3 '",' tok4 ',' ,        
  tok5 ',"' tok6 '","' tok7 '","' tok8 '","' tok9 '",' tok10 "'" .
but I think it would be easier to just use STRIP to remove them afterward, i.e.

Code: Select all

tok8 = Strip(tok8,B,'"')
by MrSpock
Thu Apr 18, 2013 9:02 pm
Forum: TSO, CLIST & REXX
Topic: Unstring a record using REXX
Replies: 4
Views: 5164

Use a PARSE VAR statement to parse the record into individual tokens. Then you can use the 5th and 8th tokens in your output process.
by MrSpock
Tue Apr 16, 2013 6:06 pm
Forum: TSO, CLIST & REXX
Topic: REXX to insert/delete lines in a sequential file.
Replies: 3
Views: 3603

I think the first pass sounds relatively straight-forward. Read one record at a time. If the record does not contain the value of "THANKS," then write it out again. If it does, write out the data to be inserted, then continue on like before. For the second pass, I'm not sure. Can you somehow mark th...
by MrSpock
Fri Mar 29, 2013 2:28 am
Forum: DFSORT , ICETOOL & Utilities
Topic: SORT assistance for setting up RC
Replies: 8
Views: 7237

It might have been helpful if you had mentioned that you were using Syncsort. Anyway, from the manual: The NULLOFL parameter specifies the action to be taken when any non-SORTOUT OUTFIL data set contains no data records. NULLOFL is ignored in a BetterGener application. RC0 The delivered default inst...
by MrSpock
Thu Mar 28, 2013 5:08 am
Forum: DFSORT , ICETOOL & Utilities
Topic: SORT assistance for setting up RC
Replies: 8
Views: 7237

Doesn't NULLOFL have to be NULLOFL=RC0, RC4 ,or RC16 only?
by MrSpock
Thu Feb 07, 2013 9:39 pm
Forum: JCL
Topic: Creating a dataset
Replies: 41
Views: 28270

Probably. SPACE is not usually necessary when SMS is setup and active, at least in shops I've worked in.
by MrSpock
Wed Jan 23, 2013 1:16 am
Forum: JCL
Topic: want to check a file is empty or not in a JCL
Replies: 15
Views: 13771

In our shop we use SYNCSORT with a NULLOUT parameter, i.e.:

Code: Select all

//STEP EXEC PGM=SORT,PARM='NULLOUT=RC4'  
//SORTIN DD DSN=DSN to check
//SORTOUT DD SYSOUT=*
...
by MrSpock
Tue Jan 22, 2013 2:24 am
Forum: DFSORT , ICETOOL & Utilities
Topic: ICETOOL question
Replies: 8
Views: 5476

Sounds like a normal JOINKEYS (JOIN UNPAIRED) operation to me.
by MrSpock
Fri Jan 11, 2013 6:10 am
Forum: JCL
Topic: How to delete a member with an utility, passing memb as parm
Replies: 4
Views: 3053

Wouldn't a simple, normal TSO PDS member delete work?

Code: Select all

//STEPX EXEC PGM=IKJEFT01,
// PARM='DELETE ''XXXXXX.XXXXXX.XX.XXXXXX(&parameter)'''
//SYSTSPRT DD SYSOUT=*"
//SYSTSIN DD DUMMY
by MrSpock
Mon Jan 07, 2013 7:24 pm
Forum: JCL
Topic: Why this DB2 error? DSNU034I DSNUBCKB - DATASET TYPE INVALID
Replies: 5
Views: 4442

//SYSTEMPL DD * 00330000

Do you have NUMBERS ON?
by MrSpock
Tue Jan 01, 2013 1:39 am
Forum: JOB DISCUSSION
Topic: Information regarding FACETS Technology
Replies: 4
Views: 4266