Re: Interesting results when writing to an IFS file

Rory, et al

I am using Scotts IFS utilities here and the file is opened and or created with this code:

c eval fd = open('/tmp/' + %trim(INFile) :
c O_CREAT+O_TRUNC+O_CODEPAGE+O_WRONLY:
c S_IRWXU+S_IRWXG+S_IROTH: 819)

So the codepage is 819 which should be ASCII. Job CCSID is 37

Pete Helgren
Value Added Software, Inc
www.asaap.com
www.opensource4i.com


On 4/13/2011 1:16 PM, Rory Hewitt wrote:

Pete,

It is no doubt a CCSID/code-page issue. What's the CCSID of the IFS file and
your job?

Rory

On Wed, Apr 13, 2011 at 12:10 PM, Pete Helgren<pete@xxxxxxxxxx> wrote:

Hmmm. I am not sure what I am missing here but I have a program that is
reading data into a data structure and then later I output that data
into a stream file in the IFS. I am formatting the data into a JSON
string and use the curly braces to begin and end each record. But is
seems that the double quote plus a right curly brace e.g. "} ends up
as a special character and doesn't end up as a correctly formatted string.

I am using the following D specs to set the values:

D q S 1A Varying
D Inz('"')
D c S 1A Varying
D Inz(',')
D sc S 3A Varying
D Inz('":"')
D lb S 1A Varying
D Inz('{')
D rb S 1A Varying
D Inz('}')
D lc S 1A Varying
D Inz(' ')

and in the code I concatenate the values into a string that is written
to the IFS. The formatting looks like this:

Line = lc + lb + q + 'msgtxt' + sc + msgtxt + q + c +
q + 'msgid' + sc + RCVM0200.MsgID + q + c +
q + 'jobName' + sc + RCVM0200.SndJobNam + q + c +
q + 'jobUser' + sc + RCVM0200.SndJobUsr + q + c +
q + 'jobNumber' + sc + RCVM0200.SndJobNbr + q + rb ;

it is that final +q+rb which is the literal combination "} that causes
the heartburn. Otherwise the line formats correctly.

The output is something like this: (wrapped so it will fit here)

{"msgtxt":"Job 586612/PETE/QDFTJOBD completed normally on 04/12/11 at
18:05:55.",
"msgid":"CPF1241","jobName":"QDFTJOBD ",
"jobUser":"PETE ",""jobNumber":"586612 ½,

Notice the '1/2' symbol at the end. It *should* be "} so that the
string would look like this:

{"msgtxt":"Job 586612/PETE/QDFTJOBD completed normally on 04/12/11 at
18:05:55.",
"msgid":"CPF1241","jobName":"QDFTJOBD ",
"jobUser":"PETE ",""jobNumber":"586612"},

Should I use a different technique for the literals?

Ideas how how to work around the issue would be welcome.

--
Pete Helgren
Value Added Software, Inc
www.asaap.com
www.opensource4i.com