Hi,
I'm trying to play with free format select statement. I can't find out what I'm missing here:
/Free
Select Case Zter ;
==> aaaa
5507 30 a 001039 A semi-colon is not specified at the end of a free-form specification.
When '8' ;
Then ;
Zterm='0045' ;
Zbd1t='45' ;
.
.
EndSl ;
/End-free
I'm trying to play with free format select statement. I can't find out what I'm missing here:
/Free
Select Case Zter ;
==> aaaa
5507 30 a 001039 A semi-colon is not specified at the end of a free-form specification.
When '8' ;
Then ;
Zterm='0045' ;
Zbd1t='45' ;
.
.
EndSl ;
/End-free