Re: Convert O-specs to free format

On Oct 10, 2022, at 4:13 PM, Roger Harman <roger.harman@xxxxxxxxxxx> wrote:

I have a vague recollection that you *can* use O-Specs if they are brought in as a /copy or /include.

Can't verify that at the moment but just something I recall having had to use long ago.


Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power




-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of David Gibbs via RPG400-L
Sent: Monday, October 10, 2022 7:03 AM
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Cc: David Gibbs <david@xxxxxxxxxxxx>
Subject: Re: Convert O-specs to free format

On 10/10/22 8:57 AM, Greg Wilburn wrote:

I'm working with some old programs that are using some techniques I'm
not 100% familiar with. They are using temp files to simulate screen
data so a process can run both interactively and in batch.

I am adding a procedure to the first RPG program, so I need to
replace the O-specs. What I've tried so far (writing a record to
WK424R) is not working. Looking for suggestions.

You can't convert O specs to free form directly, as there is no analog.

Based on your post, I think it would be best to convert that program
described file to an external data structure ... either defined as a PF
or a data structure in a copy member.

You could then use that structure to write to the temp file.

Alternatively, you could just pass the structure as a parameter to the
other program.

david

--
I'm riding in the American Diabetes Association's Tour de Cure to raise
money for diabetes research, education, advocacy, and awareness. You
can make a tax-deductible donation to my ride by visiting
https://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Fmideml.diabetessucks.net%2F&amp;data=05%7C01%7C%7C38ba6f8dc1e54f3431a408daaac8336a%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C638010074076773266%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&amp;sdata=g7P6CKi4Ci8wu44RBbVvxGZTfatLYLMnwWeFFEyPPDc%3D&amp;reserved=0.

You can see where my donations come from by visiting my interactive
donation map ... https://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Fmideml.diabetessucks.net%2Fmap&amp;data=05%7C01%7C%7C38ba6f8dc1e54f3431a408daaac8336a%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C638010074076773266%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&amp;sdata=4ymzlgWcgxrZKFO1MXyOYxFBtY%2FUfYhvLS0nowPmrhA%3D&amp;reserved=0 (it's a geeky thing).
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Flists.midrange.com%2Fmailman%2Flistinfo%2Frpg400-l&amp;data=05%7C01%7C%7C38ba6f8dc1e54f3431a408daaac8336a%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C638010074076773266%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&amp;sdata=18ZbO3nfUn%2BFfVXyJbemgMc7O6kPN84lvYIwHX38FqI%3D&amp;reserved=0
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Farchive.midrange.com%2Frpg400-l&amp;data=05%7C01%7C%7C38ba6f8dc1e54f3431a408daaac8336a%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C638010074076929490%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&amp;sdata=qsdIf2%2FduC8TRzhC%2FLnYXIjMJA2Y%2FvMU4ntdNsMBZrc%3D&amp;reserved=0.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Famazon.midrange.com%2F&amp;data=05%7C01%7C%7C38ba6f8dc1e54f3431a408daaac8336a%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C638010074076929490%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&amp;sdata=DjCvlPv9T7ggDgkaf0yPGVKMQTq9rSXo17JJ6EFNGPo%3D&amp;reserved=0
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-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