STRUCT oQueryAlias

          //type:STRING,NUMERIC,LOGICAL,DATE,DATETIME,CODEBLOCK,ARRAY,OBJECT,HASH>

          MEMBER cQueryAlias   AS STRING INIT ""
          MEMBER cColunaFiltro AS STRING INIT ""
          MEMBER aFieldSql     AS ARRAY  INIT {}
          MEMBER aWhereSql     AS ARRAY  INIT {}
          MEMBER aGroupSql     AS ARRAY  INIT {}
          MEMBER aOrderSql     AS ARRAY  INIT {}
          MEMBER nLimitSql     AS LONG   INIT 0
          MEMBER nOffSetSql    AS LONG   INIT 0

   ENDSTRUCT

Application
===========
   Path and name: C:\test\app.EXE (32 bits)
   Size: 1,961,984 bytes
   Time from start: 0 hours 0 mins 6 secs 
   Error occurred at: 16/01/2009, 19:31:26
   Error description: Error BASE/1106  Argument error: REPLICATE
   Args:
     [   1] = C    
     [   2] = U   

Stack Calls
===========
   Called from:  => REPLICATE(0)
   Called from: .\source\classes\TStruct.PRG => TSTRUCT:ADDMEMBER(0)
   Called from: C:\extras\xbrowse.prg => TXBROWSE:SETOBJQUERY(6233)
   Called from: C:\extras\xbrowse.prg => TXBROWSE:NEW(610)
   Called from: C:\modulos\Cadastros\Cadastro_Empresa.prg => SELECIONAEMPRESA(1411)
   Called from: C:\modulos\Cadastros\Cadastro_UsuariosSistema.prg => LOGINSISTEMA(632)
   Called from: C:\RepositorioLocal\main.prg => (b)MAIN(214)
   Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE(0)
   Called from: C:\RepositorioLocal\main.prg => MAIN(214)

#ifndef _H_STRUCTURE
#define _H_STRUCTURE

#xcommand STRUCTURE <hStruct> => <hStruct> := HSetCaseMatch( Hash(), .F. ) ; #undef _TSTRUCT_ ; #define _TSTRUCT_ <hStruct>
#xcommand STRUC <hStruct> => <hStruct> := HSetCaseMatch( Hash(), .F.) ; #undef _TSTRUCT_ ; #define _TSTRUCT_ <hStruct>

#xcommand MEMBER <cName, ...> ;
             [ AS <type:STRING,NUMERIC,LOGICAL,DATE,DATETIME,CODEBLOCK,ARRAY,OBJECT,HASH> ] ;
             [ INIT <uValue> ]          ;
          => ;
          HashAddMember( {<(cName)>}, <(type)>, <uValue>, _TSTRUCT_ )

#xcommand ENDSTRUCTURE => HSetAutoAdd( _TSTRUCT_, .f. )
#xcommand ENDSTRUC => HSetAutoAdd( _TSTRUCT_, .f. )

#translate DESTROY STRUCTURE <hStruct> => <hStruct> := nil

#endif