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 |
Name and explain some common CICS abend codes?
What is the difference between physical map and symbolic map?
What is the process of converting the CICS commands into the equivalent host language statements called?
Mention the 5 fields available in the symbolic map for every ?NAMED? field in the DFHMDI macro? Give a brief description of these fields (Not exceeding a line).
What does the BUFFER option in RECEIVE mean ?
What are different system tables used in CICS?
<CICSFault xmlns="http://www.ibm.com/software/htp/cics/WSFault">DFHPI10 08 05/13/2009 05:47:14 FSCIBM SOAP message generation failed because of incorrect input (INPUT_STRUCTURE_TOO_SMALL ).</CICSFault> Can anyone suggest how to handle this type of error?
Which option of the PCT entry is used to specify the PF key to be pressed for initiating a transaction?
What are the 3 working storage fields used for every field on the map?
What do the keywords MAPONLY and DATAONLY mean?
What option is specified in the SEND command to send only the unnamed fields on to the screen?
Explain how would you resolve an asra abend?