FiveTech Software tech support forums

by **shrifw** » Mon Aug 07, 2023 9:48 am

Dear Rao Sir ,

I am getting the below error in XBROWSE using with Seek for MariDB Rowset.

Code: Select all Expand view RUN: Application =========== Path and name: D:\vimcosoft\V9ACC\v9acc.exe (32 bits) Size: 5,338,624 bytes Compiler version: Harbour 3.2.0dev (r2008190002) FiveWin version: FWH 23.07 C compiler version: Borland/Embarcadero C++ 7.0 (32-bit) Windows 10 64 Bits, version: 6.2, Build 9200 Time from start: 0 hours 0 mins 7 secs Error occurred at: 07/08/2023, 15:16:06 Error description: Error BASE/1111 Argument error: LEN Args: [ 1] = U Stack Calls =========== Called from: => LEN( 0 ) Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:SHOWSEEK( 9472 ) Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:SEEK( 9530 ) Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:KEYCHAR( 3907 ) Called from: => TWINDOW:HANDLEEVENT( 0 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1857 ) Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 12427 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 3693 ) Called from: => DIALOGBOXINDIRECT( 0 ) Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 307 ) Called from: D:\vimcosoft\V9ACC\PRGS\util_lov.prg => LOV( 162 ) Called from: D:\vimcosoft\V9ACC\PRGS\util_lov.prg => (b)LOVCTRLSET( 9 ) Called from: .\source\classes\TGET.PRG => TGET:KEYCHAR( 2326 ) Called from: => TWINDOW:HANDLEEVENT( 0 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1857 ) Called from: .\source\classes\TGET.PRG => TGET:HANDLEEVENT( 1306 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 3693 ) Called from: => DIALOGBOXINDIRECT( 0 ) Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 307 ) Called from: D:\vimcosoft\V9ACC\PRGS\m_staxcategory.prg => VSTC_MASTER( 133 ) Called from: D:\vimcosoft\V9ACC\PRGS\util_appwin.prg => (b)VFA_CTRLPNEL_DOCK_TILEMENU( 36 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 792 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 1083 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1847 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 2135 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 3693 ) Called from: => WINRUN( 0 ) Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 1118 ) Called from: D:\vimcosoft\V9ACC\PRGS\vfa_compgate.prg => COMPGATEWAY( 45 ) Called from: D:\vimcosoft\V9ACC\PRGS\v9.prg => MAIN( 69 ) System ====== CPU type: Intel(R) Core(TM) i7-4770 CPU @ 3.40GHz 3392 Mhz Hardware memory: 16254 megs Free System resources: 90 % GDI resources: 90 % User resources: 90 % Windows total applications running: 4 1 , 2 , C:\WINDOWS\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.19041.1110_none_a8625c 3 , D:\vimcosoft\V9ACC\v9acc.exe 4 GDI+ Window (v9acc.exe), C:\WINDOWS\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.19041.2251_none_d9513b1fe1046f Variables in use ================ Procedure Type Value ========================== LEN Param 1: O Class: ERROR TXBROWSE:SHOWSEEK Param 1: U Local 1: U Local 2: U TXBROWSE:SEEK Param 1: C "S" Local 1: U Local 2: S @_CTEXT() Local 3: O Class: TGET Local 4: S @PADR() Local 5: U Local 6: C "S" TXBROWSE:KEYCHAR Param 1: C "S" Local 1: N 1 Local 2: U Local 3: U Local 4: U Local 5: U Local 6: N 1 Local 7: L .T. Local 8: U Local 9: L .F. Local 10: L .F. TWINDOW:HANDLEEVENT Param 1: N 83 Param 2: N 0 Local 1: B {|| ... } Local 2: O Class: TXBRWCOLUMN Local 3: C "S" Local 4: U TCONTROL:HANDLEEVENT Param 1: N 258 Param 2: N 83 Param 3: N 0 TXBROWSE:HANDLEEVENT Param 1: N 258 Param 2: N 83 Param 3: N 0 Local 1: U _FWH Param 1: N 258 Param 2: N 83 Param 3: N 0 DIALOGBOXINDIRECT Param 1: N 0 Param 2: N 258 Param 3: N 83 Param 4: N 0 Param 5: N 21 Local 1: O Class: TXBROWSE TDIALOG:ACTIVATE Param 1: N 4194304 Param 2: C " € P , ~ 3 !P } 2 † T X B R O W S E " Param 3: N 1575478 Param 4: O Class: TDIALOG LOV Param 1: U Param 2: U Param 3: U Param 4: L .F. Param 5: U Param 6: L .T. Param 7: U Param 8: U Param 9: U Param 10: U Param 11: U Param 12: L .F. Param 13: O Class: TDIALOG Param 14: U Local 1: N 1575478 Local 2: S @_NRESULT() Local 3: O Class: TDIALOG (b)LOVCTRLSET Param 1: O Class: TGET Param 2: N 83 Param 3: N 2031617 Local 1: N 153 Local 2: N 153 Local 3: N 403 Local 4: N 252 Local 5: O Class: TDIALOG Local 6: N 99 Local 7: N 250 Local 8: O Class: TXBROWSE Local 9: A Len: 4 Local 10: A Len: 4 Local 11: O Class: FWMARIAROWSET Local 12: N 0 Local 13: N 0 Local 14: N 0 Local 15: N 2 TGET:KEYCHAR Param 1: N 83 Param 2: N 2031617 Param 3: O Class: TGET TWINDOW:HANDLEEVENT Param 1: N 83 Param 2: N 2031617 Local 1: N 0 Local 2: N 0 Local 3: U Local 4: U Local 5: U TCONTROL:HANDLEEVENT Param 1: N 258 Param 2: N 83 Param 3: N 2031617 TGET:HANDLEEVENT Param 1: N 258 Param 2: N 83 Param 3: N 2031617 Local 1: U _FWH Param 1: N 258 Param 2: N 83 Param 3: N 2031617 Local 1: U Local 2: U DIALOGBOXINDIRECT Param 1: N 2031617 Param 2: N 258 Param 3: N 83 Param 4: N 2031617 Param 5: N 15 Local 1: O Class: TGET TDIALOG:ACTIVATE Param 1: N 4194304 Param 2: C " € $ ÈÒ P Ç v S T A T I C G S T C a t e g o r y M a s t e r P · w T B T N B M P [ x ] P < x S T A T I C G S T C a t e g o r y P K y S T A T I C : € P W € z E D I T P " < { S T A T I C T a x T y p e P K " | S T A T I C : € P P " } } E D I T P ‡ Z - ~ T B T N B M P & S a v e P ¹ Z - T B T N B M P & Q u i t P Z - € T B T N B M P & L i s t " Param 3: N 658128 Param 4: O Class: TDIALOG VSTC_MASTER Param 1: U Param 2: U Param 3: B {|| ... } Param 4: L .F. Param 5: U Param 6: L .T. Param 7: B {|| ... } Param 8: U Param 9: U Param 10: U Param 11: U Param 12: L .F. Param 13: O Class: TDIALOG Param 14: U Local 1: N 658128 Local 2: S @_NRESULT() Local 3: O Class: TDIALOG (b)VFA_CTRLPNEL_DOCK_TILEMENU Local 1: U Local 2: O Class: TDIALOG Local 3: N 0 Local 4: A Len: 5 Local 5: A Len: 5 Local 6: A Len: 10 Local 7: O Class: FWMARIAROWSET Local 8: O Class: TDATAROW Local 9: U Local 10: N 69 Local 11: A Len: 2 TBTNBMP:CLICK Param 1: O Class: TBTNBMP TBTNBMP:LBUTTONUP TCONTROL:HANDLEEVENT Param 1: N 24 Param 2: N 48 Param 3: N 0 Local 1: L .T. Local 2: N 0 Local 3: S @CLICK() TBTNBMP:HANDLEEVENT Param 1: N 514 Param 2: N 0 Param 3: N 1572912 Local 1: U _FWH Param 1: N 514 Param 2: N 0 Param 3: N 1572912 WINRUN Param 1: N 1572912 Param 2: N 514 Param 3: N 0 Param 4: N 1572912 Param 5: N 6 Local 1: O Class: TBTNBMP TWINDOW:ACTIVATE Param 1: N 658128 COMPGATEWAY Param 1: C "MAXIMIZED" Param 2: U Param 3: U Param 4: U Param 5: U Param 6: B {|| ... } Param 7: U Param 8: U Param 9: U Param 10: U Param 11: U Param 12: U Param 13: U Param 14: U Param 15: U Param 16: U Param 17: U Param 18: U Param 19: U Param 20: L .F. Local 1: O Class: TWINDOW Local 2: U Local 3: U MAIN Local 1: A Len: 10 Local 2: O Class: TICON Linked RDDs =========== DBF DBFFPT DBFBLOB DBFCDX DBFNTX DataBases in use ================ Classes in use: =============== 1 ERROR 2 HBCLASS 3 HBOBJECT 4 TAPPLICATION 5 TWINDOW 6 TCONTROL 7 TGET 8 TFONT 9 TBRUSH 10 TICON 11 TDIALOG 12 TREG32 13 TRECT 14 TINI 15 FWMARIACONNECTION 16 FWROWSET 17 FWMARIAROWSET 18 TFIELD 19 TFIELDS 20 TSAY 21 TXBROWSE 22 TXBRWCOLUMN 23 TSCROLLBAR 24 TBTNBMP 25 TCLIPBOARD 26 TDATAROW 27 GET 28 TCLIPGET 29 TSTRUCT Memory Analysis =============== 763 Static variables Dynamic memory consume: Actual Value: 2162688 bytes Highest Value: 2162688 bytes

by **nageswaragunupudi** » Mon Aug 07, 2023 6:27 pm

How did you define the Get oBrw:oSeek in your program?
Let us see the code.

by **shrifw** » Tue Aug 08, 2023 7:00 am

Dear Rao Sir ,

Yes..! there is wrong in the code , I am passing GET Control as oBrw:oSeek = oGet something like and the variable of GET in some cases its becomes NULL that's why the error is coming.

By the way XBROWSE Seeking RECORD operations prevents letters to type to make properly need to press backspace key. I need your help in this cases. Thanks in advance...!

Thanks
Shridhar

by **nageswaragunupudi** » Tue Aug 08, 2023 8:13 am

So if you want to use Get, define Get properly.

What XBrowse natively provides is incremental Seek/Filter. That means, as and when the user presses a key, the seek/filter is performed. Many users like this feature,

But if you reject this feature and use a Get and ask the user to enter a seek expression first, then do you use this feature.

To experience the behavior of "incremental" seek/filter please

Code: Select all Expand view RUN: XBROWSER oRs AUTOSORT

and then play with the auto "incremental" seeks and filters.

Well, if you dont want this, the old traditional ways is always available to you.
Use a Get to get the seek expression, then you perform the seek yourself and refresh the browse

by **shrifw** » Tue Aug 08, 2023 10:44 am

Dear Rao Sir ,

May I request to get sample for the Old Style ?

Well, if you dont want this, the old traditional ways is always available to you.
Use a Get to get the seek expression, then you perform the seek yourself and refresh the browse

Thanks
Shridhar

by **nageswaragunupudi** » Tue Aug 08, 2023 6:38 pm

Set

Code: Select all Expand view RUN: oBrw:lIncrSeek := .f.

Use a normal Get and in the valid clause code something like this

Code: Select all Expand view RUN: //Seek the Get Value in your own way // then call oBrw:Refresh() oBrw:SetFocus() return .t.

FiveTech Software tech support forums

XBROWSE ERROR

XBROWSE ERROR

Re: XBROWSE ERROR

Re: XBROWSE ERROR

Re: XBROWSE ERROR

Re: XBROWSE ERROR

Re: XBROWSE ERROR

Who is online