Hi all, I get this error at random to run my program in the first DCREAD.
Someone can give me a clue as to why it occurs.
I accept any suggestion
The versions I use are Alaska Xbase + + 1.90.355 and eXPress + + 253
Error BASE/1012
Descripci¢n : Error in array index
Operaci¢n : :HandleEvent
Thread ID : 1
Llamado desde DC_GETLIST:EVENTLOOP(4079)
Llamado desde DC_GETLIST:READGUI(3394)
Llamado desde DC_READGUI(83)
Llamado desde MAIN(1863)
Thank you very much
MIguel
Error in array index
Re: Error in array index
Hi,
A sample of your source would help.
I don't know if you have declared getlist?
A sample of your source would help.
I don't know if you have declared getlist?
Re: Error in array index
Thank you for your help.
If I have said and as I asked getlist sent a sample of the code.
It is the main DCRE
But it seems that the error is eXpress + + code
Regards
Miguel
local GetList:=[0], GetOptions
DCGETOPTIONS ;
NOBUSY ;
WINDOWHEIGHT nWindowHeight ;
WINDOWWIDTH nWindowWidth ;
color {202,228,230} ;
bitmap fondo ;
AUTOWINDOWMENU ;
ABORTQUERY MSG {||iif(Alemas({"Silex Inform tica le agradece la ulilizaci¢n de su software",;
" y le recomienda realizar copias de seguridad con regularidad.",;
" ","¨Desea salir del programa SilCM?"})=NO,.F.,.t. )};
CLOSEQUERY MSG {||iif(Alemas({"Silex Inform tica le agradece la ulilizaci¢n de su software",;
" y le recomienda realizar copias de seguridad con regularidad.",;
" ","¨Desea salir del programa SilCM?"})=NO,.F.,.t. )};
EVAL {|o|SetAppWindow(o)}
DCREAD GUI ;
TITLE 'SilCM '+cVersionSilex ;
PARENT @oAppWindow;
OPTIONS GetOptions ;
EVAL {|o|o:SetFrameState(XBPDLG_FRAMESTAT_MAXIMIZED),; // Para que la ventana esté maximizada por defecto
M->PuGetlist:=GetList,;
USUARIO(.f.,@oSay03,.T.,@oSay01),;
oSay02:setcaption("Pan:"+padl(M->PERPAR,2)+" Mot: "+Sil_Leeini("ADS.INI","SETTINGS","ADS_SERVER_TYPE","1")),;
oSay03:setCaption(M->nombreusu),;
M->oVentanaXmain:=oAppWindow:drawingArea,;
ProgramasIniciales()}
If I have said and as I asked getlist sent a sample of the code.
It is the main DCRE
But it seems that the error is eXpress + + code
Regards
Miguel
local GetList:=[0], GetOptions
DCGETOPTIONS ;
NOBUSY ;
WINDOWHEIGHT nWindowHeight ;
WINDOWWIDTH nWindowWidth ;
color {202,228,230} ;
bitmap fondo ;
AUTOWINDOWMENU ;
ABORTQUERY MSG {||iif(Alemas({"Silex Inform tica le agradece la ulilizaci¢n de su software",;
" y le recomienda realizar copias de seguridad con regularidad.",;
" ","¨Desea salir del programa SilCM?"})=NO,.F.,.t. )};
CLOSEQUERY MSG {||iif(Alemas({"Silex Inform tica le agradece la ulilizaci¢n de su software",;
" y le recomienda realizar copias de seguridad con regularidad.",;
" ","¨Desea salir del programa SilCM?"})=NO,.F.,.t. )};
EVAL {|o|SetAppWindow(o)}
DCREAD GUI ;
TITLE 'SilCM '+cVersionSilex ;
PARENT @oAppWindow;
OPTIONS GetOptions ;
EVAL {|o|o:SetFrameState(XBPDLG_FRAMESTAT_MAXIMIZED),; // Para que la ventana esté maximizada por defecto
M->PuGetlist:=GetList,;
USUARIO(.f.,@oSay03,.T.,@oSay01),;
oSay02:setcaption("Pan:"+padl(M->PERPAR,2)+" Mot: "+Sil_Leeini("ADS.INI","SETTINGS","ADS_SERVER_TYPE","1")),;
oSay03:setCaption(M->nombreusu),;
M->oVentanaXmain:=oAppWindow:drawingArea,;
ProgramasIniciales()}
Re: Error in array index
Hi,
I would start to try with a simple dcread without getoptions and without EVAL.
I would start to try with a simple dcread without getoptions and without EVAL.
-
- Posts: 605
- Joined: Thu Jan 28, 2010 9:11 pm
- Location: Steven Point, Wisconsin USA
- Contact:
Re: Error in array index
Should Getlist := [0] be
GetList[0] or Getlist := {}
I cannot get the above to compile.
GetList[0] or Getlist := {}
I cannot get the above to compile.
Re: Error in array index
Thank you for your comment but the original is well defined code:
local nSegundosAnteriores:=0,GetList[0],GetOptions,oDlg,oSay1,oSay2
This is not the problem.
I was wrong to write the sample code.
local nSegundosAnteriores:=0,GetList[0],GetOptions,oDlg,oSay1,oSay2
This is not the problem.
I was wrong to write the sample code.
Re: Error in array index
I have never seen this error before.
I don't have enough information to figure this out for you.
Any chance that you can provide a sample program that I can compile and run?
I don't have enough information to figure this out for you.
Any chance that you can provide a sample program that I can compile and run?
The eXpress train is coming - and it has more cars.