Árvore de páginas

01. DADOS GERAIS


Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Fiscal

02. DESCRIÇÃO

Permite ajustar a razão social da filial no registro 0140 do SPED Contribuições.

03. ESPECIFICAÇÃO

Parâmetros do ponto de entrada:

Nome

Tipo

Descrição

PARAMIXB    Array of Record

[1] = Alias da tabela SM0

Retorno:

Nome

Tipo

Descrição


Array of Record

Array com a primeira posição contendo a descrição da filial alterada.


04. EXEMPLO DE UTILIZAÇÃO


SPDPC0140.PRW
User Function SPDPC0140()

    Local cAlias := PARAMIXB[1] // Alias da tabela SM0
    Local aRazSoc := {}

    AADD(aRazSoc,(cAlias)->M0_NOMECOM) //Razão Social cadastro SM0
    If (cAlias)->(M0_CGC)=="99999999000272"
        aRazSoc[1] := "RAZAO SOCIAL DA FILIAL" //Razão Social alterada
    EndIf

Return aRazSoc[1]


05. DEMAIS INFORMAÇÕES

Não se aplica.