Histórico da Página
...
02. EXEMPLO DE UTILIZAÇÃO
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#include "protheus.ch" |
...
//------------------------------------------------------------------- |
...
/*/{Protheus.doc} MA960GREC |
...
Ponto de Entrada para preenchimento dos campos F6_TIPOGNU, F6_DOCORIG, F6_DETRECE e F6_CODPROD de acordo com o código de receita e UF. |
...
@author |
...
@since |
...
/*/ |
...
//------------------------------------------------------------------- |
...
User Function MA960GREC() |
...
Local aParam := {0, '', '', 0, ''} //Parâmetros de retorno default |
...
Local cReceita := PARAMIXB[1] //Código de Receita da guia atual |
...
Local cUF := PARAMIXB[2] //Sigla da UF da guia atual |
...
If Alltrim(cReceita) $ '100099' .And. cUF $ 'RJ' //Valida o Código de Receita e sigla da UF da guia atual aParam := {24, '2', '', 7, ''} //Retorna os campos F6_TIPOGNU, F6_DOCORIG, F6_DETRECE e F6_CODPROD de acordo com o código de receita e sigla da UF da guia atual. EndIf If Alltrim(cReceita) $ '1260' .And. cUF $ 'ES' //Valida o Código de Receita e sigla da UF da guia atual |
...
aParam := {24, '2', '', 7, '5'} //Retorna os campos F6_TIPOGNU, F6_DOCORIG, F6_DETRECE e F6_CODPROD de acordo com o código de receita e sigla da UF da guia atual. |
...
EndIf |
...
Return aParam |
03. PRINCIPAIS CAMPOS E PARÂMETROS
Entrada:
...
| Campo | Tipo | Tamanho | Descrição |
|---|---|---|---|
aParam[1] | Numérico | 2 | F6_TIPOGNU |
aParam[2] | Caracteres | 1 | F6_DOCORIG |
| aParam[3] | Caracteres | 6 | F6_DETRECE |
| aParam[4] | Numérico | 3 | F6_CODPROD |
| aParam[5] | Caracteres | 6 | F6_CODAREA |
04. DEMAIS INFORMAÇÕES
| Aviso | ||
|---|---|---|
| ||
Para clientes que operam nas releases 12.1.27 ou anteriores, será necessária a execução do compatibilizador UPDDISTR com o pacote diferencial (SDFBRA.txt). Esta correção será disponibilizada na Expedição contínua da primeira quinzena de 04/2021e o pacote poderá ser acessado através dos links disponibilizados na documentação Pacotes de Atualização - Fiscal. Informações sobre a Expedição contínua acessar: http://tdn.totvs.com/x/H4uCEw. |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas