-----Original Message-----
>Hi list, > >Here is a snippet of the code disassembled by dumpmaster: > >00000000_00009748 -10 4B20 C17A SH R2,378(,R12) >00000000_0000974C -C 9140 2174 TM 372(R2),X'40' >00000000_00009750 -8 4710 C04A BC 74(,R12) BO >00000000_00009754 -4 5830 0208 L R3,520 >00000000_00009758 0 D503 3000 C172 CLC 0(4,R3),370(R12) >00000000_0000975E 6 4770 C02C BC 44(,R12) BNE/BNZ >00000000_00009762 A 4100 3007 LA R0,7(,R3) >00000000_00009766 E 47F0 C0C4 BC 196(,R12) UNCOND > >The program is failing on the CLC statement right in the middle of the >snippet. Here is a dump of the registers at time of failure. > >Program QUIKJOB failed with abend code S0C4 > > at address 00000000_00009758, offset 1E30 in Program QUIKJOB > > > >Registers at time of abend. > >0 00000000_0001369C 1 00000000_00009F60 2 00000000_00FD8158 3 00000000_02AF7A08 >4 00000000_009D89B0 5 00000000_009FF130 6 00000000_009A7FC8 7 00000000_FD000000 >8 00000000_00007400 9 00000000_009FF3F0 A 00000000_00007400 B >00000000_00009C00 C 00000000_0000973E D 00000000_00007B54 E 00000000_5F00C2DA >F 00000000_0000973E > >it appears as though register 3 contains a 31 bit address. And... >Please also display the PSW at the time of ABEND. > >Bill Fairchild Others have already pointed out the problem (location of PCCA) and resolution (DIAG keyword). May not be worth mentioning: but you say R3 'looks' like a 31-bit address. To be certain you must look at bits 31 and 32 of the PSW (both 0 = 24-bit addressing, both 1 = 64-bit addressing, bit 31 0 and bit 32 1 = 31-bit addressing). Hence Bill's request to see the PSW. Ant. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
