SCL代码如下：

// 读取本地时间

#RET_VAL := RD_LOC_T(OUT => #locTime);

// 2. 闰年判断

IF (#locTime.YEAR MOD 4 = 0) AND (#locTime.YEAR MOD 100 <> 0) OR (#locTime.YEAR MOD 400 = 0) THEN

    #IsLeapYear := TRUE;

    #monthDays[2] := 29;

ELSE

    #IsLeapYear := FALSE;

    #monthDays[2] := 28;

END_IF;

// 3. 计算第几天

#NrOfDay := 0;

IF #locTime.MONTH > 1 THEN

    FOR #i := 1 TO #locTime.MONTH - 1 DO

        #NrOfDay := #NrOfDay + #monthDays[#i];

    END_FOR;

END_IF;

#NrOfDay := #NrOfDay + #locTime.DAY;

#Valid := TRUE;

程序截图：

背景DB：

计算结果 本地时间2025.11.26日 Julien Date=330