如何通过Connect:Direct NDM传输二进制文件?

时间:2011-09-12 14:23:42

标签: unix configuration binary transfer mainframe

我正在尝试使用Connect:Direct NDM向目标服务器(大型机)提交二进制文件,在本例中为本地服务器(带有大型机重新托管软件的Solaris服务器)的Excel文件。

以下是我设置的环境值:

SODETFL "DetailedReport.xls"
SODDETNDM "FIN.REPORT(+1)"
TDCOPTS ":DATATYPE=BINARY:XLATE=NO:STRIP.BLANKS=NO"

以下是我使用的NDM配置:

ASSGNDD ddname='SYSIN' type='INSTREAM'  << !
  SIGNON                                                                00260005
  SUBMIT  PROC=COPYFILE                    -                            00270005
              JOBNAME=JOB00001             -                            00280005
              PNODE=SERVER001              -                            00290005
              SNODE=NDMIDS                 -                            00300005
              SNODEID=(xxxxxx,xxxxxx)      -                            00310005
              HOLD=NO                      -                            00320005
              NOTIFY=CCACTD                -                            00330005
              NODE=,                       -                            00360005
    DSN1=${SODDETFL}                       -                            00370005
    DSN2=${SODDETNDM}                      -
    DCBINFO='dcb=(dsorg=ps, recfm=vb, lrecl=1504)'     -                                                                                                             00385005
              DISP1=NEW,                   -                            00390005
              DISP2=CATLG,DELETE           -                            00400005
              UNIT=BATCH                   -                            00410005
              SYSOPTS=${TDCOPTS}           -                            00440005
              AEFAJOB=PSIAPNB5
   SEL PROC WHERE (QUEUE=A) TABLE                                       00450005
   SIGNOFF                                                              00460005

我可以整天通过NDM发送文本文件,没有任何问题。然而,似乎二进制文件有点困难。当我尝试使用上面的配置时,我收到以下错误:

Completion Code  => 8
Message Id       => XCPS009I
Short Text       => Read buffer too small. Possibly src reclen > dest reclen.
Ckpt=>Y  Lkfl=>N  Rstr=>N  Xlat=>Y  Scmp=>N  Ecmp=>Y  Ecpr=>0.00 CRC=>N Zlvl=>1 win=>13 Zmem=>4

任何人都可以了解如何通过NDM提交二进制文件吗?

1 个答案:

答案 0 :(得分:4)

脱下袖口...... 尝试将RECFM = VB更改为RECFM = U并指定BLKSIZE =而不是LRECL =

除了您不希望文件是PDS数据集之外,这与可执行加载模块如何存储在大型机上的情况完全不同。我现在不在我的办公室,我想我有一些NDM传输负载模块的例子,如果这个建议不起作用我可以查看,但我认为它会。

给这个建议一个镜头,如果它还没有飞,请告诉我。