Re: Checking for missing parameters in CL

Folks:

I just discovered this and thought I would share ... not sure if it's already been discussed or if it's common knowledge. :)

I have a CL Bound program that I wanted to have an optional parameter.

I know I could create a command for the CL and the default for a unspecified parameter would, but this wasn't warranted for the particular change I was making.

I know, in RPG, you can specify *OMIT on parameters that have the OPTION(*OMIT) modifier ... and you check to see if the address of the parameter is null.

So I tried something similar in CL...

pgm (&parm1)

dcl &parm1 *char (10)

dcl &p1addr *ptr

chgvar &p1addr (%address(&parm1))

if (&p1addr = *null) then(do)
/* do something if parameter wasn't specified */
enddo
else do
/* do something else if the parameter was specified */
endpgm

So far it seems to work as I expect.

david

--
IBM i on Power Systems: For when you can't afford to be out of business!

I'm riding 615 miles (Yes, you read that right) in the American Diabetes Association's Tour de Cure to raise money for diabetes research, education, advocacy, and awareness. You can make a tax deductible donation to my ride by visiting https://mideml.diabetessucks.net.

You can see where my donations come from by visiting my interactive donation map ... https://mideml.diabetessucks.net/map (it's a geeky thing).

I may have diabetes, but diabetes doesn't have me!