View previous topic :: View next topic |
Author |
Message |
sinduja Beginner
Joined: 20 Jun 2005 Posts: 29 Topics: 14
|
Posted: Thu Apr 07, 2016 12:32 am Post subject: AFP output into a file |
|
|
Hi All,
I have a request from my client to archive a document that was so far only being printed.
This document is being printed with the JCL OUTPUT statement (similar
to the one given below).
Code: | FLOT OUTPUT PAGEDEF=ZMF05,
FORMDEF=ZMF05
LISTZ100 DD SYSOUT=(C,,MF03),
OUTPUT=*.FLOT,
DEST=CHZ0R3,
RECFM=FBA |
Here the OUTPUT statement sends the printable output to the Printer.
My question is this.
Is there a way I can get it in a file so that I can check the possibilities of archiving them.
(We have other documents that are being archived. They are from different platform (like ASF). The AFP output that is being sent to the printer is sent to a utility ACIF and then the output from files are used for archiving.)
Thank you in advance for any valuble input.
Regards,
Sinduja |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
|
Posted: Thu Apr 07, 2016 1:50 pm Post subject: |
|
|
sinduja
Is it a program that is generating the report for AFP? Who is writing to the ddname LISTZ100?
If it is a program then change that step to write to a dataset and then add another step (IEBGENER) to print to Destination _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
sinduja Beginner
Joined: 20 Jun 2005 Posts: 29 Topics: 14
|
Posted: Fri Apr 08, 2016 7:01 am Post subject: |
|
|
Kolusu,
There is a assembler program which writes to LISTZ100.
The OUTPUT statement includes PAGEDEF and FORMDEF information. The AFP output routed to the printer combines the PAGEDEF and FORMDEF information as well. Is this correct?
If I give a dataset in LISTZ100, will I get printable AFP output in the dataset.
Kindly correct me if my understanding is wrong. Or if I have to give any more details.
Thank you
Regards,
Sinduja. |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
|
Posted: Fri Apr 08, 2016 1:26 pm Post subject: |
|
|
sinduja wrote: | Kolusu,
There is a assembler program which writes to LISTZ100.
If I give a dataset in LISTZ100, will I get printable AFP output in the dataset.
|
Sindhuja,
Change the JCL for assembler program to write out to a dataset like this
Code: |
//LISTZ100 DD DSN=YOUR.ARCHIVE.GDGFILE(+1),
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(X,Y),RLSE),
// DCB=(LRECL=a,RECFM=b,BLKSIZE=c)
//*
|
And then add this step as the last step which would would print out the report like it did before.
Code: |
//LASTSTEP EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DISP=SHR,DSN=YOUR.ARCHIVE.GDGFILE(+1)
//SYSUT2 DD SYSOUT=(C,,MF03),
// OUTPUT=*.FLOT,
// DEST=CHZ0R3,
// RECFM=FBA
//SYSIN DD DUMMY
|
_________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
sinduja Beginner
Joined: 20 Jun 2005 Posts: 29 Topics: 14
|
Posted: Tue Apr 12, 2016 12:59 am Post subject: |
|
|
Kolusu,
Thank you for your time and input.
I still have some questions. I will try your suggestions and come back with the results.
Regards,
Sinduja |
|
Back to top |
|
|
pramitdas Beginner
Joined: 26 Aug 2016 Posts: 12 Topics: 3
|
Posted: Sun Aug 28, 2016 12:14 am Post subject: Re: AFP output into a file |
|
|
sinduja wrote: | Hi All,
I have a request from my client to archive a document that was so far only being printed.
This document is being printed with the JCL OUTPUT statement (similar
to the one given below).
Code: | FLOT OUTPUT PAGEDEF=ZMF05,
FORMDEF=ZMF05
LISTZ100 DD SYSOUT=(C,,MF03),
OUTPUT=*.FLOT,
DEST=CHZ0R3,
RECFM=FBA |
|
It can be achieved easily without any major step. Just route the output in the spool and check.
Use the below code and check in the spool SYSOUT.
Code: | FLOT OUTPUT PAGEDEF=ZMF05,
FORMDEF=ZMF05
LISTZ100 DD SYSOUT=*
RECFM=FBA |
Thanks,
Pramit |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
|
Posted: Sun Aug 28, 2016 12:39 am Post subject: Re: AFP output into a file |
|
|
pramitdas wrote: |
It can be achieved easily without any major step. Just route the output in the spool and check
Thanks,
Pramit |
Pramit,
I appreciate your enthusiasm to help but please take a minute to understand the real requirement before you pass on a solution. The original requirement is to
sinduja wrote: |
My question is this.
Is there a way I can get it in a file so that I can check the possibilities of archiving them. |
So how do you think your suggestion of routing the report to spool gonna solve the problem of the report being printed on the destination printer as well as the local dataset for archiving?
Think before you bump an old topic with inane solution _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
pramitdas Beginner
Joined: 26 Aug 2016 Posts: 12 Topics: 3
|
Posted: Sun Aug 28, 2016 12:48 am Post subject: Re: AFP output into a file |
|
|
Very true.. I have missed that one and my sincere apologies Kolusu If it's about checking Possibility of archiving, we must need to route the output to a GDG . Thanks for reminding! |
|
Back to top |
|
|
|
|