I just want to ask why does the variable I passed in a
dclgen of sql that has a data type of varchar which has a
maximum length is 250 is truncated,,
Here is the code..
DCLGEN of rsauud01 table
01 dataarea
43 data-area-len pic s9(4).
43 data-area-text pic x(250).
MYVARIABLE.
01 DATAAREA1 pic x(250).
move 250 to data-area-len of dataarea of rsauud01
MOVE DATA-AREA1 TO data-area-text of dataarea of rsauud01
---
but it is always trucated everytime I insert it in the table
by the way it is a cobol-cics program
Answers were Sorted based on User's Feedback
Answer / anna
the variable shoud be under level 49 and pic comp.
01 dataarea.
49 data-area-len pic s9(4) comp.
49 data-area-text pic x(250).
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / virender
I think Anna level number 49 does not matter here. I think
the problem is because of using "of dataarea of rsauud01"
with the move statement.
Just use
move 250 to data-area-len
MOVE DATA-AREA1 TO data-area-text
Please let me know if it worked.
| Is This Answer Correct ? | 3 Yes | 1 No |
Can a tsq of one particular transaction be accessed from an alternate transaction?
What is the COMMAREA(communications area)?
What is the command that is used to add a new record to the file?
How do you invoke other programs? What are the pros and cons of each method?
How many ways to share information between different CICS programs?
Highlight the points of differences between XCTL and START?
What is the difference between the enter key, the PF keys and the PA keys?
How do you handle errors in CICS pgms ?
how i can enter into cics region in real time.
What is the use of mdt (modified data tag)?
What is the use of using MDT in CICS? How it works?
how to get 'time stamp' in cics prgms ,what is the syntax.