On Mon, 22 Nov 2021 11:08:51 -0500, Phil Smith III wrote:
>And just to close the loop:
>
I would have used a relatively moron-proof subroutine:
Show Field:
say left( arg( 1 ), 9 )'=' value( arg( 1 ) )
return
>QVSVER = 2
>CECMODEL = 785
>CECMSUS = 10012
>CECSTAT = 1
>CECTYPE = 3906
>CECVALID = 1
>IMGVALID = 1
>LPARID = 1
>LPARMSUS = 5183
>LPARNAME = ZM01
>QVSFLAGS = E0
>VER2 = 00000000
-- gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
