Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Pamela Bernardo de Souza

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Victor Azevedo Fernandes Ferreira

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

O ponto de entrada F160GRV, permite a edição dos registros existentes na tabela temporária ao fim de todo processamento de busca do 1601 - EFD ICMS/IPI.

03. PARÂMETROS

...

04. ESTRUTURA TABELA TEMPORÁRIA


SIM

Campo

Tipo

Descrição

Obrigatório

REGIME

Caractere

Identifica se o registro é referente a Inclusão (COMPETÊNCIA) ou pagamento (CAIXA)

SIM
CARTEIRACaractereIdentifica se o registro é receber (R) ou pagar (P)SIM
BANCOCaractereCodigo Banco, Agencia e contaSIM
CNPJBCOCaractereCNPJ do Instituição financeira portadora do recebimento ou pagamento.Não
FILORIGCaractereFilial de Origem do movimentoSIM
DT_EMISSAODataData de emissão do registroSIM
ORIGEMCaractereRotina de origem do registroSIM
PREFIXOCaracterePrefixo do títuloSIM
NUMEROCaractereNúmero do TítuloSIM
PARCELACaractereParcela do títuloSIM
TIPOCaractereTipo do TítuloSIM
SITUACAOCaractereSituação de CobrançaNÃO
SALDONuméricoSaldo do títuloNÃO
MOEDANuméricoMoeda do títuloSIM
TXMOEDANuméricoTaxa da moedaNÃO
IDDOCCaractereId Do título (FK7_IDDOC)SIM
CLIFORCaractereCódigo do Cliente ou FornecedorSIM
LOJACaractereLoja do Cliente ou FornecedorSIM
CODBARCaractereCódigo de BarrasNÃO
INTERMEDCaractereCódigo da instituição intermediadora (F1_CODA1U ou F2_CODA1U)NÃO
VALORNuméricoValor do título ou pagamentoSIM
DT_BAIXADataData da Baixa ou pagamentoNão
MOTBXCaractereMotivo de BaixaSIM
MODELOCaractereModelo do borderô a pagar (EA_MODELO)NÃO
IDBAIXACaractereId da baixa (FK1_IDFK1 ou FK2_IDFK2)NÃO
FORMA_PGTOCaractereForma de pagamentoSIM

05. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagevb
themeMidnight
firstline1
titleF160GRV
linenumberstrue
#include 'protheus.ch'
  
/*/{Protheus.doc} F160GRV() 
 
 
    Ponto de entrada para edição dos registros enviados ao registro 1601 EFD ICMS/IPI.
      
    @param ParamIxb[1] - cAlias da tabela temporária para edição dos registros 1601
    @return Nil
/*/
  
User Function F160GRV()
  
    Local cAliastmp  := ParamIXB[1] //alias da tabela temporária
 
    (cAliasTmp)->(DbGoTop())
 
    While (cAliasTmp)->(!Eof())
 
        If AllTrim((cAliasTmp)->MOTBX) == 'NOR' .And. AllTrim((cAliasTmp)->CARTEIRA>FORMA_PGTO) == 'RBOL'
            RecLock(cAliasTmp, .F.)
				                (cAliasTmp)->FORMA_PGTO>REGIME := 'DC' //Debito em Conta
			COMPETÊNCIA'
            (cAliasTmp)->(MsUnlock())
        EndIf
        (cAliasTmp)->(DbSkip())
 
    EndDo
 
  
Return Nil



Templatedocumentos

...