ca.portal.admin

Programming Question/ Bug?

Discussion created by ca.portal.admin on Aug 22, 2007
One of my programmers asked me this question. I am not sure why this
happens.

Field P-INVOICE-NO is defined as Pic X(14). Code in the ADS program
checks if the field contains zeros using any of the following lines of
code:

IF P-INVOICE-NO OF IAVMRPPV = 0
IF P-INVOICE-NO OF IAVMRPPV = ZEROS
IF P-INVOICE-NO OF IAVMRPPV = ZEROES

If the field is all zeroes, it executes an error message, as it should.
But if the field is changed to 0A (or any 0 and alpha combo) and enter
is pressed - the screen does not recognize that the field now contains
something other than 0, or zeros, or zeroes and still produces the error
message. This is happening in programs that are recently changed. We are
running IDMS V16.0 Service Pack 4.

I have searched Support Connect and have found no mention of such a
problem. Has anyone heard of or experienced this? How did you fix it?
The programmer got around this by checking for 0 in every position of
the field, but the code above is used in several of our programs and has
us concerned.

Thanks for your help.
Petra
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: Programming Question/ Bug?
"I can't believe what I am seeing re this 0C4 abend. There is a
secondary code that is issued with the abend that will narrow down the
cause of the problem. While it will not tie down the error in its
entirety, why has no one asked for this code before. Where the heck are
the experts here. This looks like a bunch of chickens.

Please publish the full error code, and we can provide more
advice/solutions that are relevant to the problem.

Vince Jensen
Alberta Health

Outcomes