FWLoadByAlias

Função: FWLoadByAlias

Compatível Países:	Todos
Sistemas Operacionais:	Todos
Compatível às Bases de Dados:	Todos
Nível de Acesso:	Nível 1 (Acesso Clientes)
Idiomas:	Português, Inglês, Espanhol
Versão	P10 R1.4

Sintaxe

FWLoadByAlias(<oObj >, <cAlias >, [ cAliasReal ], [ cFieldRecno ], [ lCopy ], [ lQuery ])-> NIL

Descrição

Função que realiza a carga de um submodelo baseado em um alias existente

Parâmetros

Nome	Tipo	Descrição	Default	Obrigatório	Referência
oObj	Objeto	Objeto do submodelo (FWFormFieldsModel ou FWFormGridModel)		X
cAlias	Caracteres	Alias para carga .		X
cAliasReal	Caracteres	Alias Real. Utilizado para carga de campos MEMO reais na tabela, se houver e para uso real de inicializadores padrao, se nao for informado usa a tabela definida na estrutura do objeto.
cFieldRecno	Caracteres	Nome do campo que contem o numero do recno. Quando a tabela foi criada a partir de uma query deve ter uma coluna contendo o recno() real do registro. Se o nome desta coluna for R_E_C_N_O_ ou RECNO ou Alias+RECNO, nao é preciso informar o nome da coluna neste parametro, caso contrario deve-se informar.	''
lCopy	Lógico	Apenas para compatibilidade, Nao usar	.F.
lQuery	Lógico	Indica que o alias foi criado a partir de uma query.	.T.

Exemplo

Function LoadZA4( oObj, lCopy )
Local aArea := GetArea()
Local aRet := {}
Local cTmp := ''
Local cQuery := ''

cTmp := GetNextAlias()
cQuery := ""
cQuery += "SELECT *, R_E_C_N_O_ RECNO FROM " + RetSqlName( 'ZA4' ) + " ZA4 "
cQuery += " WHERE ZA4_FILIAL = '" + xFilial('ZA4') + "' "
cQuery += " AND ZA4_ALBUM = '001' "
cQuery += " AND ZA4.D_E_L_E_T_ = ' ' "

dbUseArea( .T., "TOPCONN", TcGenQry( ,, cQuery ) , cTmp, .F., .T. )

// Como tem o campo R_E_C_N_O_, nao é preciso informar qual o campo contem o Recno() real
aRet := FWLoadByAlias( oObj, cTmp, 'ZA4' )

(cTmp)->( dbCloseArea() )

RestArea( aArea )

Return aRet

Space shortcuts

Child pages