Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

Assign DATA parameter for TSEND in SCL

Created by: prasad.sawantdesai at: 3/25/2013 4:28 PM (6 Replies)

Rating (0)

Thanks 1

7 Entries

3/25/2013 4:28 PM	Rate (0)
prasad.sawantdesai Posts: 55 Rating: (0)	Hello, Anybody used TSEND system function in SCL? How to assign DATA parameter using ANY pointer.... like we do in STL P#DB301.DBX100.0 BYTE 100 Thanks
prasad.sawantdesai Posts: 55 Rating: (0)	Last edited by: prasad.sawantdesai at: 3/25/2013 4:30 PM added example Last edited by: prasad.sawantdesai at: 3/25/2013 4:30 PM
Suggestion To thank Quote Answer

3/25/2013 5:44 PM	Rate (0)
smiffy Platinum Expert Joined: 1/17/2007 Last visit: 3/17/2023 Posts: 1523 Rating: (518)	You will have to assemble an ANY pointer as I showed you in one of your earlier threads. The ANY pointer data will need to be setup thus:- pAnyVar.S7Code := B#16#10; pAnyVar.DataType := B#16#2; pAnyVar.Length := 100; pAnyVar.DBNumber := 301; pAnyVar.MemoryArea := B#16#84; // or B#16#84 if DB301 is an instance DB pAnyVar.ByteAddressMSB := 0; pAnyVar.ByteAddressLSB := 800; // byte address 100 converted to bitwise addressing = 100 * 8 = 800
	Programming today is the race between software engineers building bigger and better idiot proof programs, and the universe producing bigger and better idiots. So far, the universe is winning...
Suggestion To thank Quote Answer

3/25/2013 6:22 PM	Rate (0)
Marko Bursic Platinum Member Joined: 9/8/2009 Last visit: 3/15/2023 Posts: 1410 Rating: (146)	you can create the pointer as smithy suggest, also you can declare a structure or an array in that DB, for ex. DB30 is called Data and you have an array of 100 bytes called SndBuffer (array [0..99] of byte), so your pointer is like: "Data".SndBuffer

Suggestion To thank Quote Answer

3/26/2013 10:47 AM	Rate (0)
prasad.sawantdesai Posts: 55 Rating: (0)	Hello Smiffy, I have used same method for creating ANY pointer in SCL. But when I assign it to the DATA parameter of TSEND function It gives me an error status 8088. I have attached screenshot. Here is the code: pAnysend : ANY ; anysend AT pAnysend : STRUCT (* Diassembled ANY POINTER structure ) S7Code : BYTE; ( Code FOR S7 (fixed AT 16#10)) DataType : BYTE; ( Code FOR data TYPE ) Length : WORD; ( Repetition factor = Send/receive length ) DBNumber : WORD; ( Data block Number) MemoryArea : BYTE; ( Specified memory area ) ByteAddressMSB : BYTE; ( BYTE address most significant bits ) ByteAddressLSB : WORD; ( BYTE address least significant bits *) END_STRUCT; anysend.S7Code := B#16#10; anysend.DataType := B#16#2; anysend.Length := INT_TO_WORD(channel.SEND_LEN); anysend.DBNumber := connect.SEND_DB; anysend.MemoryArea := B#16#84; anysend.ByteAddressMSB := B#16#0; anysend.ByteAddressLSB := W#16#0; In STL, same code is working fine. I am not getting Why this is happening. So I am looking for any other way to construct any pointer... Thanks Attachment Error.jpg (116 Downloads)
prasad.sawantdesai Posts: 55 Rating: (0)
Suggestion To thank Quote Answer

3/26/2013 10:49 AM	Rate (0)
prasad.sawantdesai Posts: 55 Rating: (0)	Hello Marko Bursic, Is it possible to construct ANY pointer using an array so that i can use it for TSEND DATA parameter? Thanks
prasad.sawantdesai Posts: 55 Rating: (0)
Suggestion To thank Quote Answer

3/26/2013 4:19 PM	Rate (0)
smiffy Platinum Expert Joined: 1/17/2007 Last visit: 3/17/2023 Posts: 1523 Rating: (518)	The error code 8088 is caused by the LEN parameter being greater then the your anysend.Length value (channel.SEND_LEN). The LEN parameter has to be less than or equal to your SEND_LEN value, otherwise, you are trying to send more data than the ANY holds, thus generating the error. You can use a array as your source of data. The following code will do it. I have used it in the past with no issues. You will need your array defining in the VAR (static data) section. [code] VAR_TEMP // Define transmit/receive access ANY pointer pBuf : ANY; // Pointer for receive data BufAny AT pBuf : STRUCT // ANY pointer data structure S7Code : BYTE; // Code for S7 = 0x10 DataType : BYTE; // Code for data type = 0x02 = byte Length : INT; // Repetition factor = Send/receive length DBNumber : INT; // Data block Number MemoryArea : BYTE; // Specified memory area = 0x84 = data block ByteAddressMSB : BYTE; // Byte address most significant bits ByteAddressLSB : WORD; // Byte address least significant bits END_STRUCT; END_VAR; [/code] Then when you want to construct and use the ANY pointer use this code:- [code] pBuf := <array name>; // e.g. pBuf := TXBuf [/code] If you need to modify the send length (or receive length if using TRECV) then you should alter the BufAny.Length field. However this must be done after the pBuf := line of code as this line of code will overwrite your Length field setting. Though I suggest that you might just leave the Length field alone and simply make the array size greater then you maximum ever send length, and use the LEN paremter of the TSEND call to modulate how much data you send.
	Programming today is the race between software engineers building bigger and better idiot proof programs, and the universe producing bigger and better idiots. So far, the universe is winning...
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users prasad.sawantdesai

3/28/2013 2:28 PM	Rate (0)
prasad.sawantdesai Posts: 55 Rating: (0)	Hello, Thank you so much for the information. It worked fine... I usedANY pointer with structure construct as you suggested. Thanks
prasad.sawantdesai Posts: 55 Rating: (0)
Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Follow us on