>In my From. my button got such program.
> pAirAcctDataBase = pub_airacctdatapath + 'account.dbc'
> pSeaAcctDataBase = pub_seaacctdatapath + 'account.dbc'
>
> pAirPrg = pub_airacctprgpath + 'caloverdueamt'
> pSeaPrg = pub_seaacctprgpath + 'caloverdueamt'
>
> OPEN DATABASE &pAirAcctDataBase
> SET PATH TO &pub_airacctdatapath
> set database TO &pAirAcctDataBase
> SET PROCEDURE TO &pAirPrg additive
> pAirDueAmt = CALOVERDUEAMt(pCompanyCode,pDate)
> CLOSE DATABASE
>
>
> OPEN DATABASE &pSeaAcctDataBase
> SET PATH TO &pub_seaacctdatapath
> set database TO &pSeaAcctDataBase
> SET PROCEDURE TO &pSeaPrg additive
> pSeaDueAmt = CALOVERDUEAMt(pCompanyCode,pDate)
>
>Now. I can get the pAirDueamt and pSeaDueamt .
>BUT It prompt an error "Cannot Access the selected Table"
>I didn't put any tables in my form, and i use 'private data session"
>How can solve it ???


on your form, do you have listboxes or combo boxes that use a table as control source ? when you CLOSE DATABASE, you close contained tables too. if your form reactivates (or refreshes ?) and the table is not open, you will get that message, even if not executing code.