Linha Microsiga Protheus

Árvore de páginas

CONTEÚDO

01. DADOS GERAIS


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


02. DESCRIÇÃO

O ponto de entrada ART153 exibirá a descrição do campo de observação do relatório MATR930.

03. ESPECIFICAÇÃO

Retorno:

Nome

Tipo

Descrição

cDescCaracter

Nenhum

04. EXEMPLO DE UTILIZAÇÃO


ART153
User Function ART153

Local	cDesc	:=	""

dbSelectArea("SD1")
dbSetOrder(1)  

	If dbSeek(xFilial("SD1")+SF3->F3_NFISCAL+SF3->F3_SERIE+SF3->F3_CLIEFOR+SF3->F3_LOJA) .And. SF3->F3_TIPO <> "D"	
		If !Empty(SD1->D1_NFORI) .And. !Empty(SD1->D1_SERIORI) 	   	
			cDesc	+=	"Referente NF nº:"+SD1->D1_NFORI+CHR(13) +", registrada em: "+DToC(SD1->D1_DTDIGIT)+CHR(13)+CHR(10)	    
		Else    	
			cDesc	:=	"Compra para recebimento futuro"+CHR(13)+CHR(10) 	
		EndIf              
	EndIf                    	

Return cDesc

05. DEMAIS INFORMAÇÕES

Não há.