SCRSIZE.REX: Difference between revisions

Move to REXX library routines category
m (Added a link to the HELP for this REXX program. -- ~~~~)
(Move to REXX library routines category)
Line 150:
shorten:procedure;parse arg a,n;return left(a,max(0,length(a)-p(n 1)))
syntax:!sigl=sigl;call er 13,!fid(2) !fid(3) !sigl !cal() condition('D') sourceline(!sigl)</lang>
 
[[Category:REXX library routines]]
10,327

edits