|
View previous topic :: View next topic
|
| Author |
Message |
dirceu.alves
New User
Joined: 03 Aug 2005
Posts: 17
|
|
|
|
Hello,
We are developing programs in COBOL/CICS and we're having a problem 'cause the programs may be called by the front-end applications.
To receive the data we're using the RECEIVE command (that's OK), but when we have to send back the data, we're having problems with the SEND TEXT command (it seems to me it doesn't working).
Is SEND TEXT the right command to send back the data to the front-end?
Thanks |
|
| Back to top |
|
 |
vijayamadhuri
Active User
Joined: 06 Apr 2005
Posts: 180
|
|
|
|
If I am wrong please correct me.
exec cics send and the send command will be followed by theexec cics return comand right. |
|
| Back to top |
|
|
dirceu.alves
New User
Joined: 03 Aug 2005
Posts: 17
|
|
|
|
| vijayamadhuri wrote: |
If I am wrong please correct me.
exec cics send and the send command will be followed by theexec cics return comand right. |
Yes, of course we're using EXEC CICS RETURN after the SEND command.
The problem is: the data isn't returning to the front-end, that's why I want to know which command I have to use to send back the data.
Thanks anyway... |
|
| Back to top |
|
|
manjun
New User
Joined: 13 Jul 2005
Posts: 4
|
|
|
|
I did not get what you are trying to send via send-text.
Here is the sample CICS statements for receiving and sending.
this is just a sample.
POIM400 is map name.
For receiving data:
EXEC CICS RECEIVE
MAP('POIM400')
MAPSET('POIM400')
INTO(POIM400I)
END-EXEC.
For Sending data
EXEC CICS SEND
MAP('POIM400')
MAPSET('POIM400')
FROM(POIM400O)
CURSOR
ERASE
END-EXEC
EXEC CICS RETURN
TRANSID('NOI4')
COMMAREA(C-PARMS)
LENGTH(200)
END-EXEC.
Regards |
|
| Back to top |
|
|
|
|
