function str2time returns integer ( input st as character ):
define variable t as integer no-undo.
define variable n as integer no-undo.
n = num-entries( st, ":" ).
assign
t = ? when n < 1
t = ( t + integer( entry( 1, st, ":" )) * 3600 ) when n >= 1
t = ( t + integer( entry( 2, st, ":" )) * 60 ) when n >= 2
t = ( t + integer( entry( 3, st, ":" )) * 1 ) when n = 3
.
return t.
end.
display string( str2time( "10:30:15" ), "hh:mm:ss" ).