Me neither, I hadn't seen that before. Thanks to Charles, Bryan, Scott and this thread:
http://archive.midrange.com/midrange-l/201010/msg00001.html
I tried using CRTSRCPF FILE(QTEMP/QCLSRC2) TEXT('DBCS SRC File') CCSID(937) and was able to retrieve QMNSRBND.
This is the germaine part:
0292.00 *SYSTEM/ENDTCPSVR SERVER(*ALL)
0293.00 MONMSG MSGID(CPF0000)
0294.00 MONMSG MSGID(CPI0000)
0295.00 MONMSG MSGID(TCP0000)
0296.00 *SYSTEM/ENDHOSTSVR SERVER(*ALL) ENDACTCNN(*DATABASE *FILE)
0297.00 MONMSG MSGID(CPF0000)
0298.00 MONMSG MSGID(CPI0000)
0299.00 MONMSG MSGID(TCP0000)
0300.00 QSYS/DLYJOB DLY(300)
0301.00 *SYSTEM/ENDTCP CONFIRM(*NO)
0302.00 MONMSG MSGID(CPF0000)
0303.00 MONMSG MSGID(CPI0000)
0304.00 MONMSG MSGID(TCP0000)
0305.00 QSYS/DLYJOB DLY(300)
Regards,
Scott Ingvaldson
Senior IBM Support Specialist
-----Original Message-----
From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx]
Sent: Wednesday, November 17, 2010 7:21 AM
To: Midrange Systems Technical Discussion
Subject: RE: v6r1 sav stuck - no error msg
Scott,
I am a newbie at DBCS. When I try
RTVCLSRC PGM(QMNSrbnd) SRCFILE(QTEMP/QCLSRC)
I get:
CPF0565
Message . . . . : Source from CL program QMNSRBND not retrieved.
Cause . . . . . : A source file that supports double-byte characters was
used to create the control language (CL) program specified for the PGM
parameter on a Retrieve CL Source (RTVCLSRC) command. The source
retrieved
from the CL program cannot be moved to member *PGM of source file QCLSRC
in
library QTEMP because file QCLSRC does not support double-byte
characters.
So I assume that I have to do something special on
CRTSRCPF FILE(QTEMP/QCLSRC) CCSID(...)
Like, what? From DSPJOB my CCSID currently is 37.
Rob Berendt
As an Amazon Associate we earn from qualifying purchases.