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
- 2 Answers
- 4661 Views
- I also Faced
- E-Mail Answers
Answer Posted / 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 |
Post New Answer View All Answers
Mention the option used in a cics command to retrieve the response code after execution of the command?
what is effect on receive map when
Mention one alternative aspect of CICS?
how a data in physical and symbolic map gets treated? Since the physical map is much concerned about the screen alignment and the field positions, how the values entered in the field which has PICIN or PICOUT clause in Physical map gets treated? Does that mean datas recieved or sent to the physical map should be constant? How does the data in Symbolic map gets converted with 5suffix namely F,L,A,I and O. For example EMPNO is treated as EMPNOI, EMPNOO, EMPNOA, EMPNOL and EMPNOF. how does this happen in symbolic map. Please provide your inputs on the above and kindly correct me if I am wrong.
What is interval control?
Explain how do you access storage outside your cics program?
what is the difference between a package and a plan. How does one bind 2 versions of a cics transaction with the same module name in two different cics regions that share the same db2 subsystem?
Explain the difference between and exec cics xctl and exec cics start command?
Explain the function of the load command?
How do we pass parameters into a CICS –DB2 program
What is CICS ?
What does EIB mean in CICS?
Explain ceci transaction commands?
What is program reentrance?
Explain the difference between a physical bms mapset and a logical bms mapset?
