Page tree

EDCOR100 - Geração de arquivo siscomex drawback

Descrição

EDCOR100 - Geração de arquivo siscomex drawback

Observações

Ponto de entrada para alteração das descrições dos produtos de importação e exportação na geração do arquivo siscomex drawback

Exemplos


#Include 'Protheus.ch'



User Function edcor100()
Local cParam

If ValType(ParamIXB) == "A"
cParam:= ParamIXB[1]
Else
cParam:= ParamIXB
EndIf

Do Case
Case cParam == "DESCRICAO_PRODUTO_EXP"
mDescri := "Teste Descricao produto EXP rdmake"
mDescri1 := "Teste Descricao produto EXP rdmake"
Case cParam == "DESCRICAO_PRODUTO_IMP"    
mDescri := "Teste Descricao produto IMP rdmake"
mDescri1 := "Teste Descricao produto IMP rdmake"
EndCase

Return

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11 e Microsiga_Protheus12

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros


NomeTipoDescriçãoDefaultObrigatórioReferência

DESCRICAO_PRODUTO_EXPC

Alterar a descrição do produto de exportação na geração do TXT de envio ao siscomex





DESCRICAO_PRODUTO_IMPCAlterar a descrição do produto de importação na geração do TXT de envio ao siscomex


Variáveis

NomeTipoEscopoPode AlterarDescrição
 mDescri CarácterPrivateSimVariável que receberá a descrição do produto
mDescri1 CarácterPrivatesimVariável que receberá a continuação da descrição do produto

Programa Fonte

EDCOR100.PRW