PARAMIXB / aTitArray direto com os campos da NDF; estrutura interna não detalhada. (Refs. 1–2)
AdvPL GuiaUser Function F340GERNDF()Complementa os campos usados na inclusão da NDF gerada pela compensação.
O TDN documenta um array com os campos a gravar na NDF e mostra Local aTit := PARAMIXB, sem índice [1]. A chamada P12.2210 também passa aTit diretamente e usa o retorno em a340GerNDF. A ficha cita FINXATU/FA340GeraNDF; a listagem cita FINA340/F340GERDIC, diferença de versão a conferir. Não foi documentado o layout interno de cada campo. (Refs. 1–2)
User Function F340GERNDF()PARAMIXB / aTitArray direto com os campos da NDF; estrutura interna não detalhada. (Refs. 1–2)
Array com todos os campos para inclusão da NDF. Preservar os campos recebidos ao acrescentar regras próprias.
#Include "Protheus.ch"
User Function F340GERNDF()
// Adaptação da leitura direta do exemplo TOTVS (ref. 1).
Local aCampos := AClone(PARAMIXB)
// Mantém todos os campos; não inventa posições para campos adicionais.
Return aCamposProposta didática com o comportamento descrito nos comentários. Conferir o contexto antes de compilar em homologação. Em revisão: exemplo não compilado nem executado em Protheus. Aliases, bloqueios, posição na transação e compatibilidade devem ser conferidos no release e patch utilizados.
// Trecho do chamador P12.2210 (EURAI, ref. 2); não é implementação do PE.
// FINA340.PRX - F340GERDIC() -> A340GERNDF := EXECBLOCK("F340GERNDF",.F.,.F.,ATIT)O registro mostra argumentos e uso imediato do retorno quando presentes. Não inclui o corpo completo do chamador nem comprova a posição do commit.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.