Someone correct me if I am wrong It has been in the back of my mind that the S9 and COMP-3 fields have to be changed ,before they are MQPUTed, to flat PIC 9 s without the assumed sign and COMP-3, and that the assumed sign to be coded as a one byte separate filed -- for conversion purposes. No?
Ruzi --- Juni Per <[EMAIL PROTECTED]> wrote: > > Hi , > > I have the following COBOL copy book imported into > WMQI(2.1 WinNT) > > 06 TESTVARIABLES. > 07 TESTINPUT. > 08 INTEGERNOSIGN PIC 99. > 08 INTEGERSIGNED PIC S99. > 08 DECIMALNOSIGN PIC 99V99. > 08 DECIMALSIGNED PIC S99V99. > 08 COMP3NOSIGN PIC 99V99 COMP-3. > 08 COMP3SIGNED PIC S99V99 COMP-3. > > > > I assign the following values to them in a compute > node > > SET "OutputRoot"."MRM"."INTEGERNOSIGN" = 12; > > SET "OutputRoot"."MRM"."INTEGERSIGNED" = -12; > > SET "OutputRoot"."MRM"."DECIMALNOSIGN" = 1234; > > SET "OutputRoot"."MRM"."DECIMALSIGNED" = -1234; > > SET "OutputRoot"."MRM"."COMP3NOSIGN" = 5678; > > SET "OutputRoot"."MRM"."COMP3SIGNED" = -678; > > Now when a COBOL program on mainframe reads this > message and moves into the same copybook and > displays the fields , I get an SOC 7 error for the > S99 field.WHat could be the problem. Pls respond. > > > > THanks in ADvance > > > > > --------------------------------- > Do you Yahoo!? > SBC Yahoo! DSL - Now only $29.95 per month! Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive
