DEFINE VARIABLE lvcValue AS CHARACTER NO-UNDO.


lvcValue = ENTRY ( 2,
                       STRING ( sent, "99-99-9999 HH:MM:SS.SSS+HH:MM" ),
                       " "
               ).

lvcValue = REPLACE ( sent, ",", "." ).

lvcValue = STRING ( YEAR  ( sent ), "9999" )
         + "-"
         + STRING ( MONTH ( sent ), "99"   )
         + "-"
         + STRING ( DAY   ( sent ), "99"   )
         + "T"
         + lvcValue.