Home > Archive > ASM370 > May 2004 > Re: CICS Command / Macro to read 3270 buffer
You are viewing an archived Text-only version of the thread.
To view this thread in it's original format and/or if you want to reply to
this thread please [click here]
| Author |
Re: CICS Command / Macro to read 3270 buffer
|
|
| Binyamin Dissen 2004-05-12, 7:20 pm |
| On Sat, 08 May 2004 14:32:32 GMT Andreas Lerch <andreas.lerch@onlinehome.de>
wrote:
:>i have a little problem. In my cics applications is an error routine,
:>thats get control via EXEC CICS LINK when a DL1 or DB2 request gets an
:>unwanted returncode. Now i know the error condition and the program
:>which makes the link, but i dont know the screenimage.
:>For excample:
:>3270 --> initial program EXEC CICS RECEIVE
:> links to DB2 Subprogramm
:> error condition 'numeric parameter contains nonnumerical data
:> link to error-programm
:>now i want to read the 3270 buffer, format it, and print it to CICS
:>CSSL-TD-QUEUE.
:>System:
:>CICS TS 2.2
:>zOS 1.2 and 1.4
:>The interpretation of 3270-datasteam is not the problem, enough
:>knowledge available, but the command sequence to get the screen image.
:>I know that this is possible, because AbendAid and Xpediter does it -
:>i think.
There is more likely a specific CICS list that can address this issue, as it
is not assembler related, but ....
You want to do a receive buffer type command.
It may have to be preceded by an x'F2' order.
--
Binyamin Dissen <bdissen@dissensoftware.com>
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
| |
| Kevin Wailes 2004-05-12, 7:20 pm |
| Andreas
What you need to do is :-
EXEC CICS RECEIVE BUFFER SET(R2)
R2 will contain the address of the screen buffer. (can be any available register)
Kevin
Binyamin Dissen <postingid@dissensoftware.com> wrote in message news:<tfbq905v4vi21prii0t8liudvihf096t9n@4ax.com>...
> On Sat, 08 May 2004 14:32:32 GMT Andreas Lerch <andreas.lerch@onlinehome.de>
> wrote:
>
> :>i have a little problem. In my cics applications is an error routine,
> :>thats get control via EXEC CICS LINK when a DL1 or DB2 request gets an
> :>unwanted returncode. Now i know the error condition and the program
> :>which makes the link, but i dont know the screenimage.
>
> :>For excample:
>
> :>3270 --> initial program EXEC CICS RECEIVE
> :> links to DB2 Subprogramm
> :> error condition 'numeric parameter contains nonnumerical data
> :> link to error-programm
>
> :>now i want to read the 3270 buffer, format it, and print it to CICS
> :>CSSL-TD-QUEUE.
>
> :>System:
> :>CICS TS 2.2
> :>zOS 1.2 and 1.4
>
> :>The interpretation of 3270-datasteam is not the problem, enough
> :>knowledge available, but the command sequence to get the screen image.
> :>I know that this is possible, because AbendAid and Xpediter does it -
> :>i think.
>
> There is more likely a specific CICS list that can address this issue, as it
> is not assembler related, but ....
>
> You want to do a receive buffer type command.
>
> It may have to be preceded by an x'F2' order.
| |
| Andreas Lerch 2004-05-12, 7:20 pm |
|
Am 08.05.04, 19:03:43, schrieb Binyamin Dissen=20
<postingid@dissensoftware.com> zum Thema Re: CICS Command / Macro to=20=
read 3270 buffer:
Hello
[color=darkred]
> There is more likely a specific CICS list that can address this issue,=
=20
as it
> is not assembler related, but ....
Whats that? A news group? I post at ibm.software.cics.z-os too - now=20=
answer
wher can i search about CICS
> You want to do a receive buffer type command.
Yes - something like that DFHTC can also be involved.=20
> It may have to be preceded by an x'F2' order.
WCC ? ?
I am Sorry, but my informations are very very old. The last time i=20
have seen a SystemProgrammerCicsBroschure is at the time of CICS 4.1 -=20=
the last macro-level-CICS.
I dont know anything about TerminalCommunication - and need some Help.=20=
A sample is enough. But where i found it.
Thank you all
Einen schoenen Tag
Andreas Lerch
| |
| Andreas Lerch 2004-05-12, 7:20 pm |
|
Am 11.05.04, 14:23:05, schrieb kevin_wailes@yahoo.com (Kevin Wailes)=20=
zum Thema Re: CICS Command / Macro to read 3270 buffer:
Hello
[color=darkred]
> Andreas
> What you need to do is :-
> EXEC CICS RECEIVE BUFFER SET(R2)
> R2 will contain the address of the screen buffer. (can be any=20
available register)
Thank you, i will try it.
Einen schoenen Tag
Andreas Lerch
| |
| Andreas Lerch 2004-05-12, 7:20 pm |
|
Am 11.05.04, 14:23:05, schrieb kevin_wailes@yahoo.com (Kevin Wailes)=20=
zum Thema Re: CICS Command / Macro to read 3270 buffer:
Hello
[color=darkred]
> What you need to do is :-
> EXEC CICS RECEIVE BUFFER SET(R2)
> R2 will contain the address of the screen buffer. (can be any=20
available register)
> Kevin
Thank you very much - thats exactly what i need
The implementation cost ca 2h
Einen schoenen Tag
Andreas Lerch
|
|
|
|
|