Re: Using CPYTOIMPF to copy a source member to the IFS does not copy fields SRCSEQ and SRCDAT

Ah, that never happens here! Huh!

We use Turnover, which gives us archived copies in another source member - of course, you can't guarantee that people will make such a copy on their own, right?

We have a practice of commenting out what was changed with a reference to a change order number. Eventually we might remove those old changes.

Everyone is different. BTW, I once saw a checkout/checkin tool that might have been from Midrange Computing or NEWS/3X or its later versions - I don't know everything it did, but it didn't cost like the commercial change management tools.

Cheers
Vern

On 4/28/2021 7:40 AM, a4g atl wrote:

The requirement is purely mine. If I need to compare then I would have the
source to do so. My problem is an unruly bunch who delete lines of code
rather than commenting lines out... so when something goes wrong, I can go
back and check. Source compare cannot handle the changes made and so is not
always helpful.

On Mon, Apr 26, 2021 at 4:33 PM Vern Hamberg <vhamberg@xxxxxxxxxxxxxxx>
wrote:

Back to Darryl - what are you trying to accomplish with an IFS copy? Is
that meant to be the source for compiling? Or documentation? Just
curious!! If trying to compile from IFS source, I don't know, do source
sequence and source date show up? Developers are kind of expected to get
used to using something like GIT and diffs, right?

OK, back to regular source PFs!

Regards
Vern

On 4/26/2021 3:13 PM, Mayer, Michael via MIDRANGE-L wrote:

Here's how I did it.
Went into STRPDM and printed out the source member via option 6.
QSYS/STRSEU SRCFILE(QGPL/QCLSRC) SRCMBR(ABC123) TYPE(*SAME)

OPTION('6') TEXT('*BLANK')

Member ABC123 has been printed.
Ran a CPYSPLF as follows:
CPYSPLF FILE(QPSUPRTF) TOFILE(*TOSTMF) JOB(jobnum/user/name) SPLNBR(1)

MBROPT(*ADD) TOSTMF('/temp/abc123.txt')

Spooled file copied to /temp/abc123.txt.
Then view the txt file - wrklnk '/temp' then abc123.txt
Code line #'s and dates are there.

Very Respectfully,
Michael Mayer
IBM I on Power System Admin.
IT Operations.
The Florida Bar
651 E. Jefferson St
Tallahassee, Florida 32399-2300
mmayer@xxxxxxxxxxxxxx
https://www.floridabar.org
Office: 850.561.5761
Cell: 518.641.8906


------------------------------

message: 7
date: Mon, 26 Apr 2021 14:36:22 -0400
from: a4g atl <a4ginatl2@xxxxxxxxx>
subject: Using CPYTOIMPF to copy a source member to the IFS does not
copy fields SRCSEQ and SRCDAT

Thought this would be simple....

How do I copy a source member to the IFS or a network drive?

I tried using CPYTOIMPF and CPYTOSTMF and get the data but the 2 fields

SRSEQ and SRCDAT (sequence number and date) do not get copied to the IFS.

What am I doing wrong?

TIA, Darryl Freinkel.



________________________________
Please note: Florida has very broad public records laws. Many written

communications to or from The Florida Bar regarding Bar business may be
considered public records, which must be made available to anyone upon
request. Your e-mail communications may therefore be subject to public
disclosure.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com