u5070 user exit

The u5070 user exit converts a string to the form: string[1,3]: "-000"

It strips all but the first three characters, and then appends the literal -000 to the end.

If the string is less than three characters long, then it is returned untouched.

Syntax

u5070, string

Example(s)

Returns "abc-00".

string = "abcdef"
u5070,string