开发 Java 应用程序以在 OSGi JVM 服务器中使用 JZOS Toolkit API

package com.ibm.cicsdev.jzos.sample;

import com.ibm.jzos.ZFile;
import com.ibm.jzos.ZUtil;
import com.ibm.cics.server.TSQ;

public class ZFilePrint 
{
    public static void main(String[] args) throws Exception 
    {
        ZFile zFile = new ZFile("//DD:INPUT", "rb,type=record,noseek");
        TSQ tsqQ = new TSQ();
        tsqQ.setName("JZOSTSQ");        

        try 
        {
            byte[] recBuf = new byte[zFile.getLrecl()];
            int nRead;
            String encoding = ZUtil.getDefaultPlatformEncoding();

            while ((nRead = zFile.read(recBuf)) >= 0) 
            {
                String line = new String(recBuf, 0, nRead, encoding);                
                tsqQ.writeString(line);
            }            
        } 
        finally 
        {
            zFile.close();
        }
    }
}