Histórico da Página
...
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: F050MDVC - Cálculo da data de vencimento de impostos
Descrição: O ponto de entrada F050MDVC possibilita que o cliente calcule sua própria data de vencimento de ímpostos. Eventos É chamado na rotina que calcula a data de vencimento dos impostos. Programa Fonte FINA050.PRW Sintaxe F050MDVC - Cálculo da data de vencimento de impostos ( [ ParamIxb[1] ], [ ParamIxb[2] ], [ ParamIxb[3] ], [ ParamIxb[4] ], [ ParamIxb[5] ] ) --> Vencimento Parâmetros:
Retorno Vencimento
Exemplo 1 #INCLUDE "RWMAKE.CH"#INCLUDE "PROTHEUS.CH"USER FUNCTION F050MDVCLocal dVencPR := ParamIXB[1]Local cImposto := ParamIXB[2]Local dEmissao := ParamIXB[3]Local dEmis1 := ParamIXB[4]Local dVencRea := ParamIXB[5]Local dDtVenc := CToD("30/07/2009")RETURN dDtVenc Exemplo 2 #INCLUDE "PROTHEUS.CH"User function F050MDVC()Local dNextDay := ParamIxb[1] //data calculada pelo sistemaLocal cIMposto := ParamIxb[2]Local dEmissao := ParamIxb[3]Local dEmis1 := ParamIxb[4]Local dVencRea := ParamIxb[5]Local nNextMes := Month(dVencRea)+1If cImposto $ "PIS,CSLL,COFINS"//Calcula data 20 do próximo mes dNextDay := CTOD("20/"+Iif(nNextMes==13,"01",StrZero(nNextMes,2))+"/"+; Substr(Str(Iif(nNextMes==13,Year(dVencRea)+1,Year(dVencRea))),2))//Acho o ultimo dia util do periodo desejado dNextday := DataValida(dNextday,.F.)EndIf Return dNextDay |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas