Re: Checking for missing parameters in CL

[Paul Therrien <paultherrien@xxxxxxxxxxxxxxxxxx>]

+1

Paul   

On 2018-01-31 11:38, David Gibbs wrote:

> 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!