D ZZINH S 132A
D ZZLAEN S 3S 0
D ZZINHZ S 132A
/free
//
ZZINH = 'abc';
ZZLAEN= 20;
//
%subst(ZZINH:1:ZZLAEN);
%len((ZZLAEN)/2)-2;
return;
/end-free

Das war jetzt irgendwie mein Grundgedanke, hänge mit meine Gedanken aber immer mehr und drehe mich im kreis

wobei das len eben nur aus verzweiflung dazu kam und es keinerlei sinn dort macht ^^