Hi, i have a Little Problem with a String under Visual Cobol 2.3 Update 2 / VS 2012
If will move this:
01 MyDataBlock string.
to this 01 Structur:
01 Mein-Link01.
05 Benutzer-Name PIC X(30).
05 Benutzer-PW PIC X(08).
05 Benutzer-Recht-Tabelle.
10 Benutzer-Rechte-Tab Occurs 999.
15 Benutzer-Rechte-KZ PIC X.
05 Benutzer-Abteilung PIC X(30).
This move will not working correct:
move MyDataBlock To Mein-Link01
What is wrong?
#StringMoveproblemCan you please be more specific? What is the error that you receive?
This move works fine for me if I initialize the string to a value first.
Hi, i have a Little Problem with a String under Visual Cobol 2.3 Update 2 / VS 2012
If will move this:
01 MyDataBlock string.
to this 01 Structur:
01 Mein-Link01.
05 Benutzer-Name PIC X(30).
05 Benutzer-PW PIC X(08).
05 Benutzer-Recht-Tabelle.
10 Benutzer-Rechte-Tab Occurs 999.
15 Benutzer-Rechte-KZ PIC X.
05 Benutzer-Abteilung PIC X(30).
This move will not working correct:
move MyDataBlock To Mein-Link01
What is wrong?
#StringMoveproblemHow initialize you the string?
INITIALIZE MyDataBlock
?
More Details: (WPF Mask...)
set DLL-DBOX1 to new WinwvisHP.WWHP_DBOX1.
move HinHer to DLL-DBOX1::MyDataBlock
this is ok...
But in the under program...
....
method-id Window_Closed.
procedure division using by value sender as object e as type System.EventArgs.
** Normal Working Storage Fields are in the 01 Structure
move Mein-Link01 to MyDataBlock.
this move will go down...
Hi, i have a Little Problem with a String under Visual Cobol 2.3 Update 2 / VS 2012
If will move this:
01 MyDataBlock string.
to this 01 Structur:
01 Mein-Link01.
05 Benutzer-Name PIC X(30).
05 Benutzer-PW PIC X(08).
05 Benutzer-Recht-Tabelle.
10 Benutzer-Rechte-Tab Occurs 999.
15 Benutzer-Rechte-KZ PIC X.
05 Benutzer-Abteilung PIC X(30).
This move will not working correct:
move MyDataBlock To Mein-Link01
What is wrong?
#StringMoveproblemsorry:
move MyDataBlock to Mein-Link01
this move is not running...
Hi, i have a Little Problem with a String under Visual Cobol 2.3 Update 2 / VS 2012
If will move this:
01 MyDataBlock string.
to this 01 Structur:
01 Mein-Link01.
05 Benutzer-Name PIC X(30).
05 Benutzer-PW PIC X(08).
05 Benutzer-Recht-Tabelle.
10 Benutzer-Rechte-Tab Occurs 999.
15 Benutzer-Rechte-KZ PIC X.
05 Benutzer-Abteilung PIC X(30).
This move will not working correct:
move MyDataBlock To Mein-Link01
What is wrong?
#StringMoveproblemI don't think you can use initialize on the string unless you first give it a size.
Can you please post the entire program source program so I can see it all in one place? If it is small just attach it to the post.