I've modified your IF statement with some code. I prompted the user right after they previewed the report.
Dave
IF _TALLY > 0
BROWSE
report form payment3 preview
lnResponse=MESSAGEBOX("Do you wish to post this data?",36,"OPTION!")
IF lnResponse = 6
** Routine to update history table.
ELSE
** Do nothing.
ENDIF
***DO FORM POSTMAD
ELSE
MESSAGEBOX("FOUND NO RECORDS THAT MATCH YOUR REQUEST")
ENDIF
RELEASE THISFORM
close all
DO FORM POST1AUL **** THIS IS WHERE I DO MY POSTING program would go
****. IT CLOSES ALL AND START FROM THE BEGAINING, WHICH I SOMEHOW FEEL IS incorrect.
Live life today - tomorrow will take care of itself.