Árvore de páginas

01. DADOS GERAIS

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


02. DESCRIÇÃO

Este ponto de entrada tem a finalidade de compor a descrição dos serviços prestados na operação, sendo esta descrição utilizada para impressão do RPS.

A chamada deste ponto de entrada é realizado nas rotinas MATA916 - Impressão RPS  e MATR968 - Impressão RPS Gráfico.

03. ESPECIFICAÇÃO

Parâmetros do ponto de Entrada:

NomeTipoDescrição
cNumRPSCaractereNumero da RPS
cSerRPSCaractereSerie da RPS
cCodCliCaractereCódigo do Cliente
cLojaRPSCaractereLoja do Cliente


Retorno:

NomeTipoDescrição
cRetCaractere

String com a descrição a ser apresentada. A string deverá ter no máximo 999 caracteres. Caso a descrição retornada pelo ponto de entrada ultrapasse esse limite, o programa irá reduzir o retorno em 999 caracteres.
Caso sejam necessárias quebras de linha na descrição a ser apresentada, inserir o caracter pipe “ | ” (chr124), entre espaços, porque, para o arquivo magnético de envio à prefeitura, é necessária a configuração de quebra de linha. Vale ressaltar que serão impressos 999 caracteres, incluindo as quebras de linha, ou seja, quanto mais quebras de linha forem configuradas, menos caracteres serão impressos, devido ao número de caracteres perdidos com a quebra.


Exemplo de retorno:
O ponto de entrada irá retornar quebras de linha da seguinte forma:
“Serviços prestados: | Lavagem | Polimento | ”
Que, durante a impressão, serão apresentados como:
Serviços prestados:
Lavagem
Polimento

04. EXEMPLO DE UTILIZAÇÃO


MTDESCRNFE
#include "totvs.ch"

User Function MTDESCRNFE()

	Local aArea     := GetArea()
	Local cNumRPS   := PARAMIXB[1]
	Local cSerRPS   := PARAMIXB[2]
	Local cCodCli   := PARAMIXB[3]
	Local cLojaRPS  := PARAMIXB[4]
	Local cRet      := ""

    // validações do cliente
    If cNumRPS == "000000010"
	    
        // retorno
        cRet := "Serviços prestados: | Lavagem | Polimento |"
    
    EndIf

	RestArea(aArea)

Return cRet


05. DEMAIS INFORMAÇÕES

Não há.