RE: How to return null on a PI -- RPG400-L

Hi

The null value is an indicator that can be set for a database field
indicating that this field has got no value in it. *null is not a value. It
is the absence of a value in a database field.

So by definition, a null value can not be passed. Theoretically, to pass a
"null" value is like saying "I will not pass anything back", which is not
the intention because you want to tell the calling program that you did get
an invalid string.

Tilo von Brandis
Manager, IT
SAFAIR (PTY) Ltd
Tel   : +27 (011) 928 0043
Cell  : +27 (083) 675 7778


-----Original Message-----
From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx] 
Sent: 15 January 2004 03:34
To: RPG programming on the AS400 / iSeries
Subject: RE: How to return null on a PI

There's a difference between loval and null.  It really processes 
different.

Rob Berendt
-- 
"All creatures will make merry... under pain of death."
-Ming the Merciless (Flash Gordon)




darryl.mavin@xxxxxxxxxxxxxx 
Sent by: rpg400-l-bounces+robÞkko.com@xxxxxxxxxxxx
01/15/2004 05:41 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
rpg400-l@xxxxxxxxxxxx
cc

Fax to

Subject
RE: How to return null on a PI






I haven't tried this myself but couldn't you just return x'00'

-----Original Message-----
From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx]
Sent: 14 January 2004 21:56
To: RPG400-L@xxxxxxxxxxxx
Subject: How to return null on a PI


     P STRIPEMAIL      B                   export
     D STRIPEMAIL      PI                  like(EmailAddress)
     D  SourceString                512a   const

How do I return *null?  For example, they pass me a bad string in which I 
cannot find what I am looking for.  I'd like to return *null.  Possible? 
If so, how?

Rob Berendt
-- 
"All creatures will make merry... under pain of death."
-Ming the Merciless (Flash Gordon)
_______________________________________________
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.


----------------------------------------------------------------------------
--
The opinions expressed within this email represent those of the
individual and not necessarily those of Gullivers Travel Associates (GTA).

This email and any files transmitted with it are confidential and intended 

solely for the use of the individual or entity to whom they are addressed.
If you have received this email in error please notify 
postmaster@xxxxxxxxxxxxxxx

Should you wish to use email as a form of communication, GTA are unable to
guarantee the security of email content outside of our own computer 
systems.



________________________________________________________________________
This email has been scanned for all viruses by the MessageLabs Email
Security System. For more information on a proactive email security
service working around the clock, around the globe, visit
http://www.messagelabs.com
________________________________________________________________________
_______________________________________________
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.
_______________________________________________________________________

Disclaimer and confidentiality note

Everything in this e-mail and any attachments relating to the official
business of SAFAIR (PTY) Ltd is proprietary to the company.  It is
confidential, legally privileged and protected by law.  SAFAIR does not
own and endorse any other content.  Views and opinions are those of the 
sender unless clearly stated as being that of SAFAIR.

The person addressed in the e-mail is the sole authorized recipient.
Please notify the sender immediately if it has unintentionally reached
you and do not read, disclose or use the content in any way.

SAFAIR can not assure that the integrity of this communication has
been maintained nor that it is free of errors, viruses, interception or
interference.

You must scan this email and any attached files for viruses and/or any 
other defects. Safair accepts no liability for any loss, damage or 
consequence, whether direct, indirect, consequential or economic, however 
caused, and whether by negligence or otherwise, which may result directly 
or indirectly from this communication or of any attached files. 

_______________________________________________________________________