~set('day_array',~mb_split(',','dim,lun,mar,mer,jeu,ven,sam')) ~set('month_array',~mb_split(',',',janvier,février,mars,avril,mai,juin,juillet,août,septembre,octobre,novembre,décembre')) ~set('day',~get_filenamevar(1)) ~set('month',~get_filenamevar(2)) ~set('year',~get_filenamevar(3)) ~cal(~get('day'),~get('month'),~get('year'), 'HD','
~get('month_array[~cal_fld('curmonth')]') ~cal_fld('curyear') |