RE: [MI400] Open a file that contains a LOB field

[Kurt Goolsbee <K.goolsbee@xxxxxxxxxxxxx>]

Thanks Gene -

Care to share how you figured that out?

> -----Original Message-----
> From: Gene_Gaunt@ReviewWorks.com [SMTP:Gene_Gaunt@ReviewWorks.com]
> Sent: Tuesday, November 19, 2002 1:02 PM
> To:   mi400@midrange.com
> Subject:      RE: [MI400] Open a file that contains a LOB field
>
>
> To get past CPF428A, your UFCB variable area needs one, two, or three of
> the following:
>
> dcl dd ClobParmId           bin(2) init(167);  -- for CLOBs
> dcl dd ClobParmLength       bin(2) init(5);
> dcl dd ClobParmFlag         char(1) init(X"80");
> /*--*/
> dcl dd DataLinkParmId       bin(2) init(166);  -- for datalinks
> dcl dd DataLinkParmLength   bin(2) init(5);
> dcl dd DataLinkParmFlag     char(1) init(X"80");
> /*--*/
> dcl dd UdtParmId            bin(2) init(165);  -- for user types
> dcl dd UdtParmLength        bin(2) init(5);
> dcl dd UdtParmFlag          char(1) init(X"80");
>
> _______________________________________________
> This is the MI Programming on the AS400 / iSeries (MI400) mailing list
> To post a message email: MI400@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/mi400
> or email: MI400-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/mi400.