Página 1 de 1

Alias does not exist

Publicado: Jue Jun 02, 2005 11:56 pm
por Christian Lauer
Hi,
the following piece of code results in the error "Alias does not exist"
Code:
WITH OBJECT oDTable := TDbfDataSet():New()
:oDataSource := oConnection
:cProcess := "GENERAL"
:cName := "DTable"
:lReadOnly := .F.
:lShared := .T.
:lNew := .T.
if !:Open()
MsgAlert(i18n("Not able to open system table DTable
(Directory of Tables)"), i18n("Abort"))
break
endif
MsgAlert("Table opened: " + :cName + ", Alias: " + :Alias())
:GoBottom()
End of code
Error message
TDBFDATASET:GOBOTTOM(355)
Fehler BASE/1002 Alias does not exist
Argumente: ()
End of error message
What is wrong or missing? Thanks for any help!
A working example is attached.
Saludos
Christian Lauer
--

Alias does not exist

Publicado: Vie Jun 03, 2005 9:42 am
por jfgimenez
Christian,
> Code:
> WITH OBJECT oDTable := TDbfDataSet():New()
> :oDataSource := oConnection
> :cProcess := "GENERAL"
> :cName := "DTable"
> :lReadOnly := .F.
> :lShared := .T.
> :lNew := .T.
:Create() <---------------
> if !:Open()
--
Regards,
Jose F. Gimenez

Alias does not exist

Publicado: Vie Jun 03, 2005 9:45 am
por jmartial
Hi Christian,
This code I think is correct:
WITH OBJECT oDTable := TDbfDataSet():New()
:oDataSource := oConnection
:cProcess := "GENERAL"
:cName := "DTable"
:lReadOnly := .F.
:lShared := .T.
:lNew := .T.
:lOpen := .T.
:Create()
if !:lOpen()
MsgAlert(i18n("Not able to open system table DTable
(Directory of Tables)"), i18n("Abort"))
break
Else
MsgAlert("Table opened: " + :cName + ", Alias: " +
:Alias())
:GoBottom()
endif
END
Joaquín
"Christian Lauer" <clauer@netzw.de> escribió en el mensaje
news:429f80a8$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Hi,
>
> the following piece of code results in the error "Alias does not exist"
>
> Code:
> WITH OBJECT oDTable := TDbfDataSet():New()
> :oDataSource := oConnection
> :cProcess := "GENERAL"
> :cName := "DTable"
> :lReadOnly := .F.
> :lShared := .T.
> :lNew := .T.
> if !:Open()
> MsgAlert(i18n("Not able to open system table DTable
> (Directory of Tables)"), i18n("Abort"))
> break
> endif
> MsgAlert("Table opened: " + :cName + ", Alias: " + :Alias())
> :GoBottom()
> End of code
>
> Error message
> TDBFDATASET:GOBOTTOM(355)
> Fehler BASE/1002 Alias does not exist
> Argumente: ()
> End of error message
>
> What is wrong or missing? Thanks for any help!
> A working example is attached.
>
> Saludos
> Christian Lauer
>