<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.6000.16441" name=GENERATOR></HEAD>
<BODY>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>Greetings to the
-L,</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>Environment: QTP
8.49.D1 on MPE/iX 6.5</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>I have
a program (see extract below) where for each record read
I write two records (a customer and a customer address) to a subfile.
When it has processed the last input record it writes a trailer record to the
subfile. E</FONT></SPAN><SPAN class=273414514-08062007><FONT face=Arial
size=2>ach record written to the subfile needs a sequence
number.</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>My problem is that
each cust/addr record pair has the same sequence number. The tlr record has the
same sequence number as the last cust/addr pair.</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>Any suggestions on
how to correct this?</FONT></SPAN></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2><SPAN class=273414514-08062007>access
custmstr</SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>temporary
t-seq</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>item t-seq
count</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>define d-seq
character *6 </FONT></SPAN><SPAN class=273414514-08062007><FONT face=Arial
size=2>= ascii(t-seq,6)</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>define d-cust
character *512 </FONT></SPAN><SPAN class=273414514-08062007><FONT
face=Arial size=2>= "CUST" + d-seq + ...</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>define d-addr
character *512 </FONT></SPAN><SPAN class=273414514-08062007><FONT
face=Arial size=2>= "ADDR" + d-seq + ...</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>define d-tlr
character *512 </FONT></SPAN><SPAN class=273414514-08062007><FONT
face=Arial size=2>= "TLR" + d-seq + ...</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>subfile odscust
alias cust keep include d-cust</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>subfile odscust
alias addr keep include d-addr</FONT></SPAN></DIV>
<DIV><SPAN class=273414514-08062007><FONT face=Arial size=2>subfile odscust
alias tlr at final keep include d-tlr</FONT></SPAN></DIV>
<P align=left><FONT face="Comic Sans MS" size=2>regards,</FONT> <BR><FONT
face=Arial> </FONT> <BR><FONT face="Comic Sans MS" size=2>Robert
W.Mills</FONT> <BR><FONT face="Comic Sans MS" size=2>Systems Development
Manager</FONT> <BR><FONT face="Comic Sans MS" size=2>Pinnacle
Arvato</FONT> <BR><FONT face="Comic Sans MS" size=2>(0</FONT><FONT
face="Comic Sans MS" size=2>20</FONT><FONT face="Comic Sans MS" size=2>)</FONT>
<FONT face="Comic Sans MS" size=2>8309 3604</FONT> </P>
<DIV> </DIV></BODY></HTML>