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

Question

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

以下是我设置的环境值：

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 提交二进制文件吗？

Answer 1

即兴...
尝试将 RECFM=VB 更改为 RECFM=U 并指定 BLKSIZE= 而不是 LRECL=

这实际上与可执行加载模块在大型机上的存储方式没有什么不同，除非您不希望文件成为 PDS 数据集。我现在不在办公室，我想我有一些传输负载模块的 NDM 示例，如果此建议不起作用，我可以查找这些示例，但我认为它会起作用。

尝试一下这个建议，如果仍然不起作用，请告诉我。