Dreport & rreport

[GCC Consulting]

-----Original Message-----
From: Jeff Harrison [mailto:Jeff.Harrison at Epixweb.com] 
Sent: Thursday, April 29, 2004 1:45 PM
To: 'gcc at optonline.net'; Filepro 2 List
Subject: RE: Dreport & rreport

Richard Kreiss wrote:
> 
> Having a problem with the following code:
> 
> Native 5.0.11
> 
>    9  Then: po=@pw;st=@pm;ct="15";
>    10  Then: 'debug on
>    11  Then: GOSUB pst_hed
> loop     If: ct ne "0"
>    12  Then: PRINT;ct = ct -"1"
>          If: ct = "0"
>    13  Then: END
>    14  Then: GOTO loop
> pst_hed  If: 

[snip]

Are you aware that pst_hed only happens once?  You initialize your ct counter to
"15", but line 13 ensures that your loop will never occur.  Also, you only
assign po one time, so perhaps you only want this to happen once.

If the post does not happen with rclerk I would add some msgbox statements for
debugging purposes. 
 
-------------------------------------------------------------------------------
Pst_hed only need to run once.  This routine prints 15 address labels from the
same record.
Line 13 tests the counter and ends the program when it gets to "0". Otherwise
line 14 executes
And the loop is repeated.

My problem is on the first time this system called program runs, the lookup
fails as the record is not found.
If the same selection from the browse lookup is made again, the record is found
and the values posted.  Al succeeding records selected will post correctly.  

If I run a report, printing the orders listed in the browse, first, everything
works fine. 

The above only happens in rreport; dreport runs correctly each time.

Richard Kreiss
GCC Consulting