如果这表明
If this then show that
我正在从 AS400 中提取数据,我的日期格式是 CYYMMDD,所以我使用以下方法转换了数据:
Local StringVar x := ToText({SMPWAYB.WBSHPD}, "0");
Local NumberVar c := (ToNumber(LEFT(x, 1)) + 1) * 10;
x := RIGHT(x, 6);
Local NumberVar y := ToNumber(ToText(c, "0") & LEFT(x, 2));
x := RIGHT(x, 4);
Local NumberVar m := ToNumber(LEFT(x, 2));
x := RIGHT(x, 2);
Local NumberVar d :=ToNumber(x);
Dateserial(y,m,d)
如果字段中没有日期值,则显示 0.00,转换后显示 11/30/99。
我想保留日期转换但如果日期是 11/30/99 则显示 N/A。如何将其添加到我的公式中?
在最后添加:
if Dateserial(y,m,d) = CDate("11/30/99")
then "NA"
else ToText(Dateserial(y,m,d))
我正在从 AS400 中提取数据,我的日期格式是 CYYMMDD,所以我使用以下方法转换了数据:
Local StringVar x := ToText({SMPWAYB.WBSHPD}, "0");
Local NumberVar c := (ToNumber(LEFT(x, 1)) + 1) * 10;
x := RIGHT(x, 6);
Local NumberVar y := ToNumber(ToText(c, "0") & LEFT(x, 2));
x := RIGHT(x, 4);
Local NumberVar m := ToNumber(LEFT(x, 2));
x := RIGHT(x, 2);
Local NumberVar d :=ToNumber(x);
Dateserial(y,m,d)
如果字段中没有日期值,则显示 0.00,转换后显示 11/30/99。
我想保留日期转换但如果日期是 11/30/99 则显示 N/A。如何将其添加到我的公式中?
在最后添加:
if Dateserial(y,m,d) = CDate("11/30/99")
then "NA"
else ToText(Dateserial(y,m,d))