On 2/27/2013 12:58 PM, Crabtree, Anne D wrote:
> Here's what I get:
>
> 0000FC 5110 B698            00698 20546         $DEST   
> DEST=$WORK16,LEN=L'$WORK16,CONV=SBINARY
> 000136 4160 B698            00698 20599          LA     R6,$WORK16
> 00013A D503 C210 6000 00260 00000 20600          CLC    =CL4'VPRT',0(R6)
>
> Dump shows:
> Registers 0-7
> GR: 00000000 000004D2 9855D2D2 185A8810  00000000 105A81FC 00007698 00000001
> AR: 00000000 00000000 00000000 00000000  00000000 00000000 00000000 00000000
> Registers 8-15
> GR: 000B42B0 185A8869 1807B000 00007000  185F4D88 7F50F6A4 185F4E64 00000000
> AR: 00000000 00000000 00000000 00000000  00000000 00000000 00000000 00000000

Hi Anne,
Could you also provide the psw. 

Thanks,
Doug

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to