Date conversion script problem under ROS 7.xx

Could anyone help me to convert script to ROS 7.xx format? It was very dood working script under ROS 6.x:

:local curDate [/system clock get date]
:local curTime [/system clock get time]
:local systemName [/system identity get name]
:local curMonth [:pick $curDate 0 3]
 :set curMonth ( [ :find key="$curMonth" in="jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec" from=-1 ] / 4 + 1)
 if ( $curMonth < 10 ) do={
  :set curMonth ( "0".$curMonth )
 } else={
  :set curMonth $curMonth
 }
:local curDay   [:pick $curDate 4 6]
:local curYear  [:pick $curDate 7 13]
:local curHour  [:pick $curTime 0 2]
:local curMin   [:pick $curTime 3 5]

:local filename ("$systemName"."-"."$curYear"."$curMonth"."$curDay" ."-"."$curHour"."$curMin")

Then it was saving file woth format: 20250111-0735

Lazyness…

/system identity
:local systemName [get name]
/system clock
:local curDate    [get date]
:local curTime    [get time]
:local curYear  [:pick $curDate 0  4]
:local curMonth [:pick $curDate 5  7]
:local curDay   [:pick $curDate 8 10]
:local curHour  [:pick $curTime 0  2]
:local curMin   [:pick $curTime 3  5]

:local filename ("$systemName-$curYear$curMonth$curDay-$curHour$curMin")

Works great! Thank You!