Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. mainframeboy

    Stem's 0th variable

    Is it true that the Stem's 0th variable doesnt get set automatically. Yes. Is there any specific function to set the variable? No.
  2. mainframeboy

    Submitting a Rexx through JCL

    See this previous topic: http://www.tek-tips.com/viewthread.cfm?qid=1230227 you have the same issue.
  3. mainframeboy

    Writing in a member

    Can I use Edit macros for this. Sure, I don't see why not. At least you'll get the ISPF statistics on the member. Or, you can just write them from a program. Or use TSO EDIT. Any way will work.
  4. mainframeboy

    Define VSAM file using REXX.

    The format of which you could've easily determined by entering the TSO HELP DEFINE command on the command line of your TSO session.
  5. mainframeboy

    Define VSAM file using REXX.

    The DEFINE CLUSTER command: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2I240/14.0?SHELF=DGT2BK50&DT=20050629061743 /* REXX */ "DEFINE CLUSTER - (NAME(EXAMPLE.KSDS2)) - DATA - (RECORDS(500 100) -...
  6. mainframeboy

    Several REXX Batch Questions

    1) I thought that when I ran REXX in batch I would use normal JCL commands to allocate the files and just use the DDNAME specified in the JCL in my rexx program. That is exactly the correct method to use in batch. You'll have to provide more details for us to know why it doesn't work the way...
  7. mainframeboy

    How to unzip a concatenated zipped file using PKUNZIP utility in MVS?

    I'd like to see your PKZIP control statements. IIRC, you should be able to select each file by name, and then associate each one to an output dataset. I'd also be nice to know which version of PKZIP you're running.
  8. mainframeboy

    COBOL calling REXX - Online

    The answer is YES to both questions. I have read in the manuals where you can use TCP/IP socket calls within a COBOL program, so it should be feasible. On the second part, you literally just call IRXJCL as you would any other sub-routine, i.e. CALL 'IRXJCL' USING REXX-PARM.
  9. mainframeboy

    Trapping keys on a REXX panel

    SowKan, I don't mean to sound condescending, but have you even bothered to go through the ISPF Dialog development models, particually the PANFORM models? They are a valuable source of information, that you can easily CUT and PASTE into your ISPF libraries, especially when you need to construct a...
  10. mainframeboy

    SORT to omit DUPLICATES

    According to those error messages, you are running Fujitsu SORT. According to a manual I found via Google, it appears that you code: SUM-RECORDS FIELDS=*NONE "Out of all the records with identical SORT keys, one record is moved to the output and the rest are eliminated. No summation is...
  11. mainframeboy

    SORT to omit DUPLICATES

    My reasponse was based on the proper parameters for use with the DFSORT product. What SORT product are you using? I've never heard of some of those parameters (SORT KEYS? INPUT IN? OUTPUT OUT? FIN?)
  12. mainframeboy

    SORT to omit DUPLICATES

    SUM FIELDS=NONE
  13. mainframeboy

    how to create a PDS using in rexx.

    Tony is on the right track using the ISPF service LMMLIST to obtain a member list. I'm not quite sure the syntax shown is exactly right - check the syntax with the ISPF models and I'm sure it will work: ... LMINIT ... ... LMOPEN ... "ISPEXEC LMMLIST DATAID(&mypds) OPTION(SAVE) GROUP(ML)...
  14. mainframeboy

    ftp naming conventions

    Use the SET statement to set a variable to the date required, then rename the file: //JOB (ABC)...,CLASS=T,MSGCLASS=T //* // SET THEDATE=022704 //* //DELETE EXEC PGM=IEFBR14 //FILE1 DD DSN=MYHLQ.NODE2.NODE3.D&THEDATE, // DISP=(MOD,DELETE,DELETE) //* //RENAME EXEC PGM=IEBGENER...

Part and Inventory Search

Back
Top