Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

Copy string to array of char in FB

Created by: Rollex at: 10/16/2017 12:54 PM (6 Replies)

Rating (2)

Thanks 3

7 Entries

10/16/2017 12:54 PM	Rate (0)
Rollex Bronze Member Joined: 6/13/2012 Last visit: 10/19/2022 Posts: 161 Rating: (4)	Hi, I have to copy string[2] to array[1..2] char. Step 7 5.5, STL. So i construct two Any pointers for string and chars, then use BLKMOV, and i do it totally wrong.. Stat: sSTRING: String[2] sChars: Array [1..2] Of Char Temp: pAnyString: ANY pAnyChar: ANY L P##pAnyString LAR1 L B#16#10 T B [AR1,P#0.0] L B#16#2 //type - byte T B [AR1,P#1.0] L 2 //String length T W [AR1,P#2.0] L P##sSTRING //source area T W [AR1,P#4.0] L 2 //offset T W [AR1,P#6.0] L P##pAnyChar LAR1 L B#16#10 T B [AR1,P#0.0] L B#16#3 //type - char T B [AR1,P#1.0] L 2 //array length T W [AR1,P#2.0] L P##sChars //source area T W [AR1,P#4.0] L 0 //offset T W [AR1,P#6.0 CALL "BLKMOV" SRCBLK :=#pAnyString RET_VAL:=#Ret DSTBLK :=#pAnyChar NOP 0 And its wrong. I get Ret -32476... How to construct Any for my targets?
	Last edited by: Rollex at: 10/16/2017 12:55:18 PM
Suggestion To thank Quote Answer

10/16/2017 2:29 PM	Rate (0)
MicroMan Platinum Member Joined: 11/29/2011 Last visit: 2/20/2023 Posts: 1347 Rating: (226)	Hi, You are trying to work with the wrong address range. See the In STEP 7 V5.x, with a function, how do you load the address of the ANY pointer for the IN, OUT and IN-OUT parameters into the AR1? FAQ. It details the procedure. Logically: Read the address of the String, Offset it by 2 bytes, copy the pointer into your SOURCE pointer in TEMP. Read the address of you desired destination, copy the pointer into yourDestination pointer in TEMP. Set up SFC20 for these pointer. If you need further assistance. Please come and ask!
	Last edited by: MicroMan at: 10/16/2017 2:35:28 PM - What you read here, please check with manuals and your requirements. - Do not forget to Test, Test and Test... - If the post is helpful, please RATE it! MicroMan
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Rollex

10/16/2017 5:42 PM	Rate (0)
Rollex Bronze Member Joined: 6/13/2012 Last visit: 10/19/2022 Posts: 161 Rating: (4)	Hi, i still cant solve it.. My Any pointers-are in Temp memory. I construct pAnyString with offset, but i think incorrect. I construct pAnyChar without offset... LAR1 P##sSTRING//stat String[2] L D [AR1,P#2.0] T #dwPointer1 //temp LAR1 P##sChars //stat Array [1..2] Of Char L B [AR1,P#0.0] T #dwPointer2 //temp L P##pAnyString LAR1 L B#16#10 T B [AR1,P#0.0] L B#16#2 //type - byte T B [AR1,P#1.0] L 2 //String length T W [AR1,P#2.0] L #dwPointer1 //source area T D [AR1,P#4.0] L 0 //offset T W [AR1,P#6.0] L P##pAnyChar LAR1 L B#16#10 T B [AR1,P#0.0] L B#16#3 //type - char T B [AR1,P#1.0] L 2 //byte length T W [AR1,P#2.0] L #dwPointer2 //source area T D [AR1,P#4.0] L 0 //offset T W [AR1,P#6.0] CALL "BLKMOV" SRCBLK :=#pAnyString RET_VAL:=#Ret DSTBLK :=#pAnyChar
	Last edited by: Rollex at: 10/16/2017 5:50:45 PM Last edited by: Rollex at: 10/16/2017 5:51:38 PM Last edited by: Rollex at: 10/16/2017 5:55:37 PM Last edited by: Rollex at: 10/16/2017 6:30:55 PM
Suggestion To thank Quote Answer

10/16/2017 11:06 PM	Rate (0)
MicroMan Platinum Member Joined: 11/29/2011 Last visit: 2/20/2023 Posts: 1347 Rating: (226)	Hi, The Simple fix, something like: LAR1 P#Source LAR2 P#Dest L B [AR1,P#2.0] T B[AR2, P#0.0] Anyways, to go the ANY Pointer way, Initialize the ANY pointer like. S7Code: BYTE; //specification of the syntax ID DataType: BYTE; //code for the data type Length: INT; //repeat factor DBNumber: INT; //number for data block MemoryArea:BYTE; ByteAddressMSB:BYTE; ByteAddressLSB:WORD; In this thread it is detailed: [Topic (read)] ANY, POINTER in SCL In your case, I think you define the IDB number incorrectly: L P##pAnyString LAR1 L B#16#10 T B [AR1,P#0.0] L B#16#2 //type - byte T B [AR1,P#1.0] L 2 //String length T W [AR1,P#2.0] L #dwPointer1 //source area I think that is Where it is going wrong.
	- What you read here, please check with manuals and your requirements. - Do not forget to Test, Test and Test... - If the post is helpful, please RATE it! MicroMan
Suggestion To thank Quote Answer

10/17/2017 10:52 AM	Rate (0)
Rollex Bronze Member Joined: 6/13/2012 Last visit: 10/19/2022 Posts: 161 Rating: (4)	MicroMan Hi, The Simple fix, something like: LAR1 P#Source LAR2 P#Dest L B [AR1,P#2.0] T B[AR2, P#0.0] Ok L 666 T #sOutput //executed LAR1 P##sSTRING LAR2 P##sChars L B [AR1,P#2.0] T B [AR2,P#0.0] L B [AR1,P#3.0] T B [AR2,P#1.0] L 888 T #sOutput //not Copy of chars works.But... sOutput - int output in my FB. L 666 T #sOutput - executed L 888 T #sOutput - not executed If i delete LAR2 P##sChars L 888 T #sOutput - works.
	Last edited by: Rollex at: 10/17/2017 10:56:20 AM
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users MicroMan

10/17/2017 11:41 AM	Rate (2)
MicroMan Platinum Member Joined: 11/29/2011 Last visit: 2/20/2023 Posts: 1347 Rating: (226)	Hi, Yes. I forget that. With FB's with multi instance capability use AR2 as "Base Address Register". OK. You need to save and restore the content of that. See the Entry type: FAQ, Entry ID: 22531225, Entry date: 12/12/2006 (0) Rate Why are indirect calls using AR2 replaced by static local variables after saving the block?
	- What you read here, please check with manuals and your requirements. - Do not forget to Test, Test and Test... - If the post is helpful, please RATE it! MicroMan
Suggestion To thank Quote Answer

10/19/2017 12:49 PM	Rate (0)
Rollex Bronze Member Joined: 6/13/2012 Last visit: 10/19/2022 Posts: 161 Rating: (4)	Thanks, i will try. Now i solved my task with pointers Any. unknown user //1. convert int to string[5] CALL FC 16 I :=#ProdCounterInt RET_VAL:=#StringNumber NOP 0 //2.create pointer any to string except symbol '+' L P##pAnyString LAR1 TAR2 +AR1 L B#16#10 T B [AR1,P#0.0] L B#16#2 //type - byte T B [AR1,P#1.0] L 4 //String[5] length without simbol '+' T W [AR1,P#2.0] L #DB_Number //IDB number T W [AR1,P#4.0] L P#DBX 279.0 //address in the IDB T D [AR1,P#6.0] //move string to array [1..4] of chars. CALL "BLKMOV" SRCBLK :=#pAnyString RET_VAL:=#iRetVal DSTBLK :=#CharNumber NOP 0 It works too,

Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users MicroMan

|

Share this page:

Share this page on...

Follow us on