
Assuming thishours is required, the following result was found.
} strVal= ThisDays:=val / 86400 IfInString, ThisDays, . ThisDays:=SubStr(ThisDays, 1, InStr(ThisDays, ".")-1) ThisHours:=(Mod(val, 86400)/3600) IfInString, ThisHours, . ThisHours:=SubStr(ThisHours, 1, InStr(ThisHours, ".")-1) ThisMins:=(Mod(val,...

bc1qf6elrdxc968h0k673l2djc9wrpazhqtxw8qqp4
0xb038962F3809b425D661EF5D22294Cf45E02FebF