$JOB
$!	STESTF - Test String Formatting
$!
$!	STESTF: Test conversion for all radices
$RUN stestf
$DAT

abcdefg
12
abcdefg
25
grundoon
$EOD
$!	STESTF: Test error recovery
$RUN stestf
$DAT
10
This string is too long
$EOD
$!	STESTF: Testing complete
$EOJ