请教SCL编程问题

已锁定

100度雪

  • 帖子

    1
  • 精华

    0
  • 被关注

    1

论坛等级:新手

注册时间:2010-04-27

普通 普通 如何晋级?

请教SCL编程问题

621

1

2010-11-17 16:28:58

近来我在用SCL语言编写读取西门子PLC序列号的程序,程序编译没有错误,但是监控(直接在SCL源文件中监控的)时却没有得到结果,请各位高手帮忙看看,现在急用,万分谢谢!!
我的SCL程序如下:
DATA_BLOCK DB10//
// Block Comment...
//
STRUCT
SZL_HEADER:STRUCT
LENTHDR:WORD:=w#16#22;
N_DR:WORD:=w#16#0;
END_STRUCT;
seriennummer:STRING[24]:='';
END_STRUCT;
BEGIN
END_DATA_BLOCK

FUNCTION FC30:VOID
VAR_TEMP
// Temporary Variables
RET_SFC51:INT;
Busy:BOOL;
REL:INT;
a:WORD;
b:WORD;
c:WORD;
e:DWORD;
f:DWORD;
g:DWORD;
h:DWORD;
i:DWORD;
END_VAR
BEGIN
// Instruction Section
IF M0.0=FALSE THEN
M0.0:=TRUE;
END_IF;
REL:=RDSYSST(REQ :=M0.0 // IN: BOOL
,SZL_ID :=w#16#011C // IN: WORD
,INDEX :=w#16#0005 // IN: WORD
,BUSY :=Busy // OUT: BOOL
,SZL_HEADER :=DB10.SZL_HEADER // OUT: STRUCT
,DR := DB10.seriennummer// OUT: ANY
); // INT
IF ENO THEN
a:=DB10.SZL_HEADER.LENTHDR;
b:=DB10.SZL_HEADER.N_DR;
c:=DB10.DBW4;
e:=DB10.DBD6;
f:=DB10.DBD10;
g:=DB10.DBD14;
h:=DB10.DBD18;
i:=DB10.DBD22;
END_IF;
END_FUNCTION
请教SCL编程问题 已锁定
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC S7-300/400

共有54618条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。