Re: Issue WTO message using MVS SEND command

Hello Steve, In below example, how do we make sure which console, this output should go. Don't we need to put console name in this rexx and will i be getting these message in white color or red color. to operator console. /* REXX */ 'PIPE SAFE * | STEM MSG.' TODataset = Word( Msg.3,3 ) WTO.CON

Re: Issue WTO message using MVS SEND command

/* REXX */ 'PIPE SAFE * | STEM MSG.' TODataset = Word( Msg.3,3 ) WTO.CONSNAME = '' WTO.DESC = '00100010'/* RED */ WTO.DESC = '01000100'/* WHITE */ WTO.MCSFLAG = '' WTO.TEXT = 'OPSMSG01 FIB DATASET NAME IS' TODataset WTO. EXIT On Fri, Jun 22, 2018 at 1

Re: Example of TSO Test call subcommand

I'll play Lizette here. There's a TSO-REXX discussion list that you should consider as well: For TSO-REXX subscribe / signoff / archive access instructions, send email to lists...@vm.marist.edu with the message: INFO TSO-REXX In any case, I think we need more details on your problem. First o

Re: Eternal WAIT on un-waited ECB

Duh... the cancel almost certainly did the un-wait. It's easy to forget that the train wreckage isn't exactly where the track broke. That brings me back to trying to figure out why VSAM never POSTed me (besides the fact it hates me). But clearing the ECB is a good start, and maybe a STIMERM to s

Re: Two new RFE's to consider supporting

I've been utilizing this new "point and shoot" feature in SDSF for about a week now. I like it, but its not perfect, for reasons others have mentioned. In this particular case it seems to me what would be ideal is if the feature did not require the cursor to be placed within the JOBNAME column.

Re: Eternal WAIT on un-waited ECB

The x'30' means that the PRB was waiting on that ECB, but then there was a Post-without-ECB that unwaited the ECB. RTM would do that in order to ABTERM the TCB (possibly for the CANCEL with DUMP 122 abend). If the TCB is not running now, it should not be because it is waiting on that E

Re: Eternal WAIT on un-waited ECB

Examples are actually in Authorized Assembler Services Guide. The fast POST example is unfortunately based on System 370 instructions. I would say "clear the ECB sometime before either the WAIT or the POST is possible." Keep in mind that in some situations the POST might happen before the WAIT

AW: Re: 2 possible RFE --- ISPF & SDSF.

>Correct. The hex value is the important part. Depending on your codepage >and/or keyboard it may look like a completely different character. >But if you have something that not code-page aware and expects a $ (dollar >sign) then it's looking for x'5B'. You have to type whatever character on yo

Re: Eternal WAIT on un-waited ECB

At the start of everything, you should clear the ECB. Immediately after the WAIT you should clear it. OK, first pick up the value in the ECB in case it has significance and then clear it. You should also look at the FAST POST and FAST WAIT examples in Appendix A of the POP manual. They can sav

Example of TSO Test call subcommand

Would anyone have an example I am getting all sorts of errors Would the TSOLIB be good enough That I just enter the load module name Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to list

Re: 2 possible RFE --- ISPF & SDSF.

On Fri, 22 Jun 2018 15:02:35 -0400, Steve Smith wrote: >I'll grant you have a point... but I thought the national characters were >defined as x'5B', x'7B', and x'7C', regardless of how displayed. > Correct. The hex value is the important part. Depending on your codepage and/or keyboard it may l

Eternal WAIT on un-waited ECB

I have a bad situation where a program is hanging forever in a wait. The ECB shows x'30ABFC50'. The lower 3 bytes are the address of my PRB, and I read somewhere that x'30' means it was un-waited (something like undead, I guess). This happens after some turmoil, and it's probable, not yet certai

Re: 2 possible RFE --- ISPF & SDSF.

I'll grant you have a point... but I thought the national characters were defined as x'5B', x'7B', and x'7C', regardless of how displayed. sas On Fri, Jun 22, 2018 at 2:32 PM, Peter Hunkeler wrote: > > >I believe JCL's set of "allowable" characters is only a fraction of any > code page. And pr

AW: Re: 2 possible RFE --- ISPF & SDSF.

>I believe JCL's set of "allowable" characters is only a fraction of any code page. And probably only common code points. The problem with probabilities? They may fool you :-) The famous "national characters" @, #, and $ in some code pages (all hex values): CP 285 (UK, etc.): 7b, 7c, 4a CP 2

Re: Two new RFE's to consider supporting

Dang it, I wasn't. From the RFE: " An output field should be protected while still allowing tabbing to it. " This is why I hate to admit being wrong. Just wind up having to do it again. sas On Fri, Jun 22, 2018 at 1:42 PM, Steve Smith wrote: > I was off-base with the tabs to protected fields

Re: Issue WTO message using MVS SEND command

Thanks for reply. I looked at netview command manual and found "WTO.TEXT" can be used for this purpose. But I am not sure, how do I incorporate this into this case. Netview table code. IF MSGID = 'SVTM052I' THEN EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y); In our rexx we retrieve the full mes

Re: ARC0104I INVALID INITIALIZATION COMMAND

How about an RFE to stop doing this: 07:00:04.58 S0002089 0090 ARC0522I SPACE MANAGEMENT STARTING ON VOLUME 783 783 0090 ARC0522I (CONT.) SMS019(SMS) AT 07:00:04 ON 2018/06/22, SYSTEM DVLP 07:00:04.79 S0002089 0090 ARC0523I SPACE MANAGEMENT ENDED ON VOLUME SMS019, 7

[SPAM] "Vulture Central" reports our IBM documentation cause

I really enjoy the somewhat sarcastic articles on this U.K. site. This one reviews the, now fixed, brouhaha about the 2.1 docs disappearing. IBM_MAIN is mentioned by name! https://www.theregister.co.uk/2018/06/21/ibm_mainframe_docs/ -- There is no such thing as the Cloud. It is just somebody els

Re: ARC0104I INVALID INITIALIZATION COMMAND

Please open an RFE for this, we responded to another RFE to enhance the ARC0103I message to be more descriptive in the next release. We will look at doing the same for the ARC0104I message. Thanks, Max Smith DFSMS Development

Re: Two new RFE's to consider supporting

I was off-base with the tabs to protected fields. I typically use tabs for point & shoot, and forgot about the other ways. ISPF already has an option to allow/disallow tab to point & shoot fields. I usually have this set off, as I don't really use point & shoot much. Habits developed in the 80s,

Fwd: Finished, redefined | Computerworld Shark Tank

Flashback to the 1980s, when computer-aided software engineering methodologies are all the rage for major mainframe software projects, according to a pilot fish in the know. continued at ... https://www.computerworld.com/article/3284106/application-development/finished-redefined.html ---

Re: Is TCBSENV propagated to child TCB by ATTACHX

TCBSENV is not propagated to the daughter on ATTACH. My suggestion would be to ATTACH DISP=NO and get the mother task to populate the field in the daughter. Rob Scott Rocket Software Original message From: Charles Mills Date: 22/06/2018 16:50 (GMT+00:00) To: IBM-MAIN@LISTSER

Re: Issue WTO message using MVS SEND command

I suppose it's rude to advise OP that the goal is of dubious value. It's not 1978. We can however state that the goal is not achievable within the scope of the mechanism(s) proposed. Some kind of automation tool is called for. The 'cheapest' would be an RYO WTO exit that changes the message at

Re: THINK (was: IBM shuffles mainframe docs ...)

On Fri, Jun 22, 2018 at 09:24:25AM -0700, Charles Mills wrote: > Спасибо. > > Charles Uhum. The preferable word is "Dziękuję", to which I would say "Nie ma za co" (roughly, "No problem"). :-) -- Regards, Tomasz Rola -- ** A C programmer asked whether computer had Buddha's nature. ** ** A

TAB (was: Two new RFE's ...)

On Fri, 22 Jun 2018 15:53:51 +, Seymour J Metz wrote: >A TAB is a skip to the beginning of the next unprotected field, with >wrap-around. It does not start an unprotected field. > Notoriously, IBM is reported to have obtained a patent on that behavior. But numerous web pages incorporate tha

Re: Two new RFE's to consider supporting

I voted for the PAS RFE as a user, not considering what I know--or don't know--about the underlying technology. A particular ISV product some time ago changed a screen to create exactly what Lionel is complaining about. A column title on a PDS member list was suddenly tabbable, 'capturing' the c

Re: THINK (was: IBM shuffles mainframe docs ...)

On Jun 22, 2018, at 10:49 AM, Tomasz Rola wrote: > > думать -> "to think", i.e. infinitive, a basic verb form > > думай -> "think!", i.e. imperative mood, a verb in form of a command > directed to someone Thanks. After poking around in Google translate a bit more I was starting to suspect that

Re: THINK (was: IBM shuffles mainframe docs ...)

We have the Harlem shuffle, even the Curley shuffle. Can we now add the Poughkeepsie shuffle Chris Hoelscher Technology Architect, Database Infrastructure Services Technology Solution Services Humana Inc. 123 East Main Street Louisville, KY 40202 Humana.com (502) 476-2538 or 407-7266 nd email to

Re: THINK (was: IBM shuffles mainframe docs ...)

Спасибо. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Tomasz Rola Sent: Friday, June 22, 2018 8:49 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: THINK (was: IBM shuffles mainframe docs ...) On Fri, Jun 22, 2018 at 03:11:11

Re: 2 possible RFE --- ISPF & SDSF.

ITYM "A JCL statement consists of one or more 80-byte records. Each record is in the form of an 80-column punched-card image." -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of Steve Smith Sent:

Re: ARC0104I INVALID INITIALIZATION COMMAND

I set up the PDO logs to swap just like the SMF logs, When HSM would swap from X to Y, Automation would kick off a IEBGENER to copy it to a "permanent " dataset with the System & Time stamps as dataset name and HSM/SMS Management Class to keep them around for 45 days with No backup and 0 days

Re: Two new RFE's to consider supporting

Given that ISPF already supports point and shoot and that IBM has no control over 3rd party 3270 simulators and TN3270 clients, you'll need a strong business case. The only solution I know of within the existing 3270 protocol is a zero-width field. -- Shmuel (Seymour J.) Metz http://mason.gmu.

Re: ARC0104I INVALID INITIALIZATION COMMAND

My reason for suggesting an APAR is that intrinsic inability to track down the source of an error message strikes me as a design failure. Furthermore, an APAR tied to a defect may get better (= quicker) resolution than an enhancement RFE. In Ed's case, a syntax typo in the initialization option

Re: 2 possible RFE --- ISPF & SDSF.

I'll take that bet. However, labels, opcodes and unquoted parameters are in a very restricted character set * // and /* in column 1 * Upper case alphabetic * Digits * National characters * Punctuation where called for by the syntax, e.g., ().,=' -- Shmuel (Seymour J.) Metz http://mason.gmu

Re: Two new RFE's to consider supporting

A TAB is a skip to the beginning of the next unprotected field, with wrap-around. It does not start an unprotected field. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of Steve Smith Sent: Thurs

Re: Is TCBSENV propagated to child TCB by ATTACHX

I am very familiar with TCBSENV and I don't know the answer. My "guess" would be that it IS propagated, but that is a guess. Easy to run an experiment if you wanted to. I do know that TCBSENV is "optional" -- it is zero a lot of the time. (That is, if you have code that sees a lot of "random" T

Re: THINK (was: IBM shuffles mainframe docs ...)

On Fri, Jun 22, 2018 at 03:11:11PM +, Pew, Curtis G wrote: > On Jun 22, 2018, at 9:41 AM, Paul Gilmartin > <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > > > I knew a man who had been a docent for IBM at an exhibition in Moscow > > circa 1960. He proudly displayed a sign he had

Re: Two new RFE's to consider supporting

There is no such thing as a point-and-shoot field in the 3270 data stream. There are selector-pen detectable fields and fields with triggers, but neither provides a protected field that you can tab into. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 _

Re: Two new RFE's to consider supporting

That's because there are no such bits; point-and-shoot is a software construct. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of Phil Smith III Sent: Thursday, June 21, 2018 9:47 PM To: IBM-MAIN@

Re: Issue WTO message using MVS SEND command

1. The TSO SEND command has very limited control over the WTO; for what you're doing, you should read up on console areas and multi-line WTO, and code a REXX-aware external function in assembler. Or use the support in NetView. 2. You should seriously consider whether a non-scrollable m

Re: THINK (was: IBM shuffles mainframe docs ...)

On Jun 22, 2018, at 9:41 AM, Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > I knew a man who had been a docent for IBM at an exhibition in Moscow > circa 1960. He proudly displayed a sign he had snagged as a souvenir: > > ДУМАТЬ When I was a senior i

Re: [EXTERNAL] Re: Two new RFE's to consider supporting

You nailed it - it is all in the application and not in the 3270 architecture itself. It's just code - stringing together one's and zero's in the right sequence to cause the computer to do the right thing. -- Lionel B. Dyck

AW: Re: [EXTERNAL] Re: Two new RFE's to consider supporting

> Does 3270 protocol require that PAS fields be writable, therefore tabbable? Bad design. It's perfectly reasonable to want to specify a read-only PAS menu item. (Too few bits in the attribute byte?) I'm no expert in the 3270 protocol, but I don't think PAS is described in the architecture. I'

Re: Issue WTO message using MVS SEND command

Hello All, We have requirement of displaying dataset name to operator console upon receiving SVTM052I msg id like below. SVTM052I message is a multiline message, so the message is 1 message of 4 lines. In the automationtable you can just code: IF MSGID = 'SVTM052I' THEN EXEC(CMD('FI

AW: Re: [EXTERNAL] Re: Two new RFE's to consider supporting

> Not all that difficult to do using standard 3270 orders: SBA to the screen location; SF to start an unprotected field. Immediately SF to start a protected field. I'm fairly certain this will allow TAB to go the the 0-length unprotected field which precedes the ​protected field. If not, then

Is TCBSENV propagated to child TCB by ATTACHX

This is strictly a curiosity question. Suppose for some unspecified & irrelevant to this discussion that my code is running under a TCB which has a non-zero TCBSENV value. If my code were to do an ATTACHX to create a subtask, would the new TCB have the same TCBSENV as my code, or would it be zero?

THINK (was: IBM shuffles mainframe docs ...)

On Fri, 22 Jun 2018 13:18:19 +, Bill Hitefield wrote: >In one of the men's rooms at the IBM office in Harford (this would be >somewhere between '79 and '81), they had one of the "Think!" signs on the >wall. Someone else added a "Thoap!" sign below it. > I knew a man who had been a docent fo

Re: Issue WTO message using MVS SEND command

Right tool for the right job. Read about WTO (REXX) command in Netview commands manual. --- *Lucas Rosalen* rosalen.lu...@gmail.com / lucas.rosal...@ibm.com http://br.linked

Re: Issue WTO message using MVS SEND command

Good point ! I know we have operators, but all our console are in roll mode, they watch a GUI that alerts them to 'call someone' :( Carmen Vitullo - Original Message - From: "Charles Mills" To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, June 22, 2018 8:20:08 AM Subject: Re: Issue WT

Re: Issue WTO message using MVS SEND command

Do you actually have "operators" who sit waiting for instructions to appear on the console? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Carmen Vitullo Sent: Friday, June 22, 2018 5:34 AM To: IBM-MAIN@LISTSERV.UA.EDU Subj

Re: IBM shuffles mainframe docs leaving customers crying 'sabotage' • The Register

In one of the men's rooms at the IBM office in Harford (this would be somewhere between '79 and '81), they had one of the "Think!" signs on the wall. Someone else added a "Thoap!" sign below it. Bill Hitefield Dino-Software Corporation 800.480.DINO 423.878.5660 www.dino-software.com -Origin

Re: [EXTERNAL] Re: Two new RFE's to consider supporting

On Fri, Jun 22, 2018 at 7:52 AM Dyck, Lionel B. (RavenTek) < lionel.d...@va.gov> wrote: > Tom - that is my issue - when you enable tabbing to a PAS field then it is > now possible to overtype them - that is what I would like to change - to > make them protected but still allow tabbing to them. >

Re: PDS with 1 directory block

DS1NOBDB DSXL1 NUMBER OF BYTES USED IN LAST * DIRECTORY BLOCK (PDS ONLY) Learned something old today, thanks! Not sure how bad I needed to know that, but it makes me curious as to what that field is actually used for (other than to provide a

Re: [EXTERNAL] Re: Two new RFE's to consider supporting

Tom - that is my issue - when you enable tabbing to a PAS field then it is now possible to overtype them - that is what I would like to change - to make them protected but still allow tabbing to them. Just trying to make some ISPF applications more 'modern' :-) -

Re: [EXTERNAL] Re: Two new RFE's to consider supporting

On Fri, 22 Jun 2018 12:00:29 +, Dyck, Lionel B. (RavenTek) wrote: >Those fields in SDSF are probably PAS fields but you don't see that as the >panels are more than likely dynamic in nature (I don't run SDSF so I can't >check that). Similarly, the ISPF Primary Option Menu uses point-and-sh

Re: Issue WTO message using MVS SEND command

There is a way to do this, but not by specifying a console name, check the TSO HELP on the SEND command and it's options. with the fast processors and the amount of work process, and design of your complex, being a single system monoplex or a large scale sysplex you should take care on how you

Re: Issue WTO message using MVS SEND command

On Fri, 22 Jun 2018 07:31:38 +0300, saurabh khandelwal wrote: >We used CN operand with send command to send message to operator console >and now i receive output as required. Why do you want to do that? IMO, on systems today with several dozen to hundreds of jobs running, along with thousands

Re: [EXTERNAL] Re: Two new RFE's to consider supporting

Those fields in SDSF are probably PAS fields but you don't see that as the panels are more than likely dynamic in nature (I don't run SDSF so I can't check that). I'm looking at ISPF dialogs where I want to allow PAS fields where the user can either TAB or mouse and then click to activate the a

Re: Two new RFE's to consider supporting

On Thu, 21 Jun 2018 20:32:54 -0500, Paul Gilmartin wrote: >On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote: > >>Correct. You cannot tab to a protected field. And I suspect that a request >>for an update to the 3270 protocol is not likely to be fulfilled at this >>point. >> >Reading the R

Re: Would SHARE kindly kick IBM in the ass for what the've done with their web content?

On Fri, 15 Jun 2018 17:18:08 +, Seymour J Metz wrote: >there are legitimate reasons to search for old manuals. Indeed. Questions arise on here often enough about when something was introduced or changed. I occasionally refer to MVS V4 or V5 documentation, and even look for early MVS and OS/

Re: [EXTERNAL] Re: Two new RFE's to consider supporting

If you can tab to a PAS field then you don't need the mouse, but using a PAS allows those who want to use the mouse to do so. -- Lionel B. Dyck (Contractor) < Mainframe Systems Programmer – RavenTek Solution Partners -

Re: Two new RFE's to consider supporting

On 22/06/2018 9:32 AM, Paul Gilmartin wrote: On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote: Steve Smith wrote: Isn't #1 impossible? From what I've retained (or think I have) of 3270 programming, a "tab" is merely the start of an unprotected field. Catch-22. Correct. You cannot

Re: [EXTERNAL] Re: Two new RFE's to consider supporting

Actually the desire is to tab to the PAS field but not allow the field to be over-typed. -- Lionel B. Dyck (Contractor) < Mainframe Systems Programmer – RavenTek Solution Partners -Original Message- From: IBM Mainfr

SV: CBT tape file 321 Cobol Analyzer

I use the latest version downloaded from CBT tape. Yes , I have rebuild the version on CBT tape myself Regards Holger On 20 June 2018 at 16:40, Holger Noach (UHN) wrote: > I have for several year's used the Cobol Analyzer program from CBT > tape file 321, www.cbttape.org

SV: CBT tape file 321 Cobol Analyzer

Analyze Cobol Programs , what Cobol Version used , when compiled , etc etc Take a look at www.cbttape.org And there you find a lot of open source code , which might help you jn dayli work Venlig hilsen Holger Noach , Ekstern konsulent KMD Ekstern Konsulent - IBM E-mail u...@kmd.dk Web www.

Re: CBT tape file 321 Cobol Analyzer

Just curious: what does COBOL Analyzer do? What kind of analysis it performs? -- Radoslaw Skorupka Lodz, Poland == -- Treść tej wiadomości może zawierać informacje prawnie chronione Banku przeznaczone wyłącznie do u

Re: Rebuilding IODF

W dniu 2018-06-17 o 14:11, Mainframe Sysprog pisze: A colleague has run into an issue where the VOLUME where the IODF resided has been "reclaimed" from another shared system with no recent available backups of IODF available to restore. They have a very old backup version from which he would be

Re: ARC0104I INVALID INITIALIZATION COMMAND

Jesse 1 Robinson wrote: >I'd say that this is such an egregious oversight that it should be APARable >even after all this time. There's no statute of limitations on bad design. Or ask for a thing to do Syntax Checking of ARCCMDxx just like the one for BPXPRMxx member (SETOMVS SYNTAXCHECK=(??)

Re: The 'Baby' that ushered in modern computer age - BBC News

>1,000 instructions per second times 20 to 30 million times faster is >20 to 30 GHz for a modern laptop? They got an extra zero in there. Not sure where that came from. The Baby replica actually does about 700 instructions per second. Its a 32 bit serial machine and a bit access time is 10 micr

Re: PDS with 1 directory block

On 2018-06-22 7:53 AM, Jesse 1 Robinson wrote: I have a dim memory of learning ages ago that a PDS with 1 directory block is somehow 'different', that certain updates to it require fiddling with the VTOC in addition to changing data on a track. Sound familiar? Once the last directory block ha