5 lines
223 B
Text
5 lines
223 B
Text
|
Dcl s Char(10) Varying;
|
||
|
|
s = ''; /* assign an empty string to a variable. */
|
||
|
|
if length(s) = 0 then ... /* To test whether a string is empty */
|
||
|
|
if length(s) > 0 then ... /* to test for a non-empty string */
|