RE: Question on Free Format

Figured out that SEU is giving me an error that compiles okay. I just save and override the option to return to editing. But how do I do *DEBUG in the so called H spec.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxx> On Behalf Of Paul Therrien
Sent: Wednesday, November 14, 2018 11:09 AM
To: RPG programming on the IBM i (AS/400 and iSeries) <rpg400-l@xxxxxxxxxxxx>
Subject: Re: Question on Free Format

[ External Email ]

----------------------------------------------------------------------
That's a good point. What version of RPG are you on?

Paul

On 2018-11-14 12:07, (WalzCraft) Jerry Forss wrote:

You need to add /Free before the Ctl-Opt line.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxx> On Behalf Of Burrows,
Thomas 1001
Sent: Wednesday, November 14, 2018 10:56 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Question on Free Format

Having a problem with free format H and F specs

************** Beginning of data
*********************************************************
Ctl-Opt Option(*NODEBUGIO: *DEBUG);

FUSIAJFL0 IF E K DISK
Dcl-F USIAJFL0 DISK Usage(*Input) Keyed;

Getting the below message for both lines. Starting in column 8 or further right.

Message ID . . . . . . : RNF5347 Severity . . . . . . . : 30
Message type . . . . . : Diagnostic
Message . . . . : An assignment operator is expected with the EVAL
operation.
Cause . . . . . : An assignment symbol "=" is expected after the left-hand
side of an assignment operation and was not found. The specification
is ignored.
Recovery . . . : Insert the required assignment operator for the EVAL
operation. Compile again.

Thomas Burrows
Infosys Consultant - AppDev - Legacy SUS United States Mobile #
469.693.2533
Email:
burrows.thomas@xxxxxxxxxxxxxx<mailto:burrows.thomas@xxxxxxxxxxxxxx>

--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.co
m_mailman_listinfo_rpg400-2Dl&d=DwICAg&c=Iej4I5bEYPmgv5l2sS6i8A&r=XeGB
z1fvL6mzoxSW9-Fyt7Ajo0tG_mOKUz5KbIaikfo&m=mTwF6s-MRTLSFK3adXs-gF-ZFQs3
Scb-fHWf_Ek7Tw0&s=pKmcbH12bkB0Ws8m-XBQeU8j-c0ATTP8pa4ICv8akQw&e=
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_rpg400-2Dl&d=DwICAg&c=Iej4I5bEYPmgv5l2sS6i8A&r=XeGBz1fvL6mzoxSW9-Fyt7Ajo0tG_mOKUz5KbIaikfo&m=mTwF6s-MRTLSFK3adXs-gF-ZFQs3Scb-fHWf_Ek7Tw0&s=TO4DspygfJLrpr9F5xS8q44rjLJbIey6kheEJHe6KJI&e=.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link:
https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.c
om&d=DwICAg&c=Iej4I5bEYPmgv5l2sS6i8A&r=XeGBz1fvL6mzoxSW9-Fyt7Ajo0tG_mO
KUz5KbIaikfo&m=mTwF6s-MRTLSFK3adXs-gF-ZFQs3Scb-fHWf_Ek7Tw0&s=3FDmfOOM3
AH1NThNOeNQ65llnLFoAncVZZJo0kpBXmQ&e=

Subject to Change Notice:

WalzCraft reserves the right to improve designs, and to change specifications without notice.

Confidentiality Notice:

This message and any attachments may contain confidential and
privileged information that is protected by law. The information
contained herein is transmitted for the sole use of the intended
recipient(s) and should "only" pertain to "WalzCraft" company matters.
If you are not the intended recipient or designated agent of the
recipient of such information, you are hereby notified that any use,
dissemination, copying or retention of this email or the information
contained herein is strictly prohibited and may subject you to
penalties under federal and/or state law. If you received this email
in error, please notify the sender immediately and permanently delete
this email. Thank You

WalzCraft PO Box 1748 La Crosse, WI, 54602-1748 www.walzcraft.com
[1]<https://urldefense.proofpoint.com/v2/url?u=http-3A__www.walzcraft.
com&d=DwICAg&c=Iej4I5bEYPmgv5l2sS6i8A&r=XeGBz1fvL6mzoxSW9-Fyt7Ajo0tG_m
OKUz5KbIaikfo&m=mTwF6s-MRTLSFK3adXs-gF-ZFQs3Scb-fHWf_Ek7Tw0&s=LsqA6gIu
cb5t48j6x4bY9Pifr81pmkV4LcWi3JyYFWc&e=> Phone: 1-800-237-1326

Links:
------
[1] https://urldefense.proofpoint.com/v2/url?u=http-3A__www.walzcraft.com&d=DwICAg&c=Iej4I5bEYPmgv5l2sS6i8A&r=XeGBz1fvL6mzoxSW9-Fyt7Ajo0tG_mOKUz5KbIaikfo&m=mTwF6s-MRTLSFK3adXs-gF-ZFQs3Scb-fHWf_Ek7Tw0&s=LsqA6gIucb5t48j6x4bY9Pifr81pmkV4LcWi3JyYFWc&e=
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_rpg400-2Dl&d=DwICAg&c=Iej4I5bEYPmgv5l2sS6i8A&r=XeGBz1fvL6mzoxSW9-Fyt7Ajo0tG_mOKUz5KbIaikfo&m=mTwF6s-MRTLSFK3adXs-gF-ZFQs3Scb-fHWf_Ek7Tw0&s=pKmcbH12bkB0Ws8m-XBQeU8j-c0ATTP8pa4ICv8akQw&e=
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_rpg400-2Dl&d=DwICAg&c=Iej4I5bEYPmgv5l2sS6i8A&r=XeGBz1fvL6mzoxSW9-Fyt7Ajo0tG_mOKUz5KbIaikfo&m=mTwF6s-MRTLSFK3adXs-gF-ZFQs3Scb-fHWf_Ek7Tw0&s=TO4DspygfJLrpr9F5xS8q44rjLJbIey6kheEJHe6KJI&e=.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwICAg&c=Iej4I5bEYPmgv5l2sS6i8A&r=XeGBz1fvL6mzoxSW9-Fyt7Ajo0tG_mOKUz5KbIaikfo&m=mTwF6s-MRTLSFK3adXs-gF-ZFQs3Scb-fHWf_Ek7Tw0&s=3FDmfOOM3AH1NThNOeNQ65llnLFoAncVZZJo0kpBXmQ&e=