Bom dia a todos. Após a correção de todos os fontes do nosso projeto, o único erro que ainda está sendo apontado pelo "CodeAnalysis" é esse:"Formato de leitura não permitido do Metadados - SX3". Eu já passei a utilizar a "OpenSXs", no entanto, o erro permanece (trecho do código - Static Function MHoBrw1):
Local cAliasX3 := GetNextAlias()
OpenSXs(,,,,cEmpAnt,cAliasX3,"SX3",,.F.)
If Select(cAliasX3) # 0
DbSelectArea(cAliasX3)
DbSetOrder(1)
DbSeek("SD3")
While (cAliasX3)->(!Eof()) .AND. (cAliasX3)->X3_ARQUIVO == "SD3"
If cNivel >= (cAliasX3)->X3_NIVEL .AND. RTrim((cAliasX3)->X3_CAMPO) $ "D3_FILIAL|D3_COD|D3_LOCAL|D3_QUANT|D3_DOC|D3_EMISSAO"
noBrw1++
Aadd(aHoBrw1,{Trim((cAliasX3)->X3_TITULO),;
(cAliasX3)->X3_CAMPO,;
(cAliasX3)->X3_PICTURE,;
(cAliasX3)->X3_TAMANHO,;
(cAliasX3)->X3_DECIMAL,;
(cAliasX3)->X3_VALID,;
(cAliasX3)->X3_USADO,;
(cAliasX3)->X3_TIPO,;
(cAliasX3)->X3_F3,;
(cAliasX3)->X3_CONTEXT,;
(cAliasX3)->X3_CBOX,;
(cAliasX3)->X3_RELACAO,;
(cAliasX3)->X3_WHEN,;
"V"/(cAliasX3)->X3_VISUAL/,; // Os valores do aCols nao deverao ser editados
(cAliasX3)->X3_VLDUSER,;
(cAliasX3)->X3_PICTVAR,;
(cAliasX3)->X3_OBRIGAT} )
EndIf
(cAliasX3)->(DbSkip())
EndDo
(cAliasX3)->(DbCloseArea())
EndIf
Segue o RdMake em anexo para que se alguém souber o porque do erro, nos ajudar.
Atenção: Esta publicação foi transferida automaticamente do fórum antigo, mas os anexos não foram incluídos.
Atenção: Esta publicação foi transferida automaticamente do fórum antigo, mas os anexos não foram incluídos.