/* -

* Create the data queues used by the demo model and client -

* in library specified by parameter -

*/

PGM PARM(&LIB)

DCL VAR(&LIB) TYPE(*CHAR) LEN(10)

CRTDTAQ DTAQ(&LIB/MDLI) MAXLEN(64512) +

AUTORCL(*YES) TEXT('Template input to +

Model of MVC')

CRTDTAQ DTAQ(&LIB/MDLO) MAXLEN(64512) +

SEQ(*KEYED) KEYLEN(6) AUTORCL(*YES) +

TEXT('Template output to Model of MVC')