TOTVS CRM | SFA - 12.1.2501

Parameters

Name	Type	Mode
idusuario	integer	IN
idusuario_externalid	character varying	IN
telefone	character varying	IN
idnpadrao	integer	IN
externalid	character varying	IN
id	integer	OUT

Definition

declare	
	internalid integer;
begin  	
	--IDNPADRAO NULO OU FORA DO PADRAO 
	if idnpadrao is null or idnpadrao not in (0,1) then 
		RAISE EXCEPTION 'idnpadrao = %', idnpadrao
      		USING HINT = 'Field must not be null or different from 1 or 0.';
     end if;  
	
	--LOOKUP IDUSUARIO
	IF PostUsuarioTelefone.idusuario IS NULL AND PostUsuarioTelefone.idusuario_externalid IS NOT NULL
		THEN PostUsuarioTelefone.idusuario = (SELECT C2.idusuario FROM usuario C2 WHERE C2.CODIGOERP = PostUsuarioTelefone.idusuario_externalid);
	END IF;

--IDUSUARIO NULO
	 if PostUsuarioTelefone.idusuario is null then 
		RAISE EXCEPTION 'idusuario = %', PostUsuarioTelefone.idusuario
      		USING HINT = 'Field idusuario must be not null';
     end if;

--TELEFONE NULO
	 if PostUsuarioTelefone.telefone is null then 
		RAISE EXCEPTION 'telefone = %', PostUsuarioTelefone.telefone
      		USING HINT = 'Field telefone must be not null';
     end if; 	 
	 
	 --CODIGOERP NULO
	 if externalid is null or externalid = '' then 
		RAISE EXCEPTION 'externalid = %', externalid
      		USING HINT = 'Field externalid must be not null';
     end if;

--VALIDAÇÃO DE CODIGOERP JÁ EXISTENTE
	IF (select distinct 1 FROM USUARIOTELEFONE WHERE CODIGOERP = PostUsuarioTelefone.externalid) = 1
		THEN RAISE EXCEPTION 'externalid = %', PostUsuarioTelefone.externalid 
				USING HINT = 'The record (externalid = '|| PostUsuarioTelefone.externalid ||') already exists, it was not possible to insert it.';
		ELSE insert into usuariotelefone (idusuariotelefone,telefone,idnpadrao,idusuario,codigoerp) values (nextval('seqpkusuariotelefone'),telefone,idnpadrao,idusuario,externalid) returning idusuariotelefone into internalid ;
     end if;
	 
	return query select internalid ;
END;

postusuariotelefone(integer, character varying, character varying, integer, character varying)

Parameters

Definition