RE: MCH1201 (Rcvr too small) on an _if_ statement???

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Walden H. Leverich
Sent: Monday, July 28, 2008 10:33 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: MCH1201 (Rcvr too small) on an _if_ statement???

what value did Pet_Name_Ind have in it on error

Unknown. No dump was taken. But given that it's a 2B0, is there any
value that would be "invalid"? We can't think of one.

Actually there are lots of invalid values for a 2B0 varible.

2b0 is treated as 4b0 (two bytes), and 4b0 is _NOT_ the same as 5i0 (two bytes).

5i0 has a range, -32768 to 32767
4b0 has a range, -9999 to 9999.

From the manual:
"If the length of the field is from one to four digits, the compiler assumes a binary field length of
2 bytes."

"the highest decimal value that can be assigned to a 2-byte binary field is 9999"

Should have said this before, Pet_name_ind is the null indicator (select
into :hostvar:nullind) from a sql statement.

I wouldn't expect to see garbage in it.

While the manual does say to use 2b0, does 5i0 work?

It's been a while since I needed the null indicator, but I don't recall needed the binary data type.
My understanding is that anyplace Binary is used, Integer will work.


Charles



This e-mail transmission contains information that is intended to be confidential and privileged. If you receive this e-mail and you are not a named addressee you are hereby notified that you are not authorized to read, print, retain, copy or disseminate this communication without the consent of the sender and that doing so is prohibited and may be unlawful. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please delete and otherwise erase it and any attachments from your computer system. Your assistance in correcting this error is appreciated.