progress 4GL / ABL 如何将字符串“July 24 2015”转换为#06/24/2015#日期(TS)？

Question

我有类似的字符串

"July 24 2015"

是否可以将其转换为日期（TS）数据类型？

它会转换为类似 mm/dd/YYYY

"07/24/2015 00:00:00.000"

我可以用progress 4GL 做到这一点吗？

谢谢你

Answer 1

define variable inputString as character no-undo.
define variable monthList   as character no-undo.

monthList = "January,February,March,April,May,June,July,August,September,October,November,December".

update inputString format "x(30)".

display datetime( date(
  lookup(  entry( 1, inputString, " " ), monthList ),
  integer( entry( 2, inputString, " " )),
  integer( entry( 3, inputString, " " ))
)).

Answer 2

Thank you for the code. 
A different version. 
define variable inputString as character no-undo.
define variable monthList   as character no-undo.

monthList = "Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Oct,Nov,Dec".

//update inputString format "x(30)".
inputString = "17-Aug-2022".


display datetime( date(
  lookup(  entry( 2, inputString, "-" ), monthList ),
  integer( entry( 1, inputString, "-" )),
  integer( entry( 3, inputString, "-" ))
)).