Pessoal

bom dia!!!

Funcionou tudo agora.

Muito obrigada pela ajuda de vocês. Aprendi um tanto mais. Segue o código
final com um pouquinho da contribuição de cada um.

Grande abraço e parabéns mais uma vez pelo nível dos diálogos nesta lista.

Jeanne

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

CREATE FUNCTION doc_pendentes() Returns void AS

$$

 DECLARE

doc_nomedoc varchar;

t_men RECORD;

 BEGIN

FOR t_men IN SELECT men_cal1||men_cal2 AS doc_matric,
UPPER(COALESCE(men_men1,'')
|| COALESCE(men_men2,'')) AS doc_men
FROM fai__men
LOOP

IF t_men.doc_men LIKE '%NASCIMENTO%' THEN

INSERT INTO gvc_docpend (dcp_alumatric,dcp_aludocdescr) VALUES
(t_men.doc_matric, 'Certidão de nascimento');

END IF;

IF t_men.doc_men LIKE '%CASAMENTO%' THEN

INSERT INTO gvc_docpend (dcp_alumatric,dcp_aludocdescr) VALUES
(t_men.doc_matric, 'Certidão de casamento');

END IF;

IF t_men.doc_men LIKE '%HISTORICO%' THEN

INSERT INTO gvc_docpend (dcp_alumatric,dcp_aludocdescr) VALUES
(t_men.doc_matric, 'Histórico Escolar');

END IF;

IF t_men.doc_men LIKE '%IDENTIDADE%' THEN

INSERT INTO gvc_docpend (dcp_alumatric,dcp_aludocdescr) VALUES
(t_men.doc_matric, 'Documento de Identidade');

END IF;

IF t_men.doc_men LIKE '%TITULO%' THEN

INSERT INTO gvc_docpend (dcp_alumatric,dcp_aludocdescr) VALUES
(t_men.doc_matric, 'Título de eleitor');

END IF;

IF t_men.doc_men LIKE '%RESERVISTA%' THEN

INSERT INTO gvc_docpend (dcp_alumatric,dcp_aludocdescr) VALUES
(t_men.doc_matric, 'Certificado de Reservista');

END IF;

IF t_men.doc_men LIKE '%FOTOS%' THEN

INSERT INTO gvc_docpend (dcp_alumatric,dcp_aludocdescr) VALUES
(t_men.doc_matric, 'Fotos 3x4');

END IF;

END LOOP;

END; $$ LANGUAGE plpgsql;
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

"O bem que praticas em qualquer lugar será teu advogado em toda parte."
Emmanuel
_______________________________________________
pgbr-geral mailing list
[email protected]
https://listas.postgresql.org.br/cgi-bin/mailman/listinfo/pgbr-geral

Responder a