Re: Protecting part of a field

The key is 15 it is a 'catch all' I mean a Control file.
I was just wondering how to do this, in one field (full) on the screen if
possible.

> Why don't you show them the 12 "fixed" digits in an output only field,
> then
> have a len 3 field for the remaining digits.  inside the program, use a
> len
> 12 constant, plus the 3 digit input field, to populate the final result.
>
> Wait... you said len=15, with 9 protected, 3 user-input... Where do the
> other three come from?
>
> On 1/12/06, steema@xxxxxxxxxxxxx <steema@xxxxxxxxxxxxx> wrote:
>>
>> Yeah it's q a 15 position key field. So I am looking for something
>> fancy.
>>
>> > Really I don't see the problem.  Prompt them for a 3 positions and go
>> from
>> > there, unless your question is how do you do this on the screen
>> > Enter in item number . . :  ooooooooobbbooo
>> > where ooo... is output only and bbb is input/output.  Then you are in
>> a
>> > pickle.  Because, yes, you do have to make this three fields and I
>> believe
>> > a space is needed between the fields.  But you're talking to someone
>> who's
>> > done 1 screen in several years.  A real propeller head might be able
>> to
>> > use some dynamic screen api or some such thing to do it an alternative
>> way
>> > - I don't know.
>> >
>> > Rob Berendt
>> > --
>> > Group Dekko Services, LLC
>> > Dept 01.073
>> > PO Box 2000
>> > Dock 108
>> > 6928N 400E
>> > Kendallville, IN 46755
>> > http://www.dekko.com
>> >
>> >
>> >
>> >
>> >
>> > steema@xxxxxxxxxxxxx
>> > Sent by: rpg400-l-bounces@xxxxxxxxxxxx
>> > 01/12/2006 03:40 PM
>> > Please respond to
>> > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
>> >
>> >
>> > To
>> > "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
>> > cc
>> >
>> > Fax to
>> >
>> > Subject
>> > Protecting part of a field
>> >
>> >
>> >
>> >
>> >
>> >
>> > Hello,
>> > I have a field len=15, that I have to pre-fill so that the user only
>> has
>> > to key in 3 positions of this. I would like to protect the first 9
>> > positions of this, so that they don't overwrite it by accident or
>> design.
>> >
>> > Do I make this field into 2 or actually 3 fields, or is there a more
>> > elegant way to this?
>> >
>> > Thanks,
>> > Steve
>> > --
>> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
>> list
>> > To post a message email: RPG400-L@xxxxxxxxxxxx
>> > To subscribe, unsubscribe, or change list options,
>> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
>> > or email: RPG400-L-request@xxxxxxxxxxxx
>> > Before posting, please take a moment to review the archives
>> > at http://archive.midrange.com/rpg400-l.
>> >
>> >
>> > --
>> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
>> list
>> > To post a message email: RPG400-L@xxxxxxxxxxxx
>> > To subscribe, unsubscribe, or change list options,
>> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
>> > or email: RPG400-L-request@xxxxxxxxxxxx
>> > Before posting, please take a moment to review the archives
>> > at http://archive.midrange.com/rpg400-l.
>> >
>> >
>>
>> --
>> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
>> list
>> To post a message email: RPG400-L@xxxxxxxxxxxx
>> To subscribe, unsubscribe, or change list options,
>> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
>> or email: RPG400-L-request@xxxxxxxxxxxx
>> Before posting, please take a moment to review the archives
>> at http://archive.midrange.com/rpg400-l.
>>
>>
>
>
> --
> "Enter any 11-digit prime number to continue..."
> "In Hebrew SQL, how do you use right() and left()?..." - Random Thought
> "If all you have is a hammer, all your problems begin to look like nails"
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>