Page tree

EICDI154 - Recebimento de Importação

Ponto de Entrada

Descrição:

Disponibilizado o ponto de entrada EICDI154 com diversos parâmetros que possibilitam alterações na rotina de Recebimento de Importação.

Localização:

Atualizações/ Desembaraço/ Recebimento de Importação

Exemplos:


User Function EICDI154()


Local nValQuebra:= 150 //Quantidade de itens desejada por nota fiscal (alterar conforme necessidade)


IF PARAMIXB =="Tem_Outra_Quebra"
lQuebra_espe:=.T.
ELSEIF PARAMIXB == 'Quebrou_NF'
IF nTipoNF == 2 .Or. nTipoNF == 7 
IF Work1->WKNOTAOR <> cNumComp .OR. Work1->WKSERIEOR <> cSerieComp .Or. nItem >= nValQuebra
cNumComp := WORK1->WKNOTAOR
cSerieComp := WORK1->WKSERIEOR
lQuebrou_NF:= .T.
ENDIF
ELSE
IF nItem >= nValQuebra .OR.; 
cForn # Work1->WKFORN .OR. (EICLoja() .And. cForLoj # Work1->WKLOJA) .OR.; 
nItem == 0 .OR. If(lQuebraCFO, cCFO # Work1->WK_CFO,.F.) .OR.; 
(lIntDraw .AND. Work1->WKACMODAL # cACModal) .OR.;
(lQuebraOperacao .AND. cOperacao # Work1->WK_OPERACA)
lQuebrou_NF:= .T.
ENDIF
ENDIF
ENDIF


Return Nil

Parâmetros:

Nome

Tipo

Descrição

Obrigatório

 "Tem_Outra_Quebra"

Caracter

Possibilita customizar novas opções de quebra para a Nota Fiscal.


"GRAVACAO_SF1"CaracterChamada após gerar o cabeçalho da Nosta Fiscal.
Variáveis:
NomeTipoEscopoPode AlterarDescrição
cChaveSF1CaracterPrivateSimVariável com a chave da nota do momento do recebimento da importação.
Programa Fonte:EICDI154.PRW


Exemplo: