ML
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Mark Johnson
Sent: Saturday, June 18, 2005 7:56 AM
To: [email protected]
Subject: Re: [U2] OCONV of no affect.
I'm not looking for a programming alternate or suggestions. Just a
null conversion.
I didn't invent this situation. It's just one of the zillions of
examples that I inherit with my client's systems.
Under certain circumstances, a single data field contains multiple
types of data. This may be dependent on another field.
Thus, code like this exists:
IF REC<5>="N" THEN
PRINT OCONV(REC<6>,"MD2")
END ELSE
PRINT REC<6>
END
Sometimes both have a conversion and I do this to save typing lines:
IF REC<5>="N" THEN CONV="MD2" ELSE CONV="D2/"
PRINT OCONV(REC<6>,CONV)
So I was wondering if this 2 line example could apply to the first
example.
Thanks in advance.
(P.S. I wonder how off-topic or deviated this thread will go. I'm just
looking for a null conversion)
----- Original Message -----
From: "Stevenson, Charles" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Saturday, June 18, 2005 2:43 AM
Subject: RE: [U2] OCONV of no affect.
> OK, I'll bite.
> How does one find a situation where one wants this?
> From: Mark Johnson
> > Is there an OCONV method that does nothing, ie IF
> > X=OCONV(X,CONV) THEN TRUE.
> >
> > I've had a situation where I could use this before and one crept
up
> > today.
>
> How does one find MORE THAN ONE situation where one wants this?
>
>
> How about if YOUR CONV variable is an empty string?
> I *think* that for all X, ( X EQ OCONV( X, '' ) ) will evaluate to
> true.
>
>
> If that isn't the case, you could write your own "user exit":
>
> SUB DONOTHING( STR.OUT, STATUS.OUT, STR.IN, I.OR.O.IGNORE )
> STATUS.OUT = 0
> STR.OUT = STR.IN
> RETURN
>
> CATALOG BP $DONOTHING (ideal-flavor cataloguing, not pick-flavor)
>
> ( X EQ OCONV( X, 'UDONOTHING' ) ) will always be true.
> -------
> u2-users mailing list
> [email protected]
> To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.323 / Virus Database: 267.7.7/20 - Release Date:
6/16/2005
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.323 / Virus Database: 267.7.7/20 - Release Date:
6/16/2005
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/