Bobbee,

  You passed the interview, but are you certified?


Regards,

John Dawson


 -----Original Message-----
From:   Robert Broderick [mailto:[EMAIL PROTECTED]
Sent:   Wednesday, August 27, 2003 11:21 AM
To:     [EMAIL PROTECTED]
Subject:        Re: SOC 7 error while displaying S99 Fields in COBOL (WMQI
2.1)

The s99 field implies that the data in the sending field is a valid numeric
field with the last byte containing a valid numeric sign.

If my assembler isn't toooo rusty. What happens behind the the curtain is
that the compiler generates instructions to convert the Zone Decimal field
to pack (which doesn't do a validate) and does a ZAP instruction which takes
the field down the hardware path where the numeric portion get interrogated.
That is where, I believe, the S0C7 is generated. SO.....the sending fiels
must be a combination of the following F0-F9, C0-C9, D0-D9 there is another
range but I don't havv a green card available.

I will take a further step in saying, and now I am streaching my brain, that
the conversion from display format to the packed format to verify the
numeric portion DOES NOT care what is in the hig order signifigant sign
portion of the display characters. It just moves the digit portion. (eg
SDSDSD) until it gets to the last byte where it retrieves it's sign from. So
all the signs can be whatever except the last one which must be a C or D or
F and the digits portion in ALL the Zone Decimal must be 0-9.

DID I PASS THE TECH INTERVIEW?????????????????????????????????? (tee hee
hee)

                                                                     bobbee


>From: Ruzi R <[EMAIL PROTECTED]>
>Reply-To: MQSeries List <[EMAIL PROTECTED]>
>To: [EMAIL PROTECTED]
>Subject: Re: SOC 7 error while displaying S99 Fields in COBOL (WMQI 2.1)
>Date: Wed, 27 Aug 2003 08:50:26 -0700
>
>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

_________________________________________________________________
Enter for your chance to IM with Bon Jovi, Seal, Bow Wow, or Mary J Blige
using MSN Messenger http://entertainment.msn.com/imastar

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

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

Reply via email to