Histórico da Página

Composition Setup
import.css=/download/attachments/327912/newLayout.css

Função: FWLoadByAlias

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

padrão,
se

nao

não 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

não é preciso informar o nome da coluna neste

parametro

parâmetro, caso contrario deve-se informar.

Atenção: Caso a tabela possua campos MEMO e seja um GRID, o nome do campo precisa ser obrigatoriamente RECNO na query.

''

lCopy

Lógico

Apenas para compatibilidade,

Nao

Não usar	.F.
lQuery	Lógico	Indica que o alias foi criado a partir de uma query.	.T.

Exemplo

Bloco de código
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

Atalhos