About Special PTF($4SF280)
search cancel

About Special PTF($4SF280)

book

Article ID: 252416

calendar_today

Updated On:

Products

Panvalet

Issue/Introduction

How do I test the $4SF280?

$4SF280:
SPECIAL ZAP TO DISABLE THE ESTABLISHMENT OF STAX PROCESSING TO ENABLE PA1 INTERRUPTS

 

Environment

Release : 14.6

Resolution

The $4SF280 enables the attention by PA1.
If $4SF280 is applied, running REXX containing many PANTSO commands and using PA1 output the "COMMAND TERMINATED DUE TO ATTENTION" message and REXX stop.
If $4SF280 is not applied, PA1 is invalid and REXX is not stopped.

Sample:

ALLOC F(PANDD1) DA('PANVLT.R146.PANLIB') SHR
ALLOC F(SYSPRINT) DA(*)
PAN PRINT NAME(TEST01) CONTROL(0)
PAN PRINT NAME(TEST02) CONTROL(0)
PAN PRINT NAME(TEST03) CONTROL(0)
PAN PRINT NAME(TEST04) CONTROL(0)
PAN PRINT NAME(TEST05) CONTROL(0)
        :
        :
PAN PRINT NAME(TEST30) CONTROL(0)
FREE F(PANDD1)
EXIT