A fix is available
APAR status
Closed as program error.
Error description
When generating 3270 Data Streams to position the cursor on the screen, Rexx/CICS is always using 12 bit addressing in the Send Buffer Address (SBA) instruction, rather than switching to 14 bit, and consequently can function if the required position is within the first 4K of the screen. Positions over this are either effectively "wrapping" within this section or resulting in invalid commands being sent to the screen. This is an issue with large screen sizes, eg 62X160, as the size exceeds 4K. Additional Symptom(s) Search Keyword(s): KIXREVxxx
Local fix
n/a
Problem summary
**************************************************************** * USERS AFFECTED: All. * **************************************************************** * PROBLEM DESCRIPTION: CICS Rexx does not run on a 62x160 * * screen. * **************************************************************** In the reported problem, the customer attempted to run Rexx for CICS on a 62 x 160 screen. A screen of this size has 9920 character positions. CICS Rexx code builds 3270 datastreams using 12 bit addresses but these are limited to a maximum of 4096 positions which is insufficient for a 62 x 160 screen. A PROG752 error occurred. The problem may also present as text appearing in unexpected positions, or a REX1 abend. Keywords: DFHZC2458 DFHZC3406 CICABEND
Problem conclusion
CICS Rexx code has been modified to address the reported problem.
Temporary fix
Comments
APAR Information
APAR number
OA58386
Reported component name
REXX/CICS COMM
Reported component ID
565511200
Reported release
110
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
YesSpecatt / CST / Xsystem
Submitted date
2019-09-20
Closed date
2020-02-20
Last modified date
2020-04-06
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UJ02186
Modules/Macros
CICFUNCT CICPAN20 CICPAN21 CICPAN30 CICPAN40 CICPAN80 CICPULL CICSAY IXXRCN IXXRDI IXXREV IXXRFN IXXRIN IXXRJA IXXRJB IXXRJC IXXRJD IXXRJE IXXRJF IXXRJG IXXRJH IXXRJI IXXRJJ IXXRJK IXXRJL IXXRJM IXXRJN IXXRJO IXXRJP IXXRJQ IXXRJR IXXRKA IXXRKB IXXRKC IXXRKD IXXRKE IXXRKF IXXRKG IXXRKH IXXRKI IXXRKJ IXXRKK IXXRKL IXXRKM IXXRKN IXXRKO IXXRKP IXXRKQ IXXRKR IXXRKS IXXRKT IXXRKU IXXRKV IXXRKW IXXRKX IXXRKY IXXRKZ IXXRTC IXXRUA IXXRUC IXXRUD IXXRUE IXXRUF IXXRUL IXXRUR IXXRUS IXXRUU IXXRUV IXXRVA IXXRXE IXXRXF
Fix information
Fixed component name
REXX/CICS COMM
Fixed component ID
565511200
Applicable component levels
R110 PSY UJ02186
UP20/03/11 P F003
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"1.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
11 March 2020