× 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: I am short of Indicators
  • From: Dave Mahadevan <mahadevan@xxxxxxxx>
  • Date: Tue, 18 May 1999 21:34:49 -0400
  • Organization: Stoner and Associates

Use the program to system field.  See the DDS manual.  Here is an excerpt.

Figure 3-67 shows how to specify the DSPATR keyword with P-field usage:


  
|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
       A          R RECORD                   2DSPATR(&PFLD1)
       A            FLD1           5A     2  6DSPATR(&PFLD2)
       A            FLD2           5A     2  6DSPATR(&PFLD2)
       A            PFLD1          1A  P
       A            PFLD2          1A  P
       A

You can now pass the display attribute in the field PFLD1 to control FLD1 and 
PFLD2
to control FLD2.  For example to highlight and blink, you will set PFLD1 to 
X'2A'
and if you also want to protect the field besides highlighting and blinking you 
will
set PFLD1 to X'AA'.  You can also pass color attributes.  Please refer to the 
DDS
manual for all combinations of display attributes such as rev image, hi 
intensity,
underline, protect, blink, colors etc.   Only drawback with display attribute 
is you
cannot position cursor on the field.  You can use program to system field and
indicators together.

Rajeev Asthana wrote:

> Hi All,
>
> It happens everytime.
> My application uses almost every indicator from 01 to 99. These indiactors are
> basically used to condition various display attributes of the display files'
> fields.
> Now when I go to add a new field or add some more display attribute to an
> existing field, I find that I have already used up all the indicators, nothing
> is left.
> Then I go and put lots of Or/And conditions for the indiactors.
> But this is not a clean way.
> Can anybody tell me if there is a better way to do this?
>
> (Day dreaming : - AS/400 guys at IBM has increased Indiacator length from 2 
>to 3
> thus increasing the indicators from 001 to 999)
>
> Thanks,
> Rajeev.
>
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
> * This is the RPG/400 Discussion Mailing List!  To submit a new         *
> * message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
> * from this list send email to MAJORDOMO@midrange.com and specify       *
> * 'unsubscribe RPG400-L' in the body of your message.  Questions should *
> * be directed to the list owner / operator: david@midrange.com          *
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

--
Thank You.

Regards

Dave Mahadevan.. mailto:mahadevan@fuse.net


* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


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.