Re: Copying multi-format PF -- RPG400-L

Thanks for hanging in there with me, Pete. No, InvoiceLF is over the same set of
physical files. I populate all three of them, then I want to copy the LF to
another name, clear these same PFs, populate them, copy the LF, clear, populate,
copy, clear, populate, copy, etc.

Pete Clifford wrote:

> Thanks, but, sorry, I just need clarify things a bit further. Are you saying
> that InvoiceLF is recreated over a different set of physical files for each
> invoice? Is that the way it works? The application processes a file called
> InvoiceLF, but each time it's called InvoiceLF is built over a different set
> of physical files specific to the invoice in question?
>
> Or am I still being thick?
>
> Pete
> "John Furniss" <jfurniss@xxxxxxxxxxxxxxxxx>
> wrote in message news:3EA94C39.ADADF342@xxxxxxxxxxxxxxxxxxxx
> > I understand that this scenerio can be/is confusing, and maybe I'm going
> about
> > it all wrong. What is happening is: We will run our custom-built invoicing
> > process, which will populate the header, detail and total PFs which have
> the LF
> > over them. I will then "rename" the logical to the invoice number for this
> > particular invoice. Then the process happens again. Each invoice number
> needs
> > it's own set of header, detail and total files. It would look like this:
> > Header_invoice_123 ---
> > Detail_invoice_123    ---
> > Detail_invoice_123   --- ----> InvoiceLF -----> rename (or copy) to
> File123
> > Total_invoice_123  ----
> >
> > Header_invoice_456 ----
> > Detail_invoice_456  ----- -----> InvoiceLF -----> rename to File456
> > Total_invoice_456   -----
> >
> > and so on.
> >
> > Clear as mud? Am I going about this wrong? One main problem is that all
> three
> > PF's have different record lengths.
> > John
> >
> > Pete Clifford wrote:
> >
> > > Not sure what you're trying achieve by all this I'm afraid John.
> > >
> > > You say:
> > >
> > > "I need to copy this LF to another file name, clear the PFs, re-populate
> > > the PFs, copy the LF to another name, etc. The name I'm copying to is
> > > different each time."
> > >
> > > Why do you need to copy  the logical? Why can't you just copy the
> > > physical(s)? Is it because the logical is the only one with keys and you
> > > need to copy by key?
> > >
> > > Can you also clarify why you're clearing the physicals and then
> repopulating
> > > them please?
> > >
> > > Any why do you need to copy the LF to another name?
> > >
> > > Sorry, not trying to be obtuse, but rather than launch into what you can
> and
> > > cannot do with a multi-format logical, I think it's important I/we
> > > understand what the basic objectives are here.
> > >
> > > Pete
> > >
> > > "John Furniss"
> <jfurniss@xxxxxxxxxxxxxxxxx>
> > > wrote in message
> news:3EA93F61.5C1C8840@xxxxxxxxxxxxxxxxxxxx
> > > > List,
> > > >     I searched the archives, but found nothing to help me with this: I
> > > > have an LF (FileLF) over 3 seperate PFs (FilePF1, FilePF2, FilePF3),
> and
> > > > I need to copy this LF to another file name, clear the PFs,
> re-populate
> > > > the PFs, copy the LF to another name, etc. The name I'm copying to is
> > > > different each time.
> > > >     It may seem like a strange setup, but this makes up an invoice
> file
> > > > with three different record lengths (header, detail and total
> records),
> > > > hence the 3 different PFs with one LF over all three.
> > > >     When I try to copy the file with it's three members and try to
> > > > create the file, get an error saying I cannot copy a multiple member
> > > > file and do a create at the same time. Can I create a join file for
> all
> > > > three?
> > > >     Ideas?
> > > >     Thanks in advance,
> > > >
> > > > --
> > > > John Furniss
> > > > Applications Programmer
> > > > Allied Machine & Engineering Corp.
> > > > mailto:jfurniss@xxxxxxxxxxxxxxxxx
> > > > Phone (330) 343-4283 ext. 8371
> > > >
> > > >
> > > > _______________________________________________
> > > > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> > > > To post a message email:
> RPG400-L@xxxxxxxxxxxx
> > > > To subscribe, unsubscribe, or change list options,
> > > > visit: http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l
> > > > or email: RPG400-L-request@xxxxxxxxxxxx
> > > > Before posting, please take a moment to review the archives
> > > > at http://archive.midrange.com/rpg400-l.
> > > >
> > > >
> > >
> > > _______________________________________________
> > > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> > > To post a message email:
> RPG400-L@xxxxxxxxxxxx
> > > To subscribe, unsubscribe, or change list options,
> > > visit: http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l
> > > or email: RPG400-L-request@xxxxxxxxxxxx
> > > Before posting, please take a moment to review the archives
> > > at http://archive.midrange.com/rpg400-l.
> >
> > --
> > John Furniss
> > Applications Programmer
> > Allied Machine & Engineering Corp.
> > mailto:jfurniss@xxxxxxxxxxxxxxxxx
> > Phone (330) 343-4283 ext. 8371
> >
> >
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.

--
John Furniss
Applications Programmer
Allied Machine & Engineering Corp.
mailto:jfurniss@xxxxxxxxxxxxxxxxx
Phone (330) 343-4283 ext. 8371