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.

problemas entrar nuevo formulario para hacer un alta

Foro de Xailer profesional en español
Responder
PILO
Mensajes: 583
Registrado: Vie Jul 06, 2007 5:18 pm

problemas entrar nuevo formulario para hacer un alta

Mensaje por PILO »

Tengo el siguiente formulario
/*
* Proyecto: raylledatos
* Fichero: participantes.prg
* Descripción:
* Autor:
* Fecha: 14/08/2005
*/
#include "Xailer.ch"
CLASS tparticipantes FROM TForm
COMPONENT oDbfDataSet1
COMPONENT oTimer1
COMPONENT oDBBrowse1
COMPONENT oCdxDataSource1
COMPONENT oDBNavigator1
METHOD CreateForm()
METHOD AddNew()
ENDCLASS
#include "participantes.xfm"
//---------------------------------------------------------- ----------------
----
METHOD AddNew() CLASS tparticipantes
LOCAL oFrm
WITH OBJECT oFrm := tdatoparti():CreateForm( Self )
:cText := "Alta de Participante"
::oDbfDataSet1:AddNew()
:ShowModal()
if :nModalResult == mrOK
::oDbfDataSet1:Update()
::oDBBrowse1:Refresh()
else
::oDbfDataSet1:Cancel()
endif
END WITH
RETURN NIL
en el que esta puesto la barra de botones OdbNavigator
en el boton "+", habro el siguiente formulario para poder poner los datos
nuevo de un alta
/*
* Proyecto: raylledatos
* Fichero: datosparti.prg
* Descripción:
* Autor:
* Fecha: 15/08/2005
*/
#include "Xailer.ch"
CLASS tdatoparti FROM TForm
COMPONENT oLabel1
COMPONENT oLabel2
COMPONENT oLabel3
COMPONENT oLabel4
COMPONENT oLabel5
COMPONENT oLabel6
COMPONENT oLabel7
COMPONENT oLabel8
COMPONENT oLabel9
COMPONENT oGroupBox1
COMPONENT oLabel10
COMPONENT oLabel11
COMPONENT oLabel12
COMPONENT oLabel13
COMPONENT oLabel14
COMPONENT oLabel15
COMPONENT oLabel16
COMPONENT oDBEnombre
COMPONENT oDBEdireccion
COMPONENT oDBEpoblacion
COMPONENT oDBEpostal
COMPONENT oDBEprovincia
COMPONENT oDBEtelefono
COMPONENT oDBEmovil
COMPONENT oDBEemail
COMPONENT oDBDateEdit1
COMPONENT oDBComboBox1
COMPONENT oDBEedad
COMPONENT oDBComboBox2
COMPONENT oDBEclub
COMPONENT oOK
COMPONENT oDBEnumero
COMPONENT oCancel
METHOD CreateForm()
METHOD FirstCreate( oSender )
ENDCLASS
#include "datosparti.xfm"
//---------------------------------------------------------- ----------------
----
METHOD FirstCreate( oSender ) CLASS tdatoparti
oSender:oDataSet := ::oParent:oDbfDataSet1
RETURN Nil
y al entrar en este formulario me da es siguiente error
***************************** Registro de errores
*****************************
Fecha: 08/17/05
Hora: 09:41:05
Memoria libre: 69796
Area actual: 1
------------------------- Información del
compilador --------------------------
Versión Xailer: Xailer 0.99.4 Pre-release 4
Compilador: xHarbour build 0.99.50 Intl. (SimpLex) PCode Version: 7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600
----------------------- Información detallada del
error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Class: 'NIL' has no exported method
Operación: VARGET
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
(b)XDBDATEEDIT (42)
TDBDATEEDIT:VARGET (0)
(b)TDBFDATASET:ADDNEW (482)
AEVAL (0)
TDBFDATASET:ADDNEW (482)
TPARTICIPANTES:ADDNEW (33)
(b)TPARTICIPANTES:CREATEFORM (81)
TDBNAVIGATOR:ONCLICKINSERT (0)
TDBNAVIGATOR:COMMAND (156)
TPARTICIPANTES:WMCOMMAND (233)
RUNFORM (0)
TAPPLICATION:RUN (189)
MAIN (15)
------------------ Información detallada de áreas de
trabajo ------------------
Area: 1
Alias: PARTICIP
Registro: 1
Filtro:
Relación:
Orden del índice: 1
Clave activa: 1
Me puedes ayudar a saber cual es el error
Muchas gracias de antemano, esto es la primera vez que estoy tratando con
bases de datos en xailer
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9447
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

problemas entrar nuevo formulario para hacer un alta

Mensaje por ignacio »

Pilo,
Este error ya no se producirá en la nueva versión. Pero te adelanto a que es
debido porque algún DataControl tiene asignado un valor en la propiedad
oDataField que no es válido.
Un saludo,
"PILO" <srmpilo@hotmail.com> escribió en el mensaje
news:4302eb44$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Tengo el siguiente formulario
> /*
> * Proyecto: raylledatos
> * Fichero: participantes.prg
> * Descripción:
> * Autor:
> * Fecha: 14/08/2005
> */
>
> #include "Xailer.ch"
>
> CLASS tparticipantes FROM TForm
>
> COMPONENT oDbfDataSet1
> COMPONENT oTimer1
> COMPONENT oDBBrowse1
> COMPONENT oCdxDataSource1
> COMPONENT oDBNavigator1
>
>
> METHOD CreateForm()
> METHOD AddNew()
> ENDCLASS
>
> #include "participantes.xfm"
>
> //---------------------------------------------------------- ----------------
> ----
> METHOD AddNew() CLASS tparticipantes
>
> LOCAL oFrm
>
> WITH OBJECT oFrm := tdatoparti():CreateForm( Self )
> :cText := "Alta de Participante"
> ::oDbfDataSet1:AddNew()
> :ShowModal()
> if :nModalResult == mrOK
> ::oDbfDataSet1:Update()
> ::oDBBrowse1:Refresh()
> else
> ::oDbfDataSet1:Cancel()
> endif
> END WITH
>
> RETURN NIL
>
>
> en el que esta puesto la barra de botones OdbNavigator
> en el boton "+", habro el siguiente formulario para poder poner los datos
> nuevo de un alta
>
> /*
> * Proyecto: raylledatos
> * Fichero: datosparti.prg
> * Descripción:
> * Autor:
> * Fecha: 15/08/2005
> */
>
> #include "Xailer.ch"
>
> CLASS tdatoparti FROM TForm
>
> COMPONENT oLabel1
> COMPONENT oLabel2
> COMPONENT oLabel3
> COMPONENT oLabel4
> COMPONENT oLabel5
> COMPONENT oLabel6
> COMPONENT oLabel7
> COMPONENT oLabel8
> COMPONENT oLabel9
> COMPONENT oGroupBox1
> COMPONENT oLabel10
> COMPONENT oLabel11
> COMPONENT oLabel12
> COMPONENT oLabel13
> COMPONENT oLabel14
> COMPONENT oLabel15
> COMPONENT oLabel16
> COMPONENT oDBEnombre
> COMPONENT oDBEdireccion
> COMPONENT oDBEpoblacion
> COMPONENT oDBEpostal
> COMPONENT oDBEprovincia
> COMPONENT oDBEtelefono
> COMPONENT oDBEmovil
> COMPONENT oDBEemail
> COMPONENT oDBDateEdit1
> COMPONENT oDBComboBox1
> COMPONENT oDBEedad
> COMPONENT oDBComboBox2
> COMPONENT oDBEclub
> COMPONENT oOK
> COMPONENT oDBEnumero
> COMPONENT oCancel
>
> METHOD CreateForm()
> METHOD FirstCreate( oSender )
>
> ENDCLASS
>
> #include "datosparti.xfm"
> //---------------------------------------------------------- ----------------
> ----
> METHOD FirstCreate( oSender ) CLASS tdatoparti
>
> oSender:oDataSet := ::oParent:oDbfDataSet1
>
> RETURN Nil
>
> y al entrar en este formulario me da es siguiente error
>
>
>
>
>
>
> ***************************** Registro de errores
> *****************************
>
> Fecha: 08/17/05
> Hora: 09:41:05
> Memoria libre: 69796
> Area actual: 1
>
> ------------------------- Información del
> compilador --------------------------
>
> Versión Xailer: Xailer 0.99.4 Pre-release 4
> Compilador: xHarbour build 0.99.50 Intl. (SimpLex) PCode Version: 7
> Compilador C/C++: Borland C++ 5.5.1
> Plataforma: Windows XP Professional 5.01.2600
>
> ----------------------- Información detallada del
> error -----------------------
>
> Subsistema: BASE
> Código de error: 1004
> Estado: .F.
> Descripción: Class: 'NIL' has no exported method
> Operación: VARGET
> Argumentos:
> Fichero:
> Código error SO: 0
>
> Pila de llamadas:
> (b)XDBDATEEDIT (42)
> TDBDATEEDIT:VARGET (0)
> (b)TDBFDATASET:ADDNEW (482)
> AEVAL (0)
> TDBFDATASET:ADDNEW (482)
> TPARTICIPANTES:ADDNEW (33)
> (b)TPARTICIPANTES:CREATEFORM (81)
> TDBNAVIGATOR:ONCLICKINSERT (0)
> TDBNAVIGATOR:COMMAND (156)
> TPARTICIPANTES:WMCOMMAND (233)
> RUNFORM (0)
> TAPPLICATION:RUN (189)
> MAIN (15)
>
> ------------------ Información detallada de áreas de
> trabajo ------------------
>
> Area: 1
> Alias: PARTICIP
> Registro: 1
> Filtro:
> Relación:
> Orden del índice: 1
> Clave activa: 1
>
>
> Me puedes ayudar a saber cual es el error
> Muchas gracias de antemano, esto es la primera vez que estoy tratando con
> bases de datos en xailer
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
Responder

Volver a “Xailer Pro Spanish”