Bom dia!
Gostaria de saber se alguém possui algum exemplo de modo posso estar fazendo o relacionamento entre dois grids no MVC. Da forma que estou tentando, está gerando error log.
Segue parte do meu código:
//Monta os dados do cabeçalho
oModel:AddFields('ModelMaster',,oStruct)
oModel:SetPrimaryKey({'ZTO_FILIAL','ZTO_CODIGO'})
oModel:GetModel('ModelMaster'):SetDescription('Cadastro Principal')
//Monta os dados do grid de verbas
oModel:AddGrid('ModelGrid','ModelMaster',oStruGrid,,/*bPreGrid*/,/*bPreGrid*/,/*bProsGrid*/)
oModel:SetRelation('ModelGrid',{ {'ZRO_FILIAL','ZTO_FILIAL'},{'ZRO_CODIGO','ZTO_CODIGO'} }, ZRO->(IndexKey(1)) )
oModel:GetModel('ModelGrid'):SetUniqueLine( {'ZRO_COMPET'} )
oModel:GetModel('ModelGrid'):SetDescription('Verbas por Competência')
oModel:GetModel('ModelGrid'):SetOptional(.F.)
//Monta os dados do grid de grupo de clientes
oModel:AddGrid('GridGrpCli','ModelGrid',oStruGrpCli,,{ |oModel| fLineOk(oModel) },/*bPreGrid*/,/*bProsGrid*/)
oModel:SetRelation('GridGrpCli',{ {'ZRW_FILIAL','ZRO_FILIAL'},{'ZRW_CODIGO','ZRO_CODIGO'},{'ZRW_COMPET','ZRO_COMPET'} }, ZRW->(IndexKey(1)) )
oModel:GetModel('GridGrpCli'):SetUniqueLine( {'ZRW_GRPCLI'} )
oModel:GetModel('GridGrpCli'):SetDescription('Grupo de Clientes')
oModel:GetModel('GridGrpCli'):SetOptional(.T.)Segue error log gerado: Cannot find method FWFORMGRIDMODEL:GETWHENFIELDS on FWFORMVIEW:GETWHENFIELDS(FWFORMVIEW.PRW)