Sv: Execute Rexx from Cobol

2024-05-07 Thread Lars Höglund
meddelande- Från: IBM Mainframe Discussion List För Glenn Knickerbocker Skickat: den 7 maj 2024 17:36 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: Execute Rexx from Cobol On Tue, 7 May 2024 11:33:21 +, Lars Höglund wrote: > An error has occurred in Rexx module: XMAIL > Erro

Sv: Execute Rexx from Cobol

2024-05-07 Thread Lars Höglund
I'll try that, but the problem for me is that my rexx is executing but stops (with error) when that rexx is trying to execute another rexx -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Sri Hari Kolusu Skickat: den 7 maj 2024 14:49 Till: IBM-MAIN@LISTSERV.UA.EDU

Execute Rexx from Cobol

2024-05-07 Thread Lars Höglund
Hi Trying to execute a Rexx from my Cobol program by using IRXEXEC and IKJTSOEV The Rexx starts and executes ok until that Rexx is calling another Rexx (in the same library, allocated to SYSEXEC) that shall return a value, but I'm getting An error has occurred in Rexx module: XMAIL Error

Sv: ./ ADD - which utility?

2024-04-13 Thread Lars Höglund
Something like this //K39828ÖD JOB (T820),'CREATE MBR', // CLASS=A,MSGCLASS=T, // NOTIFY= //*

Sv: PASSPORT 3270 emulator (PC) problem w transferring files

2024-04-10 Thread Lars Höglund
Välkommen tillbaka, Thomas -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Skickat: den 10 april 2024 10:07 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: PASSPORT 3270 emulator (PC) problem w transferring files [Du får inte e-post ofta från

Sv: Program to split a jobs output

2024-04-09 Thread Lars Höglund
? And then XDC -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För ??? ?? ??? Skickat: den 9 april 2024 10:43 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Program to split a jobs output [Du f?r inte e-post ofta fr?n gad...@malam-payroll.com. L?s om varf?r det h?r ?r viktigt p?

Sv: Rexx numeric digits and scientific notation question

2024-03-12 Thread Lars Höglund
Hmmm 7 *-* NUMERIC DIGITS 11 >>> "11" 8 *-* say digits() >>> "11" 11 9 *-* say 8947 * 864 >>> "7730208" 7730208

Sv: How can I determine the User Name associated with the current Batch JOB RACF ID?

2024-01-29 Thread Lars Höglund
Thanks > > …….Cameron > > From: IBM Mainframe Discussion List On > Behalf Of Lars Höglund > Sent: Monday, January 29, 2024 11:10 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Sv: How can I determine the User Name associated with the current > Batch JOB RACF ID? > >

Sv: How can I determine the User Name associated with the current Batch JOB RACF ID?

2024-01-29 Thread Lars Höglund
Something like this Code Extract: LINKAGE SECTION. 01 CB1. 05 PTR1 POINTER OCCURS 512. 01 CVT. 05 CVT1 POINTER OCCURS 512. 01 CB2. 05 PTR2 POINTER OCCURS 256.

Sv: Custom ISPF command

2024-01-23 Thread Lars Höglund
* * September 19, 1990 * * * * - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -* * partly rewritten 201

Sv: Custom ISPF command

2024-01-16 Thread Lars Höglund
3.9 Menu Utilities Help ss Display APCMDS Row 5 to 38 of 47 Command ===>

Sv: Rexx TRANSLATE command

2023-11-09 Thread Lars Höglund
sion List on behalf of Lars Höglund Sent: Thursday, November 9, 2023 3:31 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Rexx TRANSLATE command Hi Looking at Doug Nadel VCURSOR and having a problem understanding the TRANSLATE he Is doing trtable='abcdefghijklmnopqrstuvwxyz' /* Setup valid dsname chars

Rexx TRANSLATE command

2023-11-09 Thread Lars Höglund
Hi Looking at Doug Nadel VCURSOR and having a problem understanding the TRANSLATE he Is doing trtable='abcdefghijklmnopqrstuvwxyz' /* Setup valid dsname chars */ trtable=trtable!!translate(trtable)!!'ÅÄÖ0123456789.''-ä()' trtable=translate(xrange('00'x,'FF'x),,trtable,' ')

Sv: REXX parse parens

2023-05-02 Thread Lars Höglund
Seems to work if you skip the "blank" together with () -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Seymour J Metz Skickat: den 2 maj 2023 15:36 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: REXX parse parens It won't work for nested parentheses. -- Shmuel (Seymour

Sv: REXX parse parens

2023-05-02 Thread Lars Höglund
Why do You have "blank" before and after "()"? -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Jack Zukt Skickat: den 2 maj 2023 09:02 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: REXX parse parens Hi This should work Parse arg opt Parse value opt with "(" opt") " If

Sv: Q: Where is LISTDSI kept?

2023-02-20 Thread Lars Höglund
OR? -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Lars Höglund Skickat: den 20 februari 2023 17:16 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Sv: Q: Where is LISTDSI kept? You have to start ISPF //BATCHPDF EXEC PGM=IKJEFT01,DYNAMNBR=128, // PARM='ISPSTART

Sv: Q: Where is LISTDSI kept?

2023-02-20 Thread Lars Höglund
You have to start ISPF //BATCHPDF EXEC PGM=IKJEFT01,DYNAMNBR=128, // PARM='ISPSTART CMD( )' //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Steve Thompson Skickat: den 20 februari 2023 17:09 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Q: Where is

Sv: CLIST for APF and link list datasets

2023-02-14 Thread Lars Höglund
And with parm like LINK / APF / LPA (or without parm) -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För rpinion865 Skickat: den 14 februari 2023 20:56 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: CLIST for APF and link list datasets DDLIST from any ISPF command line.

Sv: determine job that created dataset?

2023-02-14 Thread Lars Höglund
No access to that... -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Gadi Ben-Avi Skickat: den 14 februari 2023 12:03 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: determine job that created dataset? As far as I remember, It's SMF type 14 or 15, and maybe 60 for the catalog

Sv: ISPF macro/script

2023-02-06 Thread Lars Höglund
Written: 2014-03 By : Lars Höglund Konsult AB (www.lhkab.com<http://www.lhkab.com>) Function : Edit, with a macro, all members in a PDS allocated to ddname=PDS Related object - panel: - - msg : -

Sv: ISPF macro/script

2023-02-06 Thread Lars Höglund
Look at Marc Zelden's EDMACALL //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Hobart Spitz Skickat: den 7 februari 2023 03:19 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: ISPF macro/script You have these options: 1 - Select the member manually, and invoke your

Sv: MVS Update

2022-10-04 Thread Lars Höglund
Shouldn't You use Receive? -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För esst...@juno.com Skickat: den 4 oktober 2022 17:05 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: MVS Update . . I was able to obtain CBT830.zip I extracted it, and it creates a xmi file. However

Sv: MVS Software inventory

2022-05-19 Thread Lars Höglund
Think You must use a product for that i.e IBM TADz (former SoftAudit) -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För CarlosM Skickat: den 19 maj 2022 18:31 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: MVS Software inventory Can anyone point me at a JCL example that would

Sv: Why SLIP PVTMOD/PVT EP does not work for Private load modules in CICS

2022-02-21 Thread Lars Höglund
Debugging? -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Mike Schwab Skickat: den 21 februari 2022 18:39 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: Why SLIP PVTMOD/PVT EP does not work for Private load modules in CICS CEMT is the CICS debugging command. On Mon, Feb

Sv: Using the JOBNAME system symbol in a batch job

2021-12-29 Thread Lars Höglund
Could this be the solution? The three types of symbols that can be used for JES2 in-stream substitution are JCL Symbols, JES Symbols and System Symbols: On a JES2 JOBCLASS definition, the field SYSSYM needs to be ALLOW rather than DISALLOW //Lasse -Ursprungligt meddelande- Från: IBM

Sv: COBOL compiler option to list libraries from which COPY members were loaded?

2021-09-13 Thread Lars Höglund
Thanks, tried it and, yes //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Tom Ross Skickat: den 14 september 2021 02:13 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Sv: COBOL compiler option to list libraries from which COPY members were loaded? >And You can't

Sv: COBOL compiler option to list libraries from which COPY members were loaded?

2021-09-10 Thread Lars Höglund
And You can't use coprocess if You are using EXCI. //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Farley, Peter x23353 Skickat: den 9 september 2021 21:08 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: COBOL compiler option to list libraries from which COPY members

SV: Request for help with removing sequence numbers from PDS members

2021-01-11 Thread Lars Höglund
List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Lars Höglund [lars.hogl...@alecta.se] Sent: Monday, January 11, 2021 11:17 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: SV: Request for help with removing sequence numbers from PDS members Example of ISPF-proc

SV: Request for help with removing sequence numbers from PDS members

2021-01-11 Thread Lars Höglund
Example of ISPF-proc //* PROC ISPFBAT //ISPFBAT PROC //* //*-- //*

SV: JCL divergence

2020-12-28 Thread Lars Höglund
Anyone heard of Opswise - Universal Automation Center from Stonebranch http://filer.datab.se/opswise-ac-datasheet.pdf //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För R.S. Skickat: den 28 december 2020 14:35 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: JCL

SV: COBOL LIB

2020-12-17 Thread Lars Höglund
Isn't EASY it's own language? It definitely doesn't produce Cobol code. -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För CarlosM Martinez Skickat: den 17 december 2020 23:27 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: COBOL LIB Well I am a newbie in Z/OS my expertise is

SV: INTRDR and submitted JobID

2020-10-14 Thread Lars Höglund
Hi Do You the reason why the default for SYSSYM is DISALLOW? //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Lizette Koehler Skickat: den 14 oktober 2020 20:38 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: INTRDR and submitted JobID I think System Symbols are only

SV: Rexx parse using period as placeholder

2020-02-27 Thread Lars Höglund
?? 4 *-* myVar = 'word1 word2 9.12 word3.ext' >>> "word1 word2 9.12 word3.ext" 5 *-* Parse Value myVar with . . . myVal2 '.' . >>> "word1 word2 9.12 word3.ext" >.> "word1" >.> "word2"

SV: Looking for some large COBOL program examples

2019-12-12 Thread Lars Höglund
Got one, 161.000 lines Will compile with 5655-EC6 IBM Enterprise COBOL for z/OS 6.2.0 P190522 //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Charles Mills Skickat: den 12 december 2019 18:17 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: Looking for some large

SV: [External] dfsort SUM processing

2019-10-24 Thread Lars Höglund
@LISTSERV.UA.EDU Ämne: Re: [External] dfsort SUM processing No, and even if so, all are numbers and can be sub summerized with a valid sign of F. בתאריך יום ה׳, 24 באוק׳ 2019, 16:35, מאת Lars Höglund ‏< lars.hogl...@alecta.se>: > Isn't this 16 numbers and You are doing sum on 15 &g

SV: [External] dfsort SUM processing

2019-10-24 Thread Lars Höglund
Isn't this 16 numbers and You are doing sum on 15 //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För ITschak Mugzach Skickat: den 24 oktober 2019 15:19 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: Re: [External] dfsort SUM processing Rex, x'F5' is a valid sign for

SV: REXX LISTDSI error

2019-10-03 Thread Lars Höglund
Why are You using single quotation? Why are You using quotation at all (except for the actual TSO-command) ? //Lasse -Ursprungligt meddelande- Från: IBM Mainframe Discussion List För Bill Giannelli Skickat: den 2 oktober 2019 11:32 Till: IBM-MAIN@LISTSERV.UA.EDU Ämne: REXX LISTDSI