TOTVS CRM | SFA - 12.1.2501

Parameters

Name	Type	Mode
internalid	integer	IN
descricao	character varying	IN
sgltipocondicao	character varying	IN
percentualdesconto	numeric	IN
percentualacrescimo	numeric	IN
idnpadrao	integer	IN
idnativo	integer	IN
externalid	character varying	IN
numeroparcelas	numeric	IN
numerodiaspriparcela	numeric	IN
numerodiasentreparcelas	numeric	IN
prazomedio	numeric	IN
valorminimoparcela	numeric	IN
valorminimo	numeric	IN
percentualjuros	numeric	IN

Definition

begin
	
	-- VALIDACAO	
		-- EXTERNALID E INTERNALID NAO INFORMADOS
		if coalesce(PutCondicaoPagamento.externalid,'')='' and PutCondicaoPagamento.internalid is null then 
		RAISE EXCEPTION 'externalid = % and internalid = %', PutCondicaoPagamento.externalid, PutCondicaoPagamento.internalid
			USING HINT = 'Fields internalid and externalid must be not null';
		end if;

--IDNATIVO FORA DO PADRAO 
		if idnativo not in (0,1,-99999) then 
			RAISE EXCEPTION 'idnativo = %', idnativo
				USING HINT = 'Field must not be null or different from 1 or 0.';
		end if;

-- LOOKUP
		-- CONDICAOPAGAMENTO
		IF PutCondicaoPagamento.internalid IS NULL 
		THEN PutCondicaoPagamento.internalid = (SELECT IDCONDICAOPAGAMENTO FROM CONDICAOPAGAMENTO WHERE CODIGOERP = PutCondicaoPagamento.externalid);
		END IF;	
    
	-- UPDATE
	update condicaopagamento set 
		descricao = case when PutCondicaoPagamento.descricao = 'NOVALUEWS' then condicaopagamento.descricao else PutCondicaoPagamento.descricao end, 
		sgltipocondicao = case when PutCondicaoPagamento.sgltipocondicao = 'NOVALUEWS' then condicaopagamento.sgltipocondicao else PutCondicaoPagamento.sgltipocondicao end, 
		percentualdesconto = case when PutCondicaoPagamento.percentualdesconto = -99999 then condicaopagamento.percentualdesconto else PutCondicaoPagamento.percentualdesconto end, 
		percentualacrescimo = case when PutCondicaoPagamento.percentualacrescimo = -99999 then condicaopagamento.percentualacrescimo else PutCondicaoPagamento.percentualacrescimo end, 
		idnpadrao = case when PutCondicaoPagamento.idnpadrao = -99999 then condicaopagamento.idnpadrao else PutCondicaoPagamento.idnpadrao end, 
		idnativo = case when PutCondicaoPagamento.idnativo = -99999 then condicaopagamento.idnativo else PutCondicaoPagamento.idnativo end,
		codigoerp = case when PutCondicaoPagamento.externalid = 'NOVALUEWS' then codigoerp else PutCondicaoPagamento.externalid end,
		numerodiaspriparcela = case when PutCondicaoPagamento.numerodiaspriparcela = -99999 then condicaopagamento.numerodiaspriparcela else PutCondicaoPagamento.numerodiaspriparcela end, 
		numerodiasentreparcelas = case when PutCondicaoPagamento.numerodiasentreparcelas = -99999 then condicaopagamento.numerodiasentreparcelas else PutCondicaoPagamento.numerodiasentreparcelas end, 
		prazomedio = case when PutCondicaoPagamento.prazomedio = -99999 then condicaopagamento.prazomedio else PutCondicaoPagamento.prazomedio end, 
		valorminimoparcela = case when PutCondicaoPagamento.valorminimoparcela = -99999 then condicaopagamento.valorminimoparcela else PutCondicaoPagamento.valorminimoparcela end, 
		valorminimo = case when PutCondicaoPagamento.valorminimo = -99999 then condicaopagamento.valorminimo else PutCondicaoPagamento.valorminimo end, 
		percentualjuros = case when PutCondicaoPagamento.percentualjuros = -99999 then condicaopagamento.percentualjuros else PutCondicaoPagamento.percentualjuros end, 
		numeroparcelas = case when PutCondicaoPagamento.numeroparcelas = -99999 then condicaopagamento.numeroparcelas else PutCondicaoPagamento.numeroparcelas end
	where idcondicaopagamento = internalid ;

return query select internalid;
END;

putcondicaopagamento(integer, character varying, character varying, numeric, numeric, integer, integer, character varying, numeric, numeric, numeric, numeric, numeric, numeric, numeric)

Parameters

Definition