Página 1 de 1

error en treport

Publicado: Dom Sep 09, 2007 6:38 pm
por PILO
En la version 1.6.1 en el treport no da errer
este ejemplo con la dbf,
Local oReport, oFont1, oFont2
With Object oFont1 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
With Object oFont2 := TFont():New()
:cName := "Arial"
:nSize := 8
:lBold := .f.
END WITH
::oDbfPersonas:GOTOP()
REPORT oReport;
TITLE "lista de personal";
PREVIEW ;
FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Recno" ;
DATA Recno() ;
ALIGN taRIGHT ;
FONT 2
COLUMN OF oReport ;
TITLE "nombre" ;
DATA ::oDbfPersonas:NOMBRE // This is a calculated field
COLUMN OF oReport ;
TITLE "Dirección" ;
DATA ::oDbfPersonas:direccion
COLUMN OF oReport ;
TITLE "Poblacion" ;
DATA ::oDbfPersonas:poblacion
COLUMN OF oReport ;
TITLE "Telefono" ;
DATA ::oDbfPersonas:telefono
RUN REPORT oReport
oFont1:Destroy()
oFont2:Destroy()
pero en la version 1.7 me da el siguiente error da el
siguiente error.
***************************** Registro de errores *****************************
Fecha: 09-09-07
Hora: 18:34:06
Memoria libre: 122132
Area actual: 1
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 1.7.0 Version 1.7
Compilador: xHarbour build 0.99.80 Intl. (SimpLex) PCode Version: 9
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <HIDDEN>
Operación: ADJUST
Argumentos: [ 1] = Tipo: O Valor:
Fichero:
Código error SO: 0
Pila de llamadas:
(b)TREPORT:ADJUST (193)
AEVAL (0)
TREPORT:ADJUST (193)
TREPORT:RUN (364)
TFORM1:IMPRIMIRCLICK (221)
TTOOLBUTTON:ONCLICK (0)
(b)XTOOLBUTTON:XTOOLBUTTON (41)
TTOOLBUTTON:CLICK (0)
TTOOLBAR:COMMAND (377)
TREBAR:WMCOMMAND (253)
TFORM1:SHOWMODAL (0)
TMENUCITI:MENU_COMI_ALMOBOLISTA_1CLICK (32)
TMENUITEM:ONCLICK (0)
TMENU:DOACTION (231)
TMENU:DOACTION (236)
TMENUCITI:WMCOMMAND (878)
RUNFORM (0)
TAPPLICATION:RUN (209)
MAIN (16)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: PERSONA
Registro: 1
Filtro:
Relación:
Orden del í­ndice: 0
Clave activa: 0
--

error en treport

Publicado: Dom Sep 09, 2007 6:42 pm
por PILO
Tambien lo da en el ejemplo de basicreport en la 1.7
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:[email=46e42185@ozsrv2.ozlan.local...]46e42185@ozsrv2.ozlan.local...[/email]
En la version 1.6.1 en el treport no da errer
este ejemplo con la dbf,
Local oReport, oFont1, oFont2
With Object oFont1 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
With Object oFont2 := TFont():New()
:cName := "Arial"
:nSize := 8
:lBold := .f.
END WITH
::oDbfPersonas:GOTOP()
REPORT oReport;
TITLE "lista de personal";
PREVIEW ;
FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Recno" ;
DATA Recno() ;
ALIGN taRIGHT ;
FONT 2
COLUMN OF oReport ;
TITLE "nombre" ;
DATA ::oDbfPersonas:NOMBRE // This is a calculated field
COLUMN OF oReport ;
TITLE "Dirección" ;
DATA ::oDbfPersonas:direccion
COLUMN OF oReport ;
TITLE "Poblacion" ;
DATA ::oDbfPersonas:poblacion
COLUMN OF oReport ;
TITLE "Telefono" ;
DATA ::oDbfPersonas:telefono
RUN REPORT oReport
oFont1:Destroy()
oFont2:Destroy()
pero en la version 1.7 me da el siguiente error da el
siguiente error.
***************************** Registro de errores *****************************
Fecha: 09-09-07
Hora: 18:34:06
Memoria libre: 122132
Area actual: 1
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 1.7.0 Version 1.7
Compilador: xHarbour build 0.99.80 Intl. (SimpLex) PCode Version: 9
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <HIDDEN>
Operación: ADJUST
Argumentos: [ 1] = Tipo: O Valor:
Fichero:
Código error SO: 0
Pila de llamadas:
(b)TREPORT:ADJUST (193)
AEVAL (0)
TREPORT:ADJUST (193)
TREPORT:RUN (364)
TFORM1:IMPRIMIRCLICK (221)
TTOOLBUTTON:ONCLICK (0)
(b)XTOOLBUTTON:XTOOLBUTTON (41)
TTOOLBUTTON:CLICK (0)
TTOOLBAR:COMMAND (377)
TREBAR:WMCOMMAND (253)
TFORM1:SHOWMODAL (0)
TMENUCITI:MENU_COMI_ALMOBOLISTA_1CLICK (32)
TMENUITEM:ONCLICK (0)
TMENU:DOACTION (231)
TMENU:DOACTION (236)
TMENUCITI:WMCOMMAND (878)
RUNFORM (0)
TAPPLICATION:RUN (209)
MAIN (16)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: PERSONA
Registro: 1
Filtro:
Relación:
Orden del í­ndice: 0
Clave activa: 0
--

error en treport

Publicado: Mar Sep 11, 2007 12:49 am
por Fernando Hernandez
A mi me da el mismo error, aunque el dataset es de Oracle, no logro ver que pasa, adjunto parte del codigo.
if ::oOK
clsqlQuery:="SELECT B.DIAVISITA,B.SECUENCIA,A.CLIENTE,B.NOMBRE,B.RAZONSOCIAL,A.E MPRESA,C.PLAZO,C.CLASECLIENTE,C.GARANTIA,B.SEMANA,C.LIMITE,C .LIMITE-C.SALDO SOBREGIRO,C.SALDO SALDOTOT,C.FV,C.FC,C.FI,C.FECHAULTIMOCOBRO,C.FECHAULTIMAVENT A,C.VALORULTIMAVENTA,C.VTAPROMEDIO,A.TIPODOC,A.SERIE,A.PREIM PRESO,A.FECHA,A.VENCIMIENTO,0 DIAS,A.MONTO,A.SALDO FROM PDA_FACTURAS A,PDA_CLIENTES B,PDA_CLIENTESXEMPRESA C WHERE A.CLIENTE=B.CODIGOPOCKET AND A.CLIENTE=C.CLIENTE AND A.EMPRESA=C.EMPRESA AND A.VENDEDOR='"+clvendedor +"' AND B.DIAVISITA='"+clDiaVisita+"' ORDER BY B.DIAVISITA,B.SECUENCIA,A.CLIENTE,A.EMPRESA"
clDataset:=appdata:op_adodata:Query(clsqlquery)
cldataset:lopen:=.t.
With Object oFont16 := TFont():New()
:cName := "Arial"
:nSize := 16
:lBold := .f.
END WITH
With Object oFont12 := TFont():New()
:cName := "Arial"
:nSize := 12
:lBold := .T.
END WITH
With Object oFont10 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
With Object oFont8 := TFont():New()
:cName := "Arial"
:nSize := 8
:lBold := .f.
END WITH
REPORT oReport TITLE "Reporte de Rutas" ;
HEADER DtoC( Date() ) + " " + Time() ;
FOOTER "Página: " + lTrim( Str( oReport:nPage ) ) ALIGN tarIGHT ;
JOBNAME "MovilPos - Reporte de Rutas"
//PREVIEW MODAL
oReport:ngridStyle = rgBOTH
//FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Cliente" ;
DATA cldataset:Nombre ;
ALIGN taLEFT
WITH OBJECT oReport
:bWhile := {|| !cldataset:Eof() }
:bSkip := {|| cldataset:Skip() }
END WITH
RUN REPORT oReport
oFont16:Destroy()
oFont12:Destroy()
oFont10:Destroy()
oFont8:Destroy()
cldataset:close()
Endif
Endif
Saludos
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:[email=46e4225d@ozsrv2.ozlan.local...]46e4225d@ozsrv2.ozlan.local...[/email]
Tambien lo da en el ejemplo de basicreport en la 1.7
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:[email=46e42185@ozsrv2.ozlan.local...]46e42185@ozsrv2.ozlan.local...[/email]
En la version 1.6.1 en el treport no da errer
este ejemplo con la dbf,
Local oReport, oFont1, oFont2
With Object oFont1 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
With Object oFont2 := TFont():New()
:cName := "Arial"
:nSize := 8
:lBold := .f.
END WITH
::oDbfPersonas:GOTOP()
REPORT oReport;
TITLE "lista de personal";
PREVIEW ;
FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Recno" ;
DATA Recno() ;
ALIGN taRIGHT ;
FONT 2
COLUMN OF oReport ;
TITLE "nombre" ;
DATA ::oDbfPersonas:NOMBRE // This is a calculated field
COLUMN OF oReport ;
TITLE "Dirección" ;
DATA ::oDbfPersonas:direccion
COLUMN OF oReport ;
TITLE "Poblacion" ;
DATA ::oDbfPersonas:poblacion
COLUMN OF oReport ;
TITLE "Telefono" ;
DATA ::oDbfPersonas:telefono
RUN REPORT oReport
oFont1:Destroy()
oFont2:Destroy()
pero en la version 1.7 me da el siguiente error da el
siguiente error.
***************************** Registro de errores *****************************
Fecha: 09-09-07
Hora: 18:34:06
Memoria libre: 122132
Area actual: 1
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 1.7.0 Version 1.7
Compilador: xHarbour build 0.99.80 Intl. (SimpLex) PCode Version: 9
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <HIDDEN>
Operación: ADJUST
Argumentos: [ 1] = Tipo: O Valor:
Fichero:
Código error SO: 0
Pila de llamadas:
(b)TREPORT:ADJUST (193)
AEVAL (0)
TREPORT:ADJUST (193)
TREPORT:RUN (364)
TFORM1:IMPRIMIRCLICK (221)
TTOOLBUTTON:ONCLICK (0)
(b)XTOOLBUTTON:XTOOLBUTTON (41)
TTOOLBUTTON:CLICK (0)
TTOOLBAR:COMMAND (377)
TREBAR:WMCOMMAND (253)
TFORM1:SHOWMODAL (0)
TMENUCITI:MENU_COMI_ALMOBOLISTA_1CLICK (32)
TMENUITEM:ONCLICK (0)
TMENU:DOACTION (231)
TMENU:DOACTION (236)
TMENUCITI:WMCOMMAND (878)
RUNFORM (0)
TAPPLICATION:RUN (209)
MAIN (16)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: PERSONA
Registro: 1
Filtro:
Relación:
Orden del í­ndice: 0
Clave activa: 0
--

error en treport

Publicado: Mar Sep 11, 2007 1:30 pm
por ignacio
Fernando,
Somos conscientes de este error. Será subsanada en la nueva versión que publicaremos esta tarde.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje news:[email=46e5c9ef@ozsrv2.ozlan.local...]46e5c9ef@ozsrv2.ozlan.local...[/email]
A mi me da el mismo error, aunque el dataset es de Oracle, no logro ver que pasa, adjunto parte del codigo.
if ::oOK
clsqlQuery:="SELECT B.DIAVISITA,B.SECUENCIA,A.CLIENTE,B.NOMBRE,B.RAZONSOCIAL,A.E MPRESA,C.PLAZO,C.CLASECLIENTE,C.GARANTIA,B.SEMANA,C.LIMITE,C .LIMITE-C.SALDO SOBREGIRO,C.SALDO SALDOTOT,C.FV,C.FC,C.FI,C.FECHAULTIMOCOBRO,C.FECHAULTIMAVENT A,C.VALORULTIMAVENTA,C.VTAPROMEDIO,A.TIPODOC,A.SERIE,A.PREIM PRESO,A.FECHA,A.VENCIMIENTO,0 DIAS,A.MONTO,A.SALDO FROM PDA_FACTURAS A,PDA_CLIENTES B,PDA_CLIENTESXEMPRESA C WHERE A.CLIENTE=B.CODIGOPOCKET AND A.CLIENTE=C.CLIENTE AND A.EMPRESA=C.EMPRESA AND A.VENDEDOR='"+clvendedor +"' AND B.DIAVISITA='"+clDiaVisita+"' ORDER BY B.DIAVISITA,B.SECUENCIA,A.CLIENTE,A.EMPRESA"
clDataset:=appdata:op_adodata:Query(clsqlquery)
cldataset:lopen:=.t.
With Object oFont16 := TFont():New()
:cName := "Arial"
:nSize := 16
:lBold := .f.
END WITH
With Object oFont12 := TFont():New()
:cName := "Arial"
:nSize := 12
:lBold := .T.
END WITH
With Object oFont10 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
With Object oFont8 := TFont():New()
:cName := "Arial"
:nSize := 8
:lBold := .f.
END WITH
REPORT oReport TITLE "Reporte de Rutas" ;
HEADER DtoC( Date() ) + " " + Time() ;
FOOTER "Página: " + lTrim( Str( oReport:nPage ) ) ALIGN tarIGHT ;
JOBNAME "MovilPos - Reporte de Rutas"
//PREVIEW MODAL
oReport:ngridStyle = rgBOTH
//FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Cliente" ;
DATA cldataset:Nombre ;
ALIGN taLEFT
WITH OBJECT oReport
:bWhile := {|| !cldataset:Eof() }
:bSkip := {|| cldataset:Skip() }
END WITH
RUN REPORT oReport
oFont16:Destroy()
oFont12:Destroy()
oFont10:Destroy()
oFont8:Destroy()
cldataset:close()
Endif
Endif
Saludos
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:[email=46e4225d@ozsrv2.ozlan.local...]46e4225d@ozsrv2.ozlan.local...[/email]
Tambien lo da en el ejemplo de basicreport en la 1.7
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:[email=46e42185@ozsrv2.ozlan.local...]46e42185@ozsrv2.ozlan.local...[/email]
En la version 1.6.1 en el treport no da errer
este ejemplo con la dbf,
Local oReport, oFont1, oFont2
With Object oFont1 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
With Object oFont2 := TFont():New()
:cName := "Arial"
:nSize := 8
:lBold := .f.
END WITH
::oDbfPersonas:GOTOP()
REPORT oReport;
TITLE "lista de personal";
PREVIEW ;
FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Recno" ;
DATA Recno() ;
ALIGN taRIGHT ;
FONT 2
COLUMN OF oReport ;
TITLE "nombre" ;
DATA ::oDbfPersonas:NOMBRE // This is a calculated field
COLUMN OF oReport ;
TITLE "Dirección" ;
DATA ::oDbfPersonas:direccion
COLUMN OF oReport ;
TITLE "Poblacion" ;
DATA ::oDbfPersonas:poblacion
COLUMN OF oReport ;
TITLE "Telefono" ;
DATA ::oDbfPersonas:telefono
RUN REPORT oReport
oFont1:Destroy()
oFont2:Destroy()
pero en la version 1.7 me da el siguiente error da el
siguiente error.
***************************** Registro de errores *****************************
Fecha: 09-09-07
Hora: 18:34:06
Memoria libre: 122132
Area actual: 1
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 1.7.0 Version 1.7
Compilador: xHarbour build 0.99.80 Intl. (SimpLex) PCode Version: 9
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <HIDDEN>
Operación: ADJUST
Argumentos: [ 1] = Tipo: O Valor:
Fichero:
Código error SO: 0
Pila de llamadas:
(b)TREPORT:ADJUST (193)
AEVAL (0)
TREPORT:ADJUST (193)
TREPORT:RUN (364)
TFORM1:IMPRIMIRCLICK (221)
TTOOLBUTTON:ONCLICK (0)
(b)XTOOLBUTTON:XTOOLBUTTON (41)
TTOOLBUTTON:CLICK (0)
TTOOLBAR:COMMAND (377)
TREBAR:WMCOMMAND (253)
TFORM1:SHOWMODAL (0)
TMENUCITI:MENU_COMI_ALMOBOLISTA_1CLICK (32)
TMENUITEM:ONCLICK (0)
TMENU:DOACTION (231)
TMENU:DOACTION (236)
TMENUCITI:WMCOMMAND (878)
RUNFORM (0)
TAPPLICATION:RUN (209)
MAIN (16)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: PERSONA
Registro: 1
Filtro:
Relación:
Orden del í­ndice: 0
Clave activa: 0
--

error en treport

Publicado: Mié Sep 12, 2007 4:52 pm
por PILO
Ignacio, lo del treport, esta ya subsanado o cuanto tardara.
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje news:46e67c42$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
Fernando,
Somos conscientes de este error. Será subsanada en la nueva versión que publicaremos esta tarde.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje news:[email=46e5c9ef@ozsrv2.ozlan.local...]46e5c9ef@ozsrv2.ozlan.local...[/email]
A mi me da el mismo error, aunque el dataset es de Oracle, no logro ver que pasa, adjunto parte del codigo.
if ::oOK
clsqlQuery:="SELECT B.DIAVISITA,B.SECUENCIA,A.CLIENTE,B.NOMBRE,B.RAZONSOCIAL,A.E MPRESA,C.PLAZO,C.CLASECLIENTE,C.GARANTIA,B.SEMANA,C.LIMITE,C .LIMITE-C.SALDO SOBREGIRO,C.SALDO SALDOTOT,C.FV,C.FC,C.FI,C.FECHAULTIMOCOBRO,C.FECHAULTIMAVENT A,C.VALORULTIMAVENTA,C.VTAPROMEDIO,A.TIPODOC,A.SERIE,A.PREIM PRESO,A.FECHA,A.VENCIMIENTO,0 DIAS,A.MONTO,A.SALDO FROM PDA_FACTURAS A,PDA_CLIENTES B,PDA_CLIENTESXEMPRESA C WHERE A.CLIENTE=B.CODIGOPOCKET AND A.CLIENTE=C.CLIENTE AND A.EMPRESA=C.EMPRESA AND A.VENDEDOR='"+clvendedor +"' AND B.DIAVISITA='"+clDiaVisita+"' ORDER BY B.DIAVISITA,B.SECUENCIA,A.CLIENTE,A.EMPRESA"
clDataset:=appdata:op_adodata:Query(clsqlquery)
cldataset:lopen:=.t.
With Object oFont16 := TFont():New()
:cName := "Arial"
:nSize := 16
:lBold := .f.
END WITH
With Object oFont12 := TFont():New()
:cName := "Arial"
:nSize := 12
:lBold := .T.
END WITH
With Object oFont10 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
With Object oFont8 := TFont():New()
:cName := "Arial"
:nSize := 8
:lBold := .f.
END WITH
REPORT oReport TITLE "Reporte de Rutas" ;
HEADER DtoC( Date() ) + " " + Time() ;
FOOTER "Página: " + lTrim( Str( oReport:nPage ) ) ALIGN tarIGHT ;
JOBNAME "MovilPos - Reporte de Rutas"
//PREVIEW MODAL
oReport:ngridStyle = rgBOTH
//FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Cliente" ;
DATA cldataset:Nombre ;
ALIGN taLEFT
WITH OBJECT oReport
:bWhile := {|| !cldataset:Eof() }
:bSkip := {|| cldataset:Skip() }
END WITH
RUN REPORT oReport
oFont16:Destroy()
oFont12:Destroy()
oFont10:Destroy()
oFont8:Destroy()
cldataset:close()
Endif
Endif
Saludos
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:[email=46e4225d@ozsrv2.ozlan.local...]46e4225d@ozsrv2.ozlan.local...[/email]
Tambien lo da en el ejemplo de basicreport en la 1.7
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:[email=46e42185@ozsrv2.ozlan.local...]46e42185@ozsrv2.ozlan.local...[/email]
En la version 1.6.1 en el treport no da errer
este ejemplo con la dbf,
Local oReport, oFont1, oFont2
With Object oFont1 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
With Object oFont2 := TFont():New()
:cName := "Arial"
:nSize := 8
:lBold := .f.
END WITH
::oDbfPersonas:GOTOP()
REPORT oReport;
TITLE "lista de personal";
PREVIEW ;
FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Recno" ;
DATA Recno() ;
ALIGN taRIGHT ;
FONT 2
COLUMN OF oReport ;
TITLE "nombre" ;
DATA ::oDbfPersonas:NOMBRE // This is a calculated field
COLUMN OF oReport ;
TITLE "Dirección" ;
DATA ::oDbfPersonas:direccion
COLUMN OF oReport ;
TITLE "Poblacion" ;
DATA ::oDbfPersonas:poblacion
COLUMN OF oReport ;
TITLE "Telefono" ;
DATA ::oDbfPersonas:telefono
RUN REPORT oReport
oFont1:Destroy()
oFont2:Destroy()
pero en la version 1.7 me da el siguiente error da el
siguiente error.
***************************** Registro de errores *****************************
Fecha: 09-09-07
Hora: 18:34:06
Memoria libre: 122132
Area actual: 1
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 1.7.0 Version 1.7
Compilador: xHarbour build 0.99.80 Intl. (SimpLex) PCode Version: 9
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <HIDDEN>
Operación: ADJUST
Argumentos: [ 1] = Tipo: O Valor:
Fichero:
Código error SO: 0
Pila de llamadas:
(b)TREPORT:ADJUST (193)
AEVAL (0)
TREPORT:ADJUST (193)
TREPORT:RUN (364)
TFORM1:IMPRIMIRCLICK (221)
TTOOLBUTTON:ONCLICK (0)
(b)XTOOLBUTTON:XTOOLBUTTON (41)
TTOOLBUTTON:CLICK (0)
TTOOLBAR:COMMAND (377)
TREBAR:WMCOMMAND (253)
TFORM1:SHOWMODAL (0)
TMENUCITI:MENU_COMI_ALMOBOLISTA_1CLICK (32)
TMENUITEM:ONCLICK (0)
TMENU:DOACTION (231)
TMENU:DOACTION (236)
TMENUCITI:WMCOMMAND (878)
RUNFORM (0)
TAPPLICATION:RUN (209)
MAIN (16)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: PERSONA
Registro: 1
Filtro:
Relación:
Orden del í­ndice: 0
Clave activa: 0
--