View previous topic :: View next topic
|
Author |
Message |
janmejay Warnings : 1 New User
Joined: 22 Jun 2007 Posts: 85 Location: bangalore
|
|
|
|
hello
my reqmt is dump the data in CSV format in output file.
I have declared my output file structure as
Code: |
01 outrec
10 emp-name pic x(10)
10 filler pic x(1) value ','.
10 emp-addrs pic X(30).
10 Filler pic x(1) value ','.
10 emp salay pic s 9(5) comp-3
10 filler pic x(1) value ','.
10 emp-phone pic 9(10) |
my out put should like :
Code: |
mainppss ,ukusbangalore ,50000,9861098610 |
after reading the input file , i am moving the values to corresponding outrec fields but when i am writing to output file the comma (,) is not displaying after end of fields. it showing blank.
it is coming as
Code: |
mainppss ukusbangalore 50000 9861098610 |
can let me know the reason |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2455 Location: Hampshire, UK
|
|
|
|
Quote: |
can let me know the reason |
Because the code, which you have not shown, is wrong.
The snippet of code that you did show was not in code tags and you keep using the term 'file' instead of 'dataset'. If you realy mean 'file' then this is not a mainframe question and should not be posted on a mainframe forum. |
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2455 Location: Hampshire, UK
|
|
|
|
Duplicate of post in DFSort. Locked. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
Is outrec defined as the 01 for an FD? If so, your VALUE clause on the variables is being ignored and you need to use WRITE ... FROM and define outrec in WORKING-STORAGE.
Since you posted nothing for us to help you, that guess is about as far as we can go. |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Or you cleverly INITIALIZE your "outrec". Or MOVE SPACE to outrec. Or some other thing we could attempt to guess, but could tell you exactly if you showed the relevant code. |
|
Back to top |
|
|
janmejay Warnings : 1 New User
Joined: 22 Jun 2007 Posts: 85 Location: bangalore
|
|
|
|
Robert is right. I defined my outrec under FD section
FD OUTPUT_FILE
01 OUTREC.
10 EMPNAME PIC X(10).
10 FILLER PIC X(1) VALUE ','.
.................................
..................................
I hope due to this Value Clause get ignored and need to define the outrec
in working storage section.
I will try this and let know. |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Do you ever look at the diagnostic messages at the end of your compile listing? |
|
Back to top |
|
|
janmejay Warnings : 1 New User
Joined: 22 Jun 2007 Posts: 85 Location: bangalore
|
|
|
|
janmejay wrote: |
Robert is right. I defined my outrec under FD section
FD OUTPUT_FILE
01 OUTREC.
10 EMPNAME PIC X(10).
10 FILLER PIC X(1) VALUE ','.
.................................
..................................
I hope due to this Value Clause get ignored and need to define the outrec
in working storage section.
I will try this and let know. |
it is working now. thank you Robert |
|
Back to top |
|
|
|