MIDRANGE dot COM Mailing List Archive



Home » MIDRANGE-L » September 2005

Re: EDTMSK and EDTWRD ?



fixed

If a subsequent programmer changes the user-defined edit code then your shop
has other problems. 
 
---------------------------------
Booth Martin
http://www.martinvt.com
---------------------------------
-------Original Message-------
 
From: Midrange Systems Technical Discussion
Date: 09/13/05 13:04:48
To: midrange-l@xxxxxxxxxxxx
Subject: Re: EDTMSK and EDTWRD ?
 
Ok, If I define my Edit Code in QEDIT5 - QEDIT9, and then after sometime,
any other programmer change the QEDIT5 again as per his requirement, my
program will be collapsed, so I am looking for the alternate to using
QEDIT5-QEDIT9 ?
 
My current requirement is to display '01-01' and I tried using :
EDTWRD :-  '0  -  '
EDTMSK:-   '  & '
 
And passed an Integer value of: 101 to the DDS, it displayed as :  1-01,
while I need it to be : 01-01
 
I tried using Right Justified Zero Fill Option of SDA, but it says, cannot
use this option with EDTWRD/EDTMSK.
 
Any idea please or alternate to display 101 as 01-01 ?
 
Best Regards,
 
Luqman
 
 
 
 
 
<mlazarus@xxxxxxxx> wrote in message
news:380-220059112143230552@xxxxxxxxxxxxxxxxxxxxxx
> Rob,
>
> User defined edit codes are (UDECs) used at compile time, no runtime.  So,
> unless you're modifying the vendor's code, it's not a big deal.
>
> There are other issues w/ UDECs, such as there are a very limited
> quantity, they system wide, etc.
>
> But is still doesn't address the original question, which is how to define
> a screen so that the special characters are embedded in the field, but
> skipped over, so that they don't have to be keyed by the user and will
> still be displayed?  I that that the standard edit codes should do the
> trick, instead of using EDTWRD, use EDTCDE.
>
> -mark
>
> Original Message:
> -----------------
> From:  rob@xxxxxxxxx
> Date: Mon, 12 Sep 2005 09:04:58 -0500
> To: midrange-l@xxxxxxxxxxxx
> Subject: Re: EDTMSK and EDTWRD ?
>
>
> I think many shops are loath to use user defined edit codes.  Just imagine
> if vendors used them, and you had two different vendor packages that
> defined them differently.  Egads!  Based on that, you might be able to
> assume that no sane vendor would use them and, thus, you could use them
> for custom software.  So, is that a 180 degree turn or not?
>
> Rob Berendt
> --
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
>
>
>
>
>
> "Booth Martin" <booth@xxxxxxxxxxxx>
> Sent by: midrange-l-bounces@xxxxxxxxxxxx
> 09/11/2005 06:47 PM
> Please respond to
> Midrange Systems Technical Discussion
> <midrange-l@xxxxxxxxxxxx>
>
>
> To
> "Midrange Systems Technical Discussion"
> <midrange-l@xxxxxxxxxxxx>
> cc
>
> Subject
> Re: EDTMSK and EDTWRD ?
>
>
>
>
>
>
> Here is a paragraph from the dds manual that might point to a way?  I've
> done this once, a long time ago, and all I remember is that it worked for
> the problem I had then, whatever that was.
>
>
>
>
>
> User-defined edit codes:
>
> Edit codes 5 through 9 are user-defined edit codes. A user-defined edit
> code
> can do more editing than an OS/400 edit code. For example, you may need to
> edit numbers that include hyphens (such as telephone numbers) or more than
> one decimal point. You can use user-defined edit codes for these
> functions.
> These edit codes are named QEDIT5, QEDIT6, QEDIT7, QEDIT8, and QEDIT9, and
> can be referred to in DDS or a high-level language program by number (5,
> 6,
> 7, 8, or 9).
>
>
>
>
>
> ---------------------------------
>
> Booth Martin
>
> http://www.martinvt.com
>
> ---------------------------------
>
> -------Original Message-------
>
>
>
> From: Midrange Systems Technical Discussion
>
> Date: 09/11/05 13:03:42
>
> To: midrange-l@xxxxxxxxxxxx
>
> Subject: Re: EDTMSK and EDTWRD ?
>
>
>
> Its correct, if I put '0' in 1st position of edtwrd, then the literals or
>
> dashes displayed, otherwise not, although the protected spaces work.
>
>
>
> Is there any way, to display the dashes without any values.
>
>
>
> Best Regards,
>
>
>
> Luqman
>
>
>
>
>
>
>
>
>
>
>
> "M. Lazarus" <mlazarus@xxxxxxxx> wrote in message
>
> news:6.1.2.0.2.20050911122128.06e55710@xxxxxxxxxxxxxxxx
>
>>  I think that it should look something like this:
>
>> EDTWRD('0  /  / ')
>
>> EDTMSK('  &  &  ')
>
>>
>
>>  If your workstation controller supports the masking feature, the cursor
>
>> should automatically skip over the slashes.
>
>>
>
>>  -mark
>
>>
>
>> At 9/9/05 07:08 PM, you wrote:
>
>>>Luqman,
>
>>>
>
>>>I use the wrd/msk combination for dates and discovered that if the field
>
>>>already has a value the dashes are shown and protected.  An empty field
>
>>>does not show the dashes.  I think that this is a result of the zero
>
>>>suppression in the EDTWRD('  /  / 0')
>
>>>
>
>>>hth
>
>>>
>
>>>Luqman wrote:
>
>>>
>
>>>>Using EDTMSK and EDTWRD keywords did this, but SDA not displaying the
>
>>>>Dashes, just protecting the places where Dashes are placed, how can I
>
>>>>display the Dashes ?
>
>>>>
>
>>>>Best Regards,
>
>>>>
>
>>>>Luqman
>
>
>
> --------------------------------------------------------------------
> mail2web - Check your email from the web at
> http://mail2web.com/ .
>
>
>
> --
> 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.
 
.





Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2014 by MIDRANGE dot 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 here. If you have questions about this, please contact