Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Programa:SPEDFISCAL.PRW
Módulo:Fiscal


02. DESCRIÇÃO

Ponto de entrada SPDFIS09, grava informações nos Registros:

C140 - FATURA (CÓDIGO 01)   


C141 - VENCIMENTO DA FATURA (CÓDIGO 01) 


C

03. ESPECIFICAÇÃO

Parâmetros do ponto de entrada:

NomeTipoDescrição

PARAMIXB


Array of Record

Entrada ou Saída

Retorno:

NomeTipoDescrição
aParcArray of Record

Array com as parcelas do documento fiscal.

04. EXEMPLO DE UTILIZAÇÃO


SPDFIS07
#include "totvs.ch"  

User Function SPDFIS09() 

Local cEntSai := ParamixB[1]	
Local aParc := {}            
           
//-------------------------------------------------------------------
//Detalhamento do array aParc 			            
//                                                             
//INFORMAÇÃO        POSICAO       Tamanho  					    
//TIPO               01           03					        
//NUMERO             02           09           				
//PARCELA            03           01						    
//VENCIMENTO REAL    04           08					        
//VALOR R$           05           18					        
//-------------------------------------------------------------------

If ("1"$cEntSai)
	//{(cAliasSE2)->E2_TIPO, (cAliasSE2)->E2_HIST, (cAliasSE2)->E2_NUM, (cAliasSE2)->E2_PARCELA, (cAliasSE2)->E2_VENCREA, (cAliasSE2)->E2_VLCRUZ})           
	aAdd (aParc, {"","","","",Stod("//"),0})	 
Else
	//{(cAliasSE1)->E1_TIPO, (cAliasSE1)->E1_HIST, (cAliasSE1)->E1_NUM, (cAliasSE1)->E1_PARCELA, (cAliasSE1)->E1_VENCREA, (cAliasSE1)->E1_VLCRUZ})           
	aAdd (aParc, {"","","","",Stod("//"),0})
EndIf
	Return(aParc)


05. DEMAIS INFORMAÇÕES

Sem mais informações.