You can change the columns TF uses by using the Bounds line command. In
this case it might be interesting to set the bounds to columns 1-71 and
then use TF.
Unfortunately I can't test this now, but I recall it being handy for
formatting code. It may be preferable to have the left bound set to
column 10 or elsewhere, depending on what you want.
The ISPF editor is very powerful, but it can take a while to explore its
full capability. Bounds is one of my favourites, e.g. with C and O to
limit what's overlaid, or shifted by > or <, etc.
BFN,
Peter
On 14/07/2020 12:09 am, Seymour J Metz wrote:
TF will not recognize a + in column 72 as a continuation character. You
generally will need to insert a blank line at the end and blank column 72.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
________________________________________
From: IBM Mainframe Discussion List [[email protected]] on behalf of
Allan Staller [[email protected]]
Sent: Monday, July 13, 2020 7:58 AM
To: [email protected]
Subject: Re: Concatenating lines
I don't know if the data to too large, but the ISPF EDIT line command TF ("text
flow") seems to do what you want. Check the edit line commands in ISPF Help.
-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of
kekronbekron
Sent: Saturday, July 11, 2020 7:12 AM
To: [email protected]
Subject: Re: Concatenating lines
[CAUTION: This Email is from outside the Organization. Unless you trust the
sender, Don’t click links or open attachments as it may be a Phishing email,
which can steal your Information and compromise your Computer.]
Thanks Lionel, what about when there's a 3 or 7-part line (2 or 6 lines with
continuation char respectively.).
Need a safe way to loop the 'else do' bit you've shown below.
- KB
‐‐‐‐‐‐‐ Original Message ‐‐‐‐‐‐‐
On Saturday, July 11, 2020 5:26 PM, Lionel B Dyck <[email protected]> wrote:
I'm not aware of one but that would be a very trivial rexx program to do so.
This should get you started:
/* rexx */
'alloc f(in) ds(lionel.doc(concinp)) shr reuse'
'execio * diskr in (finis stem in.'
'free f(in)'
do i = 1 to in.0
if substr(in.i,72,1) /= '+'
then say in.i
else do
data = substr(in.i,1,71)
i = i + 1
data = data''in.i
say data
end
end
Lionel B. Dyck <sdg><
Website:
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.
lbdsoftware.com%2F&data=02%7C01%7Callan.staller%40HCL.COM%7C67ccd6
36819e4b7ea2d808d82593a1ae%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%
7C637300663300910224&sdata=LdErUFo%2BYWgIygZekUG%2FRO%2F9t%2BIPtnP
1cX8RePmuHr0%3D&reserved=0
"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 [email protected] On Behalf
Of kekronbekron
Sent: Saturday, July 11, 2020 6:37 AM
To: [email protected]
Subject: Concatenating lines
Hi,
Is there any program in any of the CBT tapes, or perhaps on someone's GitHub ..
that makes concatenating lines easy?
If a continuating character is found in column 72, append the next line to
current line, and so on.
Thanks,
- KB
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
-----------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
::DISCLAIMER::
________________________________
The contents of this e-mail and any attachment(s) are confidential and intended
for the named recipient(s) only. E-mail transmission is not guaranteed to be
secure or error-free as information could be intercepted, corrupted, lost,
destroyed, arrive late or incomplete, or may contain viruses in transmission.
The e mail and its contents (with or without referred errors) shall therefore
not attach any liability on the originator or HCL or its affiliates. Views or
opinions, if any, presented in this email are solely those of the author and
may not necessarily reflect the views or opinions of HCL or its affiliates. Any
form of reproduction, dissemination, copying, disclosure, modification,
distribution and / or publication of this message without the prior written
consent of authorized representative of HCL is strictly prohibited. If you have
received this email in error please delete it and notify the sender
immediately. Before opening any email and/or attachments, please check them for
viruses and other defects.
________________________________
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
