× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: RE: Help needed with Free format H specs
  • From: "Burrows, Thomas 1001" <Burrows.Thomas@xxxxxxxxxxxxxx>
  • Date: Tue, 5 Feb 2019 23:23:34 +0000
  • List-archive: <https://archive.midrange.com/rpg400-l/>
  • List-help: <mailto:rpg400-l-request@lists.midrange.com?subject=help>
  • List-id: "RPG programming on the IBM i \(AS/400 and iSeries\)" <rpg400-l.lists.midrange.com>
  • List-post: <mailto:rpg400-l@lists.midrange.com>
  • List-subscribe: <https://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@lists.midrange.com?subject=subscribe>
  • List-unsubscribe: <https://lists.midrange.com/mailman/options/rpg400-l>, <mailto:rpg400-l-request@lists.midrange.com?subject=unsubscribe>
  • Msip_labels: MSIP_Label_be4b3411-284d-4d31-bd4f-bc13ef7f1fd6_Enabled=True; MSIP_Label_be4b3411-284d-4d31-bd4f-bc13ef7f1fd6_SiteId=63ce7d59-2f3e-42cd-a8cc-be764cff5eb6; MSIP_Label_be4b3411-284d-4d31-bd4f-bc13ef7f1fd6_Owner=thomas.burrows@xxxxxxxxxxxxxx; MSIP_Label_be4b3411-284d-4d31-bd4f-bc13ef7f1fd6_SetDate=2019-02-05T23:23:34.8713187Z; MSIP_Label_be4b3411-284d-4d31-bd4f-bc13ef7f1fd6_Name=Internal; MSIP_Label_be4b3411-284d-4d31-bd4f-bc13ef7f1fd6_Application=Microsoft Azure Information Protection; MSIP_Label_be4b3411-284d-4d31-bd4f-bc13ef7f1fd6_Extended_MSFT_Method=Automatic; MSIP_Label_a0819fa7-4367-4500-ba88-dd630d977609_Enabled=True; MSIP_Label_a0819fa7-4367-4500-ba88-dd630d977609_SiteId=63ce7d59-2f3e-42cd-a8cc-be764cff5eb6; MSIP_Label_a0819fa7-4367-4500-ba88-dd630d977609_Owner=thomas.burrows@xxxxxxxxxxxxxx; MSIP_Label_a0819fa7-4367-4500-ba88-dd630d977609_SetDate=2019-02-05T23:23:34.8713187Z; MSIP_Label_a0819fa7-4367-4500-ba88-dd630d977609_Name=Companywide usage; MSIP_Label_a0819fa7-4367-4500-ba88-dd630d977609_Application=Microsoft Azure Information Protection; MSIP_Label_a0819fa7-4367-4500-ba88-dd630d977609_Parent=be4b3411-284d-4d31-bd4f-bc13ef7f1fd6; MSIP_Label_a0819fa7-4367-4500-ba88-dd630d977609_Extended_MSFT_Method=Automatic; Sensitivity=Internal Companywide usage

Got it. Silly mistake.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Alan Campin
Sent: Tuesday, February 5, 2019 5:22 PM
To: RPG programming on the IBM i (AS/400 and iSeries) <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: Help needed with Free format H specs

[ External Email ]

----------------------------------------------------------------------
If you are not using **FREE, then it is complaining because the // if

before the 8th position in the source file.



1 - 5 comment.

6 - 6 Type

7 - 7 Comment

8 - Commands.





On Tue, Feb 5, 2019 at 3:18 PM Burrows, Thomas 1001 <

Burrows.Thomas@xxxxxxxxxxxxxx> wrote:



This is what I am getting.



2 Ctl-Opt Debug (*Yes) Option(*NoDebugIo)

3 EXPROPTS(*RESDECPOS) DFTACTGRP(*No)

4 ACTGRP(*Caller);

5

//************************************************************************

======>

aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa

*RNF0274 30 a 000500 Compiler directive not recognized; directive

ignored.



-----Original Message-----

From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Charles

Wilt

Sent: Tuesday, February 5, 2019 5:15 PM

To: RPG programming on the IBM i (AS/400 and iSeries) <

rpg400-l@xxxxxxxxxxxxxxxxxx>

Subject: Re: Help needed with Free format H specs



[ External Email ]



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

Barfing? How?







Works for me.







Charles







On Tue, Feb 5, 2019 at 4:07 PM Burrows, Thomas 1001 <



Burrows.Thomas@xxxxxxxxxxxxxx> wrote:







Ctl-Opt Debug (*Yes) Option(*NoDebugIo)



EXPROPTS(*RESDECPOS) DFTACTGRP(*No)



ACTGRP(*Caller);







This is barfing. I know the top line works.







Help.







Thomas



--



This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)



mailing list



To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx



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=VBHDUGU-v3GeSgYt3O5OJtj1-q3MHEr0HKM3_VSemDs&s=lokgnzkSSp5TLujHqNFq5VA-yh6VRi5FzGMP1jTVsHM&e=



or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx



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=VBHDUGU-v3GeSgYt3O5OJtj1-q3MHEr0HKM3_VSemDs&s=ykcgLJ3_DrUxEPVggaQcx7AwiySG9-ROI-0tqge1Qxg&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=VBHDUGU-v3GeSgYt3O5OJtj1-q3MHEr0HKM3_VSemDs&s=EB4QinG6vyOe4m20U_FPESimgL-Xu3-kVg8YH7ycyaE&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@xxxxxxxxxxxxxxxxxx



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=VBHDUGU-v3GeSgYt3O5OJtj1-q3MHEr0HKM3_VSemDs&s=lokgnzkSSp5TLujHqNFq5VA-yh6VRi5FzGMP1jTVsHM&e=



or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx



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=VBHDUGU-v3GeSgYt3O5OJtj1-q3MHEr0HKM3_VSemDs&s=ykcgLJ3_DrUxEPVggaQcx7AwiySG9-ROI-0tqge1Qxg&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=VBHDUGU-v3GeSgYt3O5OJtj1-q3MHEr0HKM3_VSemDs&s=EB4QinG6vyOe4m20U_FPESimgL-Xu3-kVg8YH7ycyaE&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@xxxxxxxxxxxxxxxxxx

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=4FJQb-73QUtHGaeJLNWwRvoohHxRW-U5mQp8g-Gibbc&s=H2Lb-GZ0MaRl1v-GBwL5g_evWyB57mtVTnZQHyFS8GQ&e=

or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx

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=4FJQb-73QUtHGaeJLNWwRvoohHxRW-U5mQp8g-Gibbc&s=iwHmW2tykPr_MEI0Y5iNmR0n2k4SQxjzxclIgaSo4FI&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=4FJQb-73QUtHGaeJLNWwRvoohHxRW-U5mQp8g-Gibbc&s=oRe9ADTop8HxaHMP5T1xMGhvvr_KValEZZdMxHt8mgY&e=




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.