问题解决:
TEMP_VAR
....
Err_DW : DWORD ;
Err_Struct AT Err_DW :STRUCT // 添加，结构与DB1.Err相同;
....
END_STRUECT;
END_VAR;

Err_Struct := DB1.Err;

编译后:
L D [AR1,P#128.0]
T #Err_DW
问题圆满解决！多谢各位！
***************************************************
新问题：
SCL编译后的语句如下：
A L 4.7; //a Temp Real Var.
= DIX [AR2,P#38.7]; //a static Real Var.
实现的功能是将一临时实数变量的符合（正负），赋给了一个静态实数变量。

IF tmp_real * static_real < 0 THEN
static_real := - static_real;
END_IF;
这样写有同样的功能，但编译不出原有的简洁，谁知道原作者是怎样写的？

加油！