RE: equivalent data type for packed field in Display file -- RPG400-L

Have you tried RDi screen designer? Honestly, I jumped on it and loved it. Screens and reports both. You couldn't make me use RLU under threat of death though.

Yeah, SDA is/was comfortable but the benefits of RDi are really worth it.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Alan Campin
Sent: Tuesday, July 26, 2022 12:44 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: equivalent data type for packed field in Display file

Funny isn't it. I am the always pushing new things and getting nothing but
flak for doing it but in this case I just don't see the value. I guess I
should have said I just don't see the value in switching rather than I am
too old.

On Tue, Jul 26, 2022, 12:26 PM Charles Wilt <charles.wilt@xxxxxxxxx> wrote:

If you're too old to learn new and better things Alan....

:D

Charles

On Tue, Jul 26, 2022 at 9:37 AM Alan Campin <alan0307d@xxxxxxxxx> wrote:

Sorry Jon. Way too old to be switching to new screen design aids. SDA

seems

easy to me. The monster is RLU. What a mess that is.

On Tue, Jul 26, 2022 at 6:32 AM Jon Paris <jon.paris@xxxxxxxxxxxxxx>
wrote:

SDA? Today Alan? For those of us who know it, its perversities are
second nature. But for a newbie it is tough because it really doesn't

work

like anything else in the universe.

For a newbie I would suggest either RDi which has a great screen

designer,

or if using Liam's VS Code extension for IBM i as your editor (which is
where you should start if the shop won't buy RDi) use the new Preview
option which you can find here:

https://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Fmarketplace.visualstudio.com%2Fitems%3FitemName%3DHalcyonTechLtd.vscode-displayfile&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305641430%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=hnXvX2r35K%2BOTfIMEiUAe92gZepLn4rNbbBsI0JBfJg%3D&reserved=0

<

https://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Fmarketplace.visualstudio.com%2Fitems%3FitemName%3DHalcyonTechLtd.vscode-displayfile&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305641430%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=hnXvX2r35K%2BOTfIMEiUAe92gZepLn4rNbbBsI0JBfJg%3D&reserved=0

Jon P.

On Jul 25, 2022, at 5:48 PM, Alan Campin <alan0307d@xxxxxxxxx>

wrote:

Have you tried SDA (Screen Design Aid)? There is a bit to learn but

it

will

let you see a screen as it looks.

For the display file that you have defined, go to option 3 in PDM to
display your display file source. Take option 17 and you should see a

list

of record formats that you have defined. Take option 12 on the record
format to display the screen. F4 will show you a list of fields in

the

record. F6 will sort them by location. If you wanted to define a

numeric

5,0 field for input and output (Both) you would type +9(5,0) and it

will

define the field for you where the cursor is. Putting ? in front of

the

field lets you rename it. Putting * in front of field allows you to

specify

editing on the field. I always use a different name for the fields on

my

screens. For a standard, I B_ for Both fields, I_ for input, O_ for

output

and H_ for hidden fields. For example, if I had an order # that I

wanted

to

input to, I would do something like B_ORDER#.

Anyway, it would allow you to see what the screen looks like..

On Mon, Jul 25, 2022 at 1:47 PM Brian Parkins <

goodprophet.bp@xxxxxxxxx>

wrote:

I see a few problems with this.

- Almost all of DDS has to be coded in uppercase, unless it's in

quotes,

e.g. COLHDG('Jerry')
- As others have pointed out, you have left the Decimal Positions

blank

- so FLD1 would default to Character
- The keyboard shift numeric 'N' applies to input only and has no
bearing on output

You may have more luck with:
A FLD1 2S 0O 7 39
- but this supposes you don't have any overlapping fields which

would

result in FLD1 not being displayed. Don't forget you MUST leave at

least

one space between fields in a Display File, (so the attribute bytes
don't overlap).

To respond to your earlier query, DDS has no concept of Packed

Numeric

fields, only Signed Numeric (Zoned Decimal). (You cannot

display/print a

Packed field because each byte - i.e. character position - contains
2-digits.) RPG IV automagically redefines Signed Numeric field in

DDS

to

Packed Decimal in the program. (Look at the compiler listing to

prove

it

to yourself.)

Time to hit the manuals and programming guides?

Brian.

On 25/07/2022 15:42, jerry ven wrote:

i am also trying to define my field directly for the screen like

below

only difference is i am defining like below without using EDTCDE-

A Fld1 2N O 7 39

But i don't see my field name 'FLD1' on the screen like above,

whereas

within the same DDS other fields which are defined using reffld and

have

some text under Functions their data is displayed as is on the

screen.

So not sure how the field name could be displayed here if I am not

using

REFFLD and Functions.in the DDS of display file.

Thanks

--
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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305641430%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=uQtBpwiMpymbbLAFHABSnw4A3%2FzmdZgdSNWUNdvZV3s%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305641430%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=gQFvy841g2pjIH9nEOhFbI%2BNSLI%2BtdtVZ3kpUhoK4dI%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305641430%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=ieIbdICg%2FKysHHJDiBLAXTuqcdSdlW669TT4plWBmAU%3D&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://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Flists.midrange.com%2Fmailman%2Flistinfo%2Frpg400-l&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305641430%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=uQtBpwiMpymbbLAFHABSnw4A3%2FzmdZgdSNWUNdvZV3s%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305641430%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=gQFvy841g2pjIH9nEOhFbI%2BNSLI%2BtdtVZ3kpUhoK4dI%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305641430%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=ieIbdICg%2FKysHHJDiBLAXTuqcdSdlW669TT4plWBmAU%3D&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://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Flists.midrange.com%2Fmailman%2Flistinfo%2Frpg400-l&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=lLPWjmF2nhUs5CKwNmuk%2B0Ff1g6jLx4k8ZnWVwx2Eng%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=mUj9xKCf5mfYRlEz%2F3%2F05NfPbf1QGJQ0Ad0Ii6e%2BfkQ%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=z2P3RMUCmO5ucECTNeo3%2FGBcYukgANkKfnP%2F9ZvAsfU%3D&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://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Flists.midrange.com%2Fmailman%2Flistinfo%2Frpg400-l&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=lLPWjmF2nhUs5CKwNmuk%2B0Ff1g6jLx4k8ZnWVwx2Eng%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=mUj9xKCf5mfYRlEz%2F3%2F05NfPbf1QGJQ0Ad0Ii6e%2BfkQ%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=z2P3RMUCmO5ucECTNeo3%2FGBcYukgANkKfnP%2F9ZvAsfU%3D&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://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Flists.midrange.com%2Fmailman%2Flistinfo%2Frpg400-l&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=lLPWjmF2nhUs5CKwNmuk%2B0Ff1g6jLx4k8ZnWVwx2Eng%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=mUj9xKCf5mfYRlEz%2F3%2F05NfPbf1QGJQ0Ad0Ii6e%2BfkQ%3D&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&data=05%7C01%7C%7C9fe3f9b343a54bcfc74608da6f3f2954%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637944614305797642%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=z2P3RMUCmO5ucECTNeo3%2FGBcYukgANkKfnP%2F9ZvAsfU%3D&reserved=0