Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

Oh Yes, I am an old fart,…. Tender Loving Care for the JOB Card …. = Time, Lines and Cards. Again. I am just trying to creatively deal with a two sided coin here. We want tracing dynamically available, but we do not want it available as SPOOL in Production. Also, this allowed me to explore the

Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

The issue is that we have so many JOBs over so many decades doing this. Thanks …….Cameron Note I will be OOO on PTO March 23 throough March 31 2024 inclusive. From: IBM Mainframe Discussion List On Behalf Of Tom Marchant Sent: Tuesday, March 26, 2024 4:30 PM To: IBM-MAIN@LISTSERV.UA.EDU

Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

Hello Paul, That is almost exactly my approach, however I wanted to chase the Control Blocks, just in case someone "accidentally" sets the Parm to YES in Production, when SYSOUT has been assigned to SPOOL. I want to keep them honest. Thanks ...Cameron Note I will be OOO on PTO March 23

Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

Hello Kolusu, I suppose the real answer here is that I was reading through the MVS Control Blocks manuals think h along the way and wondering. I just went down a rabbit hole. Chasing MVS Control Blocks. Thanks …….Cameron Note I will be OOO on PTO March 23 throough March 31 2024 inclusive.

Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

Hello, In case anyone needs this….. it seems to work so far. I did not really need the FQDSN. All I needed to know was whether or not SYSOUT was assign to SPOOL. * * Work area for the MVS Control Block variables. * 01 WS-CONTROL-BLOCK-VARIABLES. 05 WS-CBV-JOB-NUMBER PIC X(08).

How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

work project? Maybe the pain killers working over time? Thanks Cameron Conacher Senior Engineer American Express Canada Inc. GCICS 2225 Sheppard Avenue East, Toronto, ON M2J 5C2 cameron.conac...@aexp.com<mailto:cameron.conac...@aexp.com> Office: 1-437-836-5265 Mobile: 1-416-409-5147

Re: Line comments in DFSORT

Yes indeed. I like to use the asterisk in column one to comment the spirit of what I am attempting to do. I use the short inline right sided comments to offer brief parm descriptions. Thanks …….Cameron From: IBM Mainframe Discussion List On Behalf Of Sri Hari Kolusu Sent: Friday, March 8,

Re: Line comments in DFSORT

Hello, And, using the example provided, we are able to add a comment to the first two lines but not the last line, since it does not have a hyphen? Thanks …….Cameron From: IBM Mainframe Discussion List On Behalf Of Bob Stark Sent: Friday, March 8, 2024 8:38 AM To: IBM-MAIN@LISTSERV.UA.EDU

Re: Can DFSORT assign custom Return Code values?

The situation is that I have three different environments. If we are in development, lets ignore the email If we are in pre-prod, let’s assume someone is perform a User Acceptance test. If we are in production, we should jump in and deal with remediation. When the email is sent, I have embedded

Can DFSORT assign custom Return Code values?

environment. Not something I absolutely need since I could write a tiny program for this. Just curious, and I think my ADHD has just sent me down another rabbit hole  I could do this in Easytrieve. Or COBOL. Or Assembler. Or Rexx. Or ….. Hope this makes sense. Thanks Cameron Conacher Senior

Re: Connect:Direct question

Hello A bit late to the party. I use something like this. Maybe it helps? SYMBOL = \"\ || :datatype= ||- || :xlate= || || :STRIP.BLANKS= || - || :permiss= || || :pipe= || - || :xlate.table= || || \:\ || \"\ Thanks …….Cameron From: IBM Mainframe Discussion List On

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

Thanks very much. I struggled at first, but finally got through. This is perfect.!! On Mon, Jan 29, 2024 at 9:31 AM Binyamin Dissen wrote: > On Mon, 29 Jan 2024 13:36:51 +0000 Cameron Conacher > <03cfc59146bb-dmarc-requ...@listserv.ua.edu> wrote: > > :>Good Morning

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

meddelande- Från: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU>> För Cameron Conacher Skickat: den 29 januari 2024 14:37 Till: IBM-MAIN@LISTSERV.UA.EDU<mailto:IBM-MAIN@LISTSERV.UA.EDU> Ämne: How can I determine the User Name associated with the current Batch

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

write something to call out to CICS (EXCI maybe) to get a name. But I wanted to know if there is anyway to do this by calling some routines from my Batch COBOL program. I am assuming right now, it is not possible since I have come up empty so far. Thanks Cameron Conacher Senior Engineer

Re: SORT Help with JFY and SQZ

I believe that NULLOUT might help you here. (OPTION Statement) Temporarily overrides the NULLOUT installation option, which specifies the action to be taken by DFSORT when there are no records for the SORTOUT data set, as indicated by an OUT count of 0 in message ICE054I RC0 specifies that

Re: Kinda fun

I have very vague recollections of 51 column punch cards supporting bank charge cards in the mid seventies. (ChargeEx I think) As a Waterloo coop student, I remember feeding boxes and boxes of these into a special card reader during overnight batch processing runs. I think these were mostly from

Re: Kinda fun

-P J O'Rourke */ -Original Message- From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU>> On Behalf Of Cameron Conacher Sent: Wednesday, November 8, 2023 10:38 Anyone else recall…. Have the HASP operator read your JOB Deck, Walking over to the printer to

Re: Kinda fun

Anyone else recall…. Have the HASP operator read your JOB Deck, Walking over to the printer to collect your output Waiting for the output, and setting your card deck on the printer The printer running out of paper and the hood rises up Your card deck is spilled all over the floor Thanks

Re: TN3270, EBCDIC and ASCII

Of Paul Gilmartin Sent: Tuesday, October 10, 2023 1:20 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: TN3270, EBCDIC and ASCII On Tue, 10 Oct 2023 17: 06: 51 +, Cameron Conacher wrote: >Yes DBCS is available. >The block of DBCS data starts with a hex ‘0E’ and terminates with a hex ‘0F. > Wh

Re: TN3270, EBCDIC and ASCII

Yes DBCS is available. The block of DBCS data starts with a hex ‘0E’ and terminates with a hex ‘0F. Thanks …….Cameron From: IBM Mainframe Discussion List On Behalf Of Paul Gilmartin Sent: Tuesday, October 10, 2023 1:05 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: TN3270, EBCDIC and ASCII On

Re: JAVA IDE

Personally, I use Intellij. I am happy with it. I found many training videos on Pluralsite. I have not used any other, so I cannot comment on the best or the most friendly. Thanks ...Cameron From: IBM Mainframe Discussion List On Behalf Of Steve Beaver Sent: Wednesday, August 23, 2023

Re: The ultimate (another one!) definition of mainframe

Perhaps he was referring to OS/2? Microsoft and IBM collaborated for a while. Thanks …….Cameron From: IBM Mainframe Discussion List On Behalf Of Bob Bridges Sent: Monday, August 14, 2023 6:39 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: The ultimate (another one!) definition of mainframe I

Re: COBOL question

AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [External] Re: COBOL question A lot of times, U4038 is not enough region... Joe On Mon, Apr 10, 2023 at 6:15 AM Cameron Conacher < 03cfc59146bb-dmarc-requ...@listserv.ua.edu<mailto:03cfc59146bb-dmarc-requ...@listserv.ua.edu>> wrot

Re: COBOL question

check to see if it is null before freeing. Do you set it to NULL after freeing? Charles On Sun, 9 Apr 2023 23:01:05 +, Cameron Conacher wrote: >Thanks Bob, >No I initialize the Pointer to NULL, and then allocate. Successfully. >And then later I check to see it the point

Re: COBOL question

, Apr 8, 2023 at 6:05 PM Cameron Conacher wrote: > >> Hello folks >> I have written an IMS COBOL program. I have included a couple of >> ALLOCATE statements. >> At the end of processing I check my pointers and if they are not NULL >> I try to FREE. This resul

COBOL question

Hello folks I have written an IMS COBOL program. I have included a couple of ALLOCATE statements. At the end of processing I check my pointers and if they are not NULL I try to FREE. This results in a U4038 abend. At least inside Expediter. I have not used ALLOCATE/FREE before. I am thinking

Anyone using z/OS Connect EE with IMS as a Provider?

Connect EE list? Or maybe an IMS list I should ask this in? Thanks Cameron Conacher Senior Engineer American Express Canada Inc. GCICS 2225 Sheppard Avenue East, Toronto, ON M2J 5C2 cameron.conac...@aexp.com<mailto:cameron.conac...@aexp.com> Office: 1-437-836-5265 Mobile: 1-416-409-5147

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

Good morning Peter, SNOBOL?? Geeze that takes me way back. I had a smile and had to call some old colleagues. Thank you! …….Cameron OOO – March 28, 29, 30 and 31. -Original Message- From: IBM Mainframe Discussion List On Behalf Of Farley, Peter Sent: Monday, March 27, 2023 1:56 AM

Re: One more REXX Question

במרץ 2023 ב-17:29 מאת Cameron Conacher < 03cfc59146bb-dmarc-requ...@listserv.ua.edu<mailto:03cfc59146bb-dmarc-requ...@listserv.ua.edu>>: > Hello Lance, > I allocated a dataset and then included my new dataset name with the DD > statement ISPLOG (DISP=MOD), but IEBCOP

Re: One more REXX Question

frame Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU>> On Behalf Of Cameron Conacher Sent: Friday, March 3, 2023 9:29 AM To: IBM-MAIN@LISTSERV.UA.EDU<mailto:IBM-MAIN@LISTSERV.UA.EDU> Subject: Re: One more REXX Question Hello Lance, I allocated a dataset and then included my new dataset n

Re: One more REXX Question

you are.” - - - John Wooden -Original Message- From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU>> On Behalf Of Cameron Conacher Sent: Friday, March 3, 2023 9:04 AM To: IBM-MAIN@LISTSERV.UA.EDU<mailto:IBM-MAIN@LISTSERV.UA.EDU> Subject: Re: One more REXX Ques

Re: One more REXX Question

NT or any similar DDNAME? If not, thd documentation is defective/ >בתאריך יום ו׳, 3 במרץ 2023 ב-5:02 מאת Paul Gilmartin: > >> This is less a REXX question than an ISPF question, and might get >> more focused replies in ISPF-LIST. >> >> On Thu, 2 Mar 2023 23:56:

One more REXX Question

instead of the generated name? Thanks Cameron Conacher Senior Engineer American Express Canada Inc. GCICS 2225 Sheppard Avenue East, Toronto, ON M2J 5C2 cameron.conac...@aexp.com<mailto:cameron.conac...@aexp.com> Office: 1-437-836-5265 Mobile: 1-416-409-5147 https://amex.webex.co

Re: Having a little difficulty with a REXX command LMOPEN

gt; “Worry more about your character than your reputation. Character is what you > are, reputation merely what others think you are.” - - - John Wooden > > -Original Message----- > From: IBM Mainframe Discussion List On Behalf Of > Cameron Conacher > Sent: Sunday, Fe

Re: Having a little difficulty with a REXX command LMOPEN

o I think you are close. OREXXMan Q: What do you call the residence of the ungulate with the largest antlers? A: A moose pad. :-D Would you rather pass data in move mode (*nix piping) or locate mode (Pipes) or via disk (JCL)? Why do you think you rarely see *nix commands with more than a dozen

Re: Having a little difficulty with a REXX command LMOPEN

mands with more than a dozen filters, while Pipelines specifications are commonly over 100s of stages, and 1000s of stages are not uncommon. REXX is the new C. On Sun, Feb 5, 2023 at 11:51 AM Cameron Conacher < 03cfc59146bb-dmarc-requ...@listserv.ua.edu<mailto:03cfc59146bb-dmarc-re

Re: Having a little difficulty with a REXX command LMOPEN

aracter than your reputation. Character is what you are, reputation merely what others think you are." - - - John Wooden -Original Message- From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU>> On Behalf Of Cameron Conacher Sent: Friday, February 3, 2023 7:1

Having a little difficulty with a REXX command LMOPEN

of 8 from an LMOPEN means "The Dataset cannot be opened." 8 Data set could not be opened. Is there somewhere I can see a bit more detail. Why the dataset could not be opened? I see nothing in the JES Log. Any thoughts appreciated. Thanks Cameron Conacher Senior Engineer Americ

Re: REXX Question

List On Behalf Of Cameron Conacher Sent: Tuesday, January 17, 2023 15:41 Thank you. This looks like just what I needed. Appreciate the assistance. --- From: IBM Mainframe Discussion List On Behalf Of Seymour J Metz Sent: Tuesday, January 17, 2023 3:03 PM Did you try CONTROL ERRORS RETURN

Re: REXX Question

ERRORS RETURN? From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU>> on behalf of Cameron Conacher <03cfc59146bb-dmarc-requ...@listserv.ua.edu<mailto:03cfc59146bb-dmarc-requ...@listserv.ua.edu>> Sent: Tuesday, Januar

REXX Question

tions, please see ." Or know that it is just not possible/reasonable to attempt to trap the error. Thanks Cameron Conacher Senior Engineer American Express Canada Inc. GCICS 2225 Sheppard Avenue East, Toronto, ON M2J 5C2 cameron.conac...@aexp.com<mailto:cameron.conac...@aexp.com> O

Re: Is DEBE still alive?

About 100 years ago we had DEBE (Does Everything But Eat) and DNBE (Does Nothing But Eat) A long time ago Thanks …….Cameron -Original Message- From: IBM Mainframe Discussion List On Behalf Of Bill Johnson Sent: Tuesday, September 27, 2022 9:56 AM To: IBM-MAIN@LISTSERV.UA.EDU

Re: ELAX DRAWDOWN??

IBM's Elastic Storage Server (ESS) and Max Drawdown (MDD) ?? Maybe? …….Cameron -Original Message- From: IBM Mainframe Discussion List On Behalf Of Steve Thompson Sent: Wednesday, August 31, 2022 10:04 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [External] ELAX DRAWDOWN?? Any one heard of

Re: SORT question: Extract varying length string adding suffix after string?

If I understand things correctly, you could use Squeeze (SQZ) to eliminate the embedded blanks. Something like SQZ=(SHIFT=LEFT). Maybe you will need another SORT step to squeeze the entire record? Thanks, ...Cameron From: IBM Mainframe Discussion List On Behalf Of Farley, Peter x23353

Re: z/OS ISPF Panel to include System Name

Can I somehow add this to the ISPF startup command? ISPF SYSNAME ON? --> Nope ISPF ‘SYSNAME ON’ --> Nope ISPF SYSNAME ON --> O.K. Thanks, …….Cameron From: IBM Mainframe Discussion List On Behalf Of PINION, RICHARD W. Sent: Thursday, February 24, 2022 3:24 PM To:

Re: Holy Moly ...

That is inspiring. I like what I do. I hope to work as long as I want to. I sometimes wonder what I could possibly be doing, if I was not in IT. I think I would become a waiter. I would sit all day and wait….. Thanks, …….Cameron From: IBM Mainframe Discussion List On Behalf Of David

Re: Having some challenges with a SORT Utility

UNIX - JAN 24-28, 2022 --- -Original Message- Date: Wed, 19 Jan 2022 22:23:51 + From: Cameron Conacher mailto:cameron.conac...@aexp.com>> Subject: Having some challenges with a SORT Utility Hello folks, Hopefully someo

Re: Having some challenges with a SORT Utility

Thank you! ...Cameron From: IBM Mainframe Discussion List On Behalf Of Sri h Kolusu Sent: Wednesday, January 19, 2022 8:20 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [External] Re: Having some challenges with a SORT Utility Cameron, Here is a simple version of DFSORT which will produce

Re: Having some challenges with a SORT Utility

long to a group. " this could mean the dataset infos will populate a maximum of 3 records after it triggers. How does TRACEIT look like ? Hope this helps. Max Il giorno mer 19 gen 2022 alle ore 23:24 Cameron Conacher < 03cfc59146bb-dmarc-requ...@listserv.ua.edu<mailto:0

Having some challenges with a SORT Utility

FNAMES=RACFOUT, INCLUDE=(190,001,CH,EQ,C'3'), OUTREC=(101,076) END Thanks Cameron Conacher Senior Engineer II American Express Canada Inc. GCICS 2225 Sheppard Avenue East, Toronto, ON M2J 5C2 cameron.conac...@aexp.com<mailto:cameron.conac...@aexp.com> Office: 1-437-836-5265

Re: What not to do on a z/OS system...

A very long time ago, (mid seventies I think) I was loading a tape to a tape drive. A button on my jean jacket trapped the edge of my jacket sleeve inside the tape drive when as the glass closed. I stood patiently and waited for the tape processing to complete so the tape could unload. After

Re: article about ransomeware and mainframe

I heard that the old computer rooms only had a dog and a human. The human’s job was to feed the dog, and the dog’s job was to ensure the human did not touch anything. Merry Christmas. …….Cameron Vacation Alert: I will be OOO from December 9th 2021 though to January 4th 2022 inclusive.

Re: AWS is down.

And a very Merry Christmas to all. Thanks, …….Cameron Vacation Alert: I will be OOO from December 9th 2021 though to January 4th 2022 inclusive. From: IBM Mainframe Discussion List On Behalf Of Joe Monk Sent: Wednesday, December 8, 2021 10:31 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject:

Re: AWS is down.

Perhaps it is a mainframe opportunity? Thanks, …….Cameron Vacation Alert: I will be OOO from December 9th 2021 though to January 4th 2022 inclusive. -Original Message- From: IBM Mainframe Discussion List On Behalf Of Charles Mills Sent: Tuesday, December 7, 2021 11:52 PM To:

Re: Moron of the day -- me!

Thank you! Thank you!! …….Cameron -Original Message- From: IBM Mainframe Discussion List On Behalf Of Phil Smith III Sent: Wednesday, November 10, 2021 12:47 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [External] Moron of the day -- me! Yesterday I needed to run a quick test of a

Re: ADRDSSU and encrypted files

Hello there, We decided to encourage our security folks to install the encryption master keys in the new environment and proceed from there. Thanks to everyone who responded. …….Cameron -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ron Hawkins Sent: Friday,

Re: ADRDSSU and encrypted files

3, 2021 at 6:25 PM Cameron Conacher <03cfc59146bb-dmarc-requ...@listserv.ua.edu> wrote: > > The issue is we have a new environment. > We need to move our data to the new environment. > The new environment has no Master Encryption Keys. Yet. > I can read the original file

Re: ADRDSSU and encrypted files

ot be read. My question is, "is there anyway to tell ADRDSSU DUMP or RESTORE" to decrypt the file before duping or before restoring? Thanks Cameron Conacher Senior Engineer II American Express Canada Inc. GCICS 2225 Sheppard Avenue East, Toronto, ON M2J 5C2 cameron.conac...@aexp.co

ADRDSSU and encrypted files

no keys the file cannot be read. My question is, "is there anyway to tell ADRDSSU DUMP or RESTORE" to decrypt the file before duping or before restoring? Thanks Cameron Conacher Senior Engineer II American Express Canada Inc. GCICS 2225 Sheppard Avenue East, Toronto, ON M2J 5C2 cam

Re: System Programmer Titles

I tried o get "King" once, but that did not get very far. Thanks, …….Cameron -Original Message- From: IBM Mainframe Discussion List On Behalf Of Brian Westerman Sent: Tuesday, October 12, 2021 1:03 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [External] Re: System Programmer Titles I

Re: PL/I vs. JCL

Honestly, I do not know, but I read it as A F T cargo hatch. As in the south end of a north bound developer. Thanks, …….Cameron -Original Message- From: IBM Mainframe Discussion List On Behalf Of Bob Bridges Sent: Monday, October 4, 2021 9:36 AM To: IBM-MAIN@LISTSERV.UA.EDU

Re: DCOLLECT & DFSORT

Four bytes binary to display numeric? Starting-column,4,bi,EDIT=(TTTS) Maybe be what you are looking for? Packed date to display numeric? Starting-column,4,PD,EDIT=(TTT) Maybe what you are looking for? If you want leading zeros use “T” If you want leading zeroes as blanks use “I”. Sent

Re: Global Mirror Distances

gt; Note: it is not 9000 miles of fiber optic in a suitcase - such devices are > actually used for much shorter distances (10-20km) and rather for synchronous > copy. > > > -- > Radoslaw Skorupka > (looking for new job) > Lodz, Poland > > > > > > &g

Re: Global Mirror Distances

ointed out that that was probably where the Australian underwater > cable came ashore and the location registered, because the date time > of the change was when she changed her password. > > https://www.submarinecablemap.com/ > >> On Fri, May 21, 2021 at 2:34 PM Cameron Conacher

Global Mirror Distances

Hello folks, I am trying to find out what we could consider to be a "safe" maximum distance for mirroring DASD from one site to another. We have a situation where site #1 will be thousands (9,000) of miles away from site #2 (across the ocean. I realize there would be a great deal of latency

Re: IBM PCOMM - copy/paste doesnt work

We had some upgrade applied a year or so ago. Afterwards I could not copy and paste. I did the following: Edit -> Preferences -> Keyboard Browse Choose 1.kemp Open Restart session Your mileage may vary, but that did the trick for me. Sent from my iPhone > On Mar 30, 2021, at 8:02 AM,

Re: Can I use a REXX PLIST when calling a COBOL program?

el (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf > of Cameron Conacher [conac...@gmail.com] > Sent: Monday, March 22, 2021 2:53 PM > To: IBM-MAIN@LISTSERV.UA.EDU &g

Re: Can I use a REXX PLIST when calling a COBOL program?

and assistance here. On Mon, Mar 22, 2021 at 3:25 PM Paul Gilmartin < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Mon, 22 Mar 2021 14:53:02 -0400, Cameron Conacher wrote: > > > >when you say that my COBOL program must be coded Rexx-aware, do you mean I > >

Re: Can I use a REXX PLIST when calling a COBOL program?

Paul, when you say that my COBOL program must be coded Rexx-aware, do you mean I need to work with IRXEXCOM to tease the parameters out from REXX? I appreciate everyone's input. I don't know if the "appropriate" path forward is to use ADDRESS LINK or ADDRESS LINKMVS or if I should continue to try

Re: Can I use a REXX PLIST when calling a COBOL program?

.9IEBOUT || , /* SYSPRINT */ > Nulls || , /* 7*/ > IDD|| , /* SYSUT1 */ > JobOut /* SYSUT2 */ > /* ... */ > address 'ATTCHMVS' 'IEBGENER PARM1 PARM2' > IEBRC = RC > > > &g

Re: Can I use a REXX PLIST when calling a COBOL program?

I am not sure I understand now. I created a simple COBOL Program and added a number of 01 level items to the Linkage section and then I added PROCEDURE DIVISION USING... a list of the data items I expected to see passed from my little REXX EXEC. LINKAGE SECTION. 01 parameter-1 PIC X(08) 01

Re: Can I use a REXX PLIST when calling a COBOL program?

a > program that expects an existing LE environment or that requires any input > beyond R14-R1. > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.ED

Re: Can I use a REXX PLIST when calling a COBOL program?

Thank you, > > Brian Chapman > > >> On Mon, Mar 22, 2021 at 9:13 AM Cameron Conacher wrote: >> >> Hello everyone, >> I have been busy playing with an old support pac from IBM that enables REXX >> to call an Assembler routine that in turn invokes EXCI. &

Can I use a REXX PLIST when calling a COBOL program?

Hello everyone, I have been busy playing with an old support pac from IBM that enables REXX to call an Assembler routine that in turn invokes EXCI. Not terribly important, but I thought the PLIST interface between REXX and Assembler was pretty slick. I had not seen it before. (and the support pac

Re: VSAM file discrepancies

A KSDS with duplicate full primary key values? Are you sure? Sent from my iPhone > On Jan 19, 2021, at 10:19 AM, Steff Gladstone > wrote: > > Greetings, > > We are trying to figure out how a VSAM file became compromised. That is, > even though the primary key is unique, when we do a REPRO,

A couple of CICS questions for today. (1-BMS; 2-SYNCPOINT rule-of-thumb)

Good morning folks, I have a couple of CICS related questions for today. I have been using CICS since the mid seventies. I should remember this, but I just can't recall. I am creating a BMS Map. I have a number of detail data lines that repeat a number of times. In the past I have created little

Re: FTP converting between UTF-8 and EBCDIC

ng along the lines of iconv -f IBM-1047 -t ISO8859 FIX1 > $5 > > This is done after a sed command to do some string conversion.. > >> On Tue, Nov 17, 2020 at 11:06 AM Cameron Conacher >> wrote: >> >> You could send it in binary and then use iconv to transform t

Re: FTP converting between UTF-8 and EBCDIC

You could send it in binary and then use iconv to transform to EBCDIC. Sent from my iPhone > On Nov 16, 2020, at 4:27 PM, Frank Swarbrick > wrote: > > Originally (current production mode) there is no SBDATACONN/MBDATACONN > specified, so z/OS is not treating the file as UTF-8. It works

Re: Another DFSORT Question

Hello Sri, Argh!! Yes too many assumptions... 1) True. Not thinking of DSN on a separate line. 2) True. Step names can be single characters. 3) A temporary Dataset still has a Dataset Name, or a Dataset Name reference, right? 4) I did not know DMBATCH could have SYSIN2. 5) True. This was my

Another DFSORT Question

Hello , I have put together this set of SORT control statements to scan through an IEBPTPCH dump of a JCL or PROC PDS. The DFSORT statements will look for any JOB Steps that execute program DMBATCH (this is an NDM Program). The statements will gather up some DD Statement information related to the

Re: DFSORT Question

Thank you both. Sent from my iPhone > On Oct 26, 2020, at 3:55 PM, Sri h Kolusu wrote: > > Martin, > > Like minds think alike :) > > Thanks, > Kolusu > > > -- > For IBM-MAIN subscribe / signoff / archive access

Re: DFSORT Question

Sri Could you refer me to some documentation to help me better understand the differences between BUILD and OVERLAY? Sent from my iPhone > On Oct 26, 2020, at 1:10 PM, Sri h Kolusu wrote: > > Cameron, > > OUTFIL is last on the list of processing. i.e > > INCLUDE > INREC > SORT > OUTREC >

Re: DFSORT Question

Thank you Sri. This is helpful. On Mon, Oct 26, 2020 at 1:10 PM Sri h Kolusu wrote: > Cameron, > > OUTFIL is last on the list of processing. i.e > > INCLUDE > INREC > SORT > OUTREC > OUTFIL > > > So your traceit will be printed after OUTREC. Ideally I would use an > OVERLAY instead of BUILD,

Re: DFSORT Question

Hello Kolusu, Yes that is correct. Below I have included my SORT statements that work for me. The issue I had was that originally, I also had an OUTREC BUILD IFTHEN. When that was present, I had an error with the record length of the TRACEIT file. I am copying the intermediate file (after INREC

DFSORT Question

Hello folks, I put together a small process that runs an IEBPTPCH to generate a stream from one of our JCL Libraries. Then I ran a small DFSORT to pull out the combinations of JCL Member Name and the PROC Names that are executed from the JOB. Everything is fine. I do not understand the high level

Re: EBCDIC and other systems

Sorry, just saw this. 3270 emulators. I use IBM PCOMM today, but I have used EXTRA and I have used Host on Demand. On Thu, Aug 20, 2020 at 8:40 PM Paul Gilmartin < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Thu, 20 Aug 2020 17:45:09 -0400, Cameron Conacher wrote: &g

Re: EBCDIC and other systems

I have used Japanese (930) and traditional Chinese (937) with the appropriate EBCDIC Host Code Page. So yes DBCS is supported on a green screen Sent from my iPhone > On Aug 20, 2020, at 1:43 PM, Paul Gilmartin > <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > On Thu, 20 Aug 2020

Re: EBCDIC and other systems

There are many EBCDIC codepages. DBCS is used by japan, China, Korea and Vietnam. Our Japanese customers use EBCDIC codepage 930. Our Taiwanese customers use EBCDIC codepage 937. Sent from my iPhone > On Aug 20, 2020, at 8:54 AM, Rupert Reynolds wrote: > > I'm writing a new OS for PC

JSON PARSE statement format ???

Hello again everyone, I have been trying to use the new JSON PARSE statement and I am having a little difficulty in understanding what is really needed. I have a JSON document that looks something along the lines of: {"httpHeaders":{"traceID":"my trace id data","spanID":"my spanid data"}} I pass

Re: UTF16 to EBCDIC

: > Would UTF-16 to UTF-8 be a better conversion? You still have to be > certain of the source character set. And is supported by some z/OS > software. > > On Sun, Feb 9, 2020 at 11:55 AM Cameron Conacher > wrote: > > > > Ah yes, > > I mis-typed/fat fingered the r

Re: UTF16 to EBCDIC

Sat, 8 Feb 2020 09:37:29 -0500, Cameron Conacher wrote: > > > >>I use ICONV. > >> > >>//MYSTEP EXEC PROC=EDICONV, > >>//INFILE='MY.input.file.name(member)', > >>//OUTFILE='My.Output.FileName', > >>//FROMC='1208', > >>/

Re: UTF16 to EBCDIC

I use ICONV. //MYSTEP EXEC PROC=EDICONV, //INFILE='MY.input.file.name(member)', //OUTFILE='My.Output.FileName', //FROMC='1208', //TOC='IBM-037' The PROC is licensed IBM material. It executes program EDICCONV On Thu, Feb 6, 2020 at 9:29 PM Jake Anderson wrote: > Hi > > Cross

Re: Creating VSAM data sets with DSNTYPE=EXTREQ

g. Encrypt like everyone is.’ > > -Original Message- > From: IBM Mainframe Discussion List On Behalf > Of Cameron Conacher > Sent: 16 January 2020 16:00 > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: [IBM-MAIN] Creating VSAM data sets with DSNTYPE=EXTREQ > > For ID

Re: Creating VSAM data sets with DSNTYPE=EXTREQ

For IDCAMS DEFINE I added DATACLAS(extended dataclas name) For JCL and PROCs I added DATACLAS(...) as well If DATACLAS was already specified I just changed the name to an extended format name Don’t get me wrong. You can change the members but you still need to test and promote. We have seen

3270 PCOMM Emulator support for Japanese

Hello folks, Quick question. Anyone doing support work for Japanese language? Using PCOMM Emulator sessions? I have been working at this for twenty+ years. We used to run EXTRA, and our own home grown emulator sessions. Now we are running PCOMM. All I want to be able to do, is have my PCOMM

Re: Question - UUID Approach for Mainframes in Japan

using, > the emulator I use doesn't even has IBM-930 so I can't even test it here > but comes to show that support for that code page may be lacking overall. > > Regards, > Leo > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On >

Re: Question - UUID Approach for Mainframes in Japan

> -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Cameron Conacher > Sent: Monday, November 25, 2019 3:43 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Question - UUID Approach for Mainframes in Japan > >

Re: Question - UUID Approach for Mainframes in Japan

128-bit binary value *is* the UUI, > the character string is just a representation thereof, and upper-case hex > values are acceptable. > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of

Re: Question - UUID Approach for Mainframes in Japan

o go. > > -- https://tools.ietf.org/html/rfc4122#section-3 > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Cameron Conacher > Sent: Monday, November 25, 2019 3:43 PM > To: IBM-MAI

Question - UUID Approach for Mainframes in Japan

Hello folks, I am here with another question today. We are a large international company with a market presence in Japan. We store our mainframe EBCDIC data for these markets in EBCDIC CodePage 930. This CodePage has no support for lower case English letters. If I were a distributed platform and

  1   2   >