rtiger
Member
FUNCTION FC 34 : VOID
AUTHOR: _48011
NAME: DATUMW // DAT UM W
VAR_INPUT
DBQL :word; // DBQL
AAQL :word; // AAQL
EAQL :word; // EAQL
DBZL :word; // DBZL
AAZL :word; // AAZL
END_VAR
VAR_TEMP
conv_ret_val :int;
END_VAR
BEGIN
NETWORK
L 0;
T MB 220;
L #DBQL;
T MW 222;
L 2;
L MB 223;
>I;
S M 220.0;
JC M001;
L #DBZL;
T MW 224;
L 2;
L MB 225;
>I;
S M 220.3;
JC M001;
L #EAQL;
L #AAQL;
-I;
L 254;
>I;
= M 220.7;
JC M001;
TAK;
L 0;
<I;
= M 220.6;
JC M001;
TAK;
INC 1;
T MW 254;
L W#16#E;
T MW 230;
AN M 222.0;
JC M002;
L W#16#EE00;
T MW 232;
JU M003;
M002:L W#16#EC00;
T MW 232;
M003:L MD 230;
L MB 223;
+D;
// LIR 1;
// *** Error in Line 2167 (FB 217): Command not defined. ***
T MW 240;
L 0;
==I;
= M 220.1;
JC M001;
L MW 240;
SLD 4;
+ L#-1;
// LIR 1;
// *** Error in Line 2177 (FB 217): Command not defined. ***
+ -6;
L #EAQL;
<I;
= M 220.2;
JC M001;
L MW 240;
SLD 4;
+D;
T MD 226;
AN M 224.0;
JC M004;
L W#16#EE00;
T MW 232;
JU M005;
M004:L W#16#EC00;
T MW 232;
M005:L MD 230;
L MB 225;
+D;
// LIR 1;
// *** Error in Line 2198 (FB 217): Command not defined. ***
T MW 240;
L 0;
==I;
= M 220.4;
JC M001;
L MW 240;
SLD 4;
+ L#-1;
// LIR 1;
// *** Error in Line 2208 (FB 217): Command not defined. ***
+ -5;
T MW 242;
L #AAZL;
L MW 254;
+I;
T MW 244;
L MW 242;
>I;
= M 220.5;
JC M001;
L MW 244;
+ -1;
L MW 240;
SLD 4;
+D;
T MD 236;
L MD 226;
L MD 236;
//CALL SFC 20 (
// SRCBLK := P#????? WORD 0,
// RET_VAL := conv_ret_val,
// DSTBLK := P#????? WORD 0
// );
// *** Error in Line 2233 (FB 217): CALL SFC20 generated. Please complete parameter list. ***
M001:NOP 0;
END_FUNCTION
I try to tranfer code from S5 to S7,and I received the code below,
I can not fix it
error LRI
AUTHOR: _48011
NAME: DATUMW // DAT UM W
VAR_INPUT
DBQL :word; // DBQL
AAQL :word; // AAQL
EAQL :word; // EAQL
DBZL :word; // DBZL
AAZL :word; // AAZL
END_VAR
VAR_TEMP
conv_ret_val :int;
END_VAR
BEGIN
NETWORK
L 0;
T MB 220;
L #DBQL;
T MW 222;
L 2;
L MB 223;
>I;
S M 220.0;
JC M001;
L #DBZL;
T MW 224;
L 2;
L MB 225;
>I;
S M 220.3;
JC M001;
L #EAQL;
L #AAQL;
-I;
L 254;
>I;
= M 220.7;
JC M001;
TAK;
L 0;
<I;
= M 220.6;
JC M001;
TAK;
INC 1;
T MW 254;
L W#16#E;
T MW 230;
AN M 222.0;
JC M002;
L W#16#EE00;
T MW 232;
JU M003;
M002:L W#16#EC00;
T MW 232;
M003:L MD 230;
L MB 223;
+D;
// LIR 1;
// *** Error in Line 2167 (FB 217): Command not defined. ***
T MW 240;
L 0;
==I;
= M 220.1;
JC M001;
L MW 240;
SLD 4;
+ L#-1;
// LIR 1;
// *** Error in Line 2177 (FB 217): Command not defined. ***
+ -6;
L #EAQL;
<I;
= M 220.2;
JC M001;
L MW 240;
SLD 4;
+D;
T MD 226;
AN M 224.0;
JC M004;
L W#16#EE00;
T MW 232;
JU M005;
M004:L W#16#EC00;
T MW 232;
M005:L MD 230;
L MB 225;
+D;
// LIR 1;
// *** Error in Line 2198 (FB 217): Command not defined. ***
T MW 240;
L 0;
==I;
= M 220.4;
JC M001;
L MW 240;
SLD 4;
+ L#-1;
// LIR 1;
// *** Error in Line 2208 (FB 217): Command not defined. ***
+ -5;
T MW 242;
L #AAZL;
L MW 254;
+I;
T MW 244;
L MW 242;
>I;
= M 220.5;
JC M001;
L MW 244;
+ -1;
L MW 240;
SLD 4;
+D;
T MD 236;
L MD 226;
L MD 236;
//CALL SFC 20 (
// SRCBLK := P#????? WORD 0,
// RET_VAL := conv_ret_val,
// DSTBLK := P#????? WORD 0
// );
// *** Error in Line 2233 (FB 217): CALL SFC20 generated. Please complete parameter list. ***
M001:NOP 0;
END_FUNCTION
I try to tranfer code from S5 to S7,and I received the code below,
I can not fix it
error LRI
Last edited: