MUSING Example


Example:

 

 

MDELM

" "

 

MMODE

BLANKON

$TestMacro

MACRO

&P1="",&P2=""

  

%IF

MUSING(&P1)

  

DISPLAY

"P1 is specified as 'using'"

  

%IF

MNULL(&P2)

  

Parameter Error... Second parameter is required!

 

%ELSE

 

 

DISPLAY

"P2 has been specified as a parameter"

  

%ENDIF

 

.

 

 

  

%ELSE

 

.

 

 

  

DISPLAY

"P1 is NOT specified as 'using'"

.

 

 

  

%ENDIF

 

.

 

 

  

MEND

 

.

 

 

...........................................................

 

$TestMacro

 

...........................................................

 

$TestMacro

using

...........................................................

 

$TestMacro

using "second"

 

 



PL/B Language Reference