SpedFiscalPisCofinsAdicionaRegistro0190

Tipo de Retorno

Boolean

Pacote

A função SpedFiscalPisCofinsAdicionaRegistro0190 está defiinida no pacote SpedFiscalPisCofinsAdicionaRegistro0190.pkg.

Para que serve

A função SpedFiscalPisCofinsAdicionaRegistro0190 é usada para fazer a adição de um registro 0190 no vetor de registros 0190. Ela irá verificar se já existe um registro 0190 com o mesmo valor de campo sUNID. Se não houver, irá acrescentar o novo registro no array. Se já existir, não fará nada.

Sintaxe

Move (SpedFiscalPisCofinsAdicionaRegistro0190({vtRegistro0190Adicionar}, ;
(&{vtRegistros0190}, {bPISCOFINS}, {bExibeErro}, ;
(&{sMsgErro}))) to {bRetorno}

Onde:

  • {vtRegistro0190Adicionar} é uma variável do tipo tSpedFiscalPisCofinsRegistro0190 com o novo registro que será adicionado em vtRegistros0190.
  • &{vtRegistros0190} é uma variável do tipo tSpedFiscalPisCofinsRegistro0190[] que precisa ser passada via referência. Esta variável do tipo array, contém todos os registros 0190 já acrescentados na estrutura do arquivo que está sendo gerado.
  • {bPISCOFINS} é usado para indicar para a função qual é o tipo de arquivo que deve ser gerado:
    • True: será gerado o arquivo do EFD-Contribuições.
    • False: será gerado o arquivo do Sped Fiscal.
  • {bExibeErro} é usado para indicar se a função deve exibir ou não os erros que ocorrerem na execução.
  • &{sMsgErro} é uma variável do tipo String que precisa ser passada via referência. No caso de ocorrer algum erro durante a execução a função devolverá nesta variável a mensagem do erro ocorrido.
  • {bRetorno} indica se a função foi executada com sucesso (True) ou não (False).

Exemplo

Use SpedFiscalLibrary_PacotesSpedFiscalPisCofinsAdicionaRegistro0190.pkg
:
:
tSpedFiscalPisCofinsRegistro0190 vtRegistro0190
:
tSpedFiscalPisCofinsRegistro0190 vtRegistro0190
:
:Move "ZZZZZZZZZZZZZZ" to SpedPart.sCNPJ_CPF
Move ItNota.sUnidade to vtRegistro0190.sUNID Move Produto.sDescricao to vtRegistro0190.sDESCR

If (not(SpedFiscalPisCofinsAdicionaRegistro0190(vtRegistro0190, ;
(&vtArquivo.vtBloco0.vtRegistros0190), ;
False,True,(&sMsgErro)))) Function_Return False

O exemplo acima contém particularidades específicas do sistema onde foi implementado para chegar à informação desejada. O objetivo do exemplo é mostrar o preenchimento da estrutura vtRegistro0190 e a chamada da função.

Observações

  • Para que esta função funcione, todos os registros 0190 devem ser adicionados através de sua utilização.
  • Veja mais detalhes sobre o processo completo de geração do arquivo em "Gerando o arquivo".