...
CALL PGM(QBRM/Q1AOLD) PARM('VRTVOLSIZE' '*SET ' 'nnnnnnnnnnnnnnn')
where - nnnnnnn is the media size in megabytes (MB). This value must be between 0000001 (1 megabyte (MB)) and 1000000 (1 terabyte (TB)). Note: The size maybe adjusted slightly to reflect minimum or maximum size of the virtual media.
...