× 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.



Maybe after you have had your second cup of coffee you should give my
program a try. Even though FLD0001, FLD0002, FLD003, FLD004 are defined
as a (B)oth field in column 38 the I in column 35 Inhibits Keyboard entry.
When executing my sample program you will see that you can tab into the
FLDxxx fields but are unable to enter any data. So, to answer your
question if you changed the first field in your subfile to a (B)oth field
in col 38 and I in col 35 and specified the ENTFLDATR keyword it will
provide what I believe you are asking for.




From: Alan Shore <AlanShore@xxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Cc: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>,
midrange-l-bounces@xxxxxxxxxxxx
Date: 02/25/2010 07:48 AM
Subject: Re: Tabbing to a field defined as output on a subfile
display
Sent by: midrange-l-bounces@xxxxxxxxxxxx




Thanks for your reply
Maybe its too early in the morning, or not enough coffee or me just being
my usual dense self, but what is it that will give me what I am asking for
If its the ENTFLDATR, this will NOT give me the ability to tab down to a
field that is defined as output.
If you read my original e-mail, ALL the fields on the sub file are defined
as output, so unless someone knows of a neat trick, there is no way to tab
down to the first field of each successive line
However, I did a search on ENTFLDATR and came up with (amongst others) the
following web site
http://www.mcpressonline.com/programming/rpg/tips-and-techniques-entfldatr.html


DEFINITELY worth remembering



Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill



mgarrison@werner.
com
Sent by: To

midrange-l-bounce Midrange Systems Technical
s@xxxxxxxxxxxx Discussion
<midrange-l@xxxxxxxxxxxx>
cc

02/24/2010 06:07
PM Subject

Re: Tabbing to a field defined as
output on a subfile display
Please respond to
Midrange Systems
Technical
Discussion
<midrange-l@midra
nge.com>






Alan,
Please see sample DSPF and RPGLE code below that may accomplish what you
are asking for. Hopefully it helps.

DSPF

A DSPSIZ(24 80 *DS3)
A INDARA
A CA03(03 'EOJ')
A*¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
A*? MAIN SUBFILE
A*_______________________________________________________________
A R MAINS1 SFL
A SELECTFLD 1 B 5 2
A 5 5'Sfl Rcd#'
A MAINS1RRN 4Y 0O 5 14EDTCDE(Z)
A FLD001 10I B 5 20CHGINPDFT
A ENTFLDATR((*DSPATR HI RI))
A FLD002 10I B 5 32CHGINPDFT
A ENTFLDATR((*DSPATR HI RI))
A FLD003 10I B 5 44CHGINPDFT
A ENTFLDATR((*DSPATR HI RI))
A FLD004 10I B 5 56CHGINPDFT
A ENTFLDATR((*DSPATR HI RI))
A*¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
A*? MAIN SUBFILE CONTROL
A*_______________________________________________________________
A R MAINC1 SFLCTL(MAINS1)
A OVERLAY
A 28 SFLDSP
A 28 SFLDSPCTL
A N28 SFLCLR
A SFLSIZ(0019)
A SFLPAG(0017)
A 4 2'S'
A DSPATR(UL)
A 4 5'Sfl Ctl Rcd '
A DSPATR(UL)
A 4 20'Field 1 '
A DSPATR(UL)
A 4 32'Field 2 '
A DSPATR(UL)
A 4 44'Field 3 '
A DSPATR(UL)
A 4 56'Field 4 '
A DSPATR(UL)

RPGLE

F#TESTDSPF cf e workstn indds(IndDs)
F sfile(MainS1:MainS1Rrn)

D IndDsPtr s * inz(%addr(*in))
D IndDs ds based(IndDsPtr)
D dspMainSfl n overlay(IndDs:28)

D SflFields ds
D FLD001 inz('Field 1')
D FLD002 inz('Field 2')
D FLD003 inz('Field 3')
D FLD004 inz('Field 4')

D MainS1Rrn s 4 0

/free
dspMainSfl = *on;

for MainS1Rrn = 1 to 25;
write MainS1;
endfor;

exfmt MainC1;

*inlr = *on;
return;
/end-free




From: Alan Shore <AlanShore@xxxxxxxx>
To: midrange-l@xxxxxxxxxxxx
Date: 02/24/2010 03:57 PM
Subject: Tabbing to a field defined as output on a subfile display
Sent by: midrange-l-bounces@xxxxxxxxxxxx






__________________

Good afternoon everyone

I have built a subfile display that ALL the fields are output only
Each line contains a number of different field

FieldA FieldB FieldC
FieldD

that are repeated a number of times (with differing values) on the screen
What I would like to do is start at the first line on FieldA, and then Tab
down to the next FieldA, then Tab down to the next FieldA (in this
instance
- 3rd line)
As ALL of these fields are output only, how can this be achieved.

Thanks in advance
As always - any and all help MUCH appreciated




Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.


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


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
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.