What's in R6?
In article <E40EAEDF99264AAEA4AB87F3DD644710@RichardPC> you wrote:
> 0000E2 4450 90FC 000FE 1959 EX R5,VERSTOR
> CHECK STORAGE TO VERIFY 00062600
> 0000E6 4770 9128 0012A 1960 BNE ERRVER
> 00062700
> 0000EA BF6F 2010 00010 1961 ICM R6,15,VSISVWTM
> L.A. OF DATA TO MODIFY 00062802
> 0000EE 4780 9130 00132 1962 BZ ERRWTM
> 00062900
> 1963 AIF ('&SYSPARM' NE
> 'MVS').NMVS003
> 0000F2 4450 9102 00104 1964 EX R5,MODSTOR
> GO MODIFY STORAGE 00063000
> 1965 .NMVS003 ANOP
> 1966 AIF ('&SYSPARM' NE
> 'VSE').NVSE003
> 1967 .NVSE003 ANOP
> 0000F6 41F0 0000 00000 1968 LA 15,0
> SET DONE RC 00063100
> 0000FA 47F0 9140 00142 1969 B RETURN
> 00063200
> 1970 *
> 00063300
> 0000FE D500 3000 4000 00000 00000 1971 VERSTOR CLC 0(*-*,R3),0(R4)
> VERIFY STORAGE 00063400
> 000104 D200 3000 6000 00000 00000 1972 MODSTOR MVC 0(*-*,R3),0(R6)
> MODIFY STORAGE 00063500
> 0010A 1973 ERRFUNC EQU *
> 00063600
> 00010A 41F0 0001 00001 1974 LA R15,1
> 00063700
>
> The PSW points after the highlighted one. Richard
> GRR 8-9 00000000_00000000 00000000_80D4DB7A
> GPR A-B 00000000_00AFD608 00000000_7F559430
> GPR C-D 00000000_010C52C0 00000000_0005DBCC
> GPR E-F 00000000_00FF3900 00000000_00000000
>
> ACCESS REGISTERS 0-15
>
> AR 0-3 00AFF208 00000002 00000000 00000000
> AR 4-7 00000000 00000000 00000000 00000000
> AR 8-B 00000000 00000000 00000000 00000000
> AR C-F 00000000 00000000 00000000 00000000
>
> FLOATING POINT REGISTERS 0-15
>
> FPR 0-1 00000000_00000000 00000000_00000000
> FPR 2-3 00000000_00000000 00000000_00000000
> FPR 4-5 00000000_00000000 00000000_00000000
> FPR 6-7 00000000_00000000 00000000_00000000
> FPR 8-9 00000000_00000000 00000000_00000000
--
Don Poitras - SAS Development - SAS Institute Inc. - SAS Campus Drive
[email protected] (919) 531-5637 Cary, NC 27513
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
