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
--
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Alias does not exist
-
Christian Lauer
- Mensajes: 30
- Registrado: Lun Jul 18, 2005 12:29 am
Alias does not exist
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
> 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
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
>
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
>