PACK PROTOCOLO.PROC ABERTURA PROTOCOLO COMP

atributos

argumento tipo descrição
an_exercicio IN NUMBER 'nnnn'
ad_data IN VARCHAR2 formato 'dd/mm/yyyy' default sysdate
av_tipo_protocolo IN VARCHAR2(2) constraint PRO$_TIPO_PROTOCOLO.TIPO_PROTOCOLO
an_codigo_assunto IN NUMBER(5) constraint PRO$_ASSUNTO.CODIGO_ASSUNTO e PRO$_GRUPO_ASSUNTO[CODIGO_GRUPO, CODIGO_ASSUNTO]
an_departamento_origem IN VARCHAR2(5) numerico constraint PRO$_DEPARTAMENTO.CODIGO_DEPARTAMENTO e PRO$_USUARIO_DEPARTAMENTO.TIPO_ACESSO='C'
an_departamento_destino IN VARCHAR2(5) numerico constraint PRO$_DEPARTAMENTO.CODIGO_DEPARTAMENTO
av_observacao IN VARCHAR2(1000)
av_sintese IN VARCHAR2(2000)
an_inscricao IN NUMBER(10) constraint ERP$_CADASTROGERAL.INSCRICAO
av_horario IN VARCHAR2(4) 'hhmm'
an_prazo_geral IN NUMBER em dias
ad_data_encerramento IN VARCHAR2 formato 'dd/mm/yyyy'
an_cd_programa IN NUMBER utilizar 28257; cálculo automático do número do processo.
an_codigo_grupo IN NUMBER(5) constraint PRO$_GRUPO.CODIGO_GRUPO e PRO$_GRUPO_TIPO[TIPO_PROTOCOLO, CODIGO_GRUPO]
av_anonimo IN VARCHAR2(1) [S ou N]
an_codigo_logradouro IN NUMBER(6) opcional. constraint PRO$_LOGRADOURO.CODIGO_LOGRADOURO
av_logradouro IN VARCHAR2(100)
an_bairro(6) IN NUMBER opcional. constraint PRO$_BAIRRO.CODIGO_BAIRRO
av_bairro(60) IN VARCHAR2
av_CEP IN VARCHAR2(8)
an_numeroImovel IN VARCHAR2(15)
an_tipo_abertura IN NUMBER(5) constraint PRO$_TIPO_ABERTURA.CODIGO_TIPO_ABERTURA
av_solicitante IN VARCHAR2(100)
av_contato IN VARCHAR2(60) forma de contato com o 'solicitante'
av_numero OUT VARCHAR2 Número atribuído ao processo
an_grupo_protocolo OUT NUMBER atribuído em função do av_tipo_protocolo
av_data_termino OUT VARCHAR2 previsão de encerramento
av_rowid OUT VARCHAR2 utilizado imediatamente após a inclusão para 'complementar' o processo
av_texto OUT VARCHAR2 eventuais mensagens de erro


exemplo

*SQL*Plus> var aNumero VARCHAR2(10);
*SQL*Plus> var aGrupo NUMBER
*SQL*Plus> var aData VARCHAR2(10);
*SQL*Plus> var aRow VARCHAR2(50);
*SQL*Plus> var aTexto  VARCHAR2(1000);

*SQL*Plus>call pack_protocolo.PROC_ABERTURA_PROTOCOLO_COMP('2009', -- exercicio
to_char(sysdate,'dd/mm/yyyy'), -- data
'9 ', -- tipo Processo Administrativo
2016, -- assunto Abertura Teste
139, -- origem Agência De Empregos
228, -- destino Novo departamento para efeitos de teste
'Teste de utilização da interface do Protocolo', -- observacao
'Esta síntese foi digitada propositalmente', -- sintese
712163, -- requerente J** L**** G**
to_char(sysdate,'HH24MI'), -- horario
7, -- prazo_geral
to_char(sysdate+7,'dd/mm/yyyy'), -- data_encerramento
28257, -- codigo programa
5, -- grupo
NULL, -- anonimo
NULL, -- logradouro
'Rua *** ***', -- logradouro
NULL, -- bairro
'Rio ***', -- bairro
'90****01', -- CEP
1*, -- numero imovel
7, -- tipo_abertura e-Governo
'Ricardo *** ******', -- solicitante
'ricardo@dominio.br', -- contato
:aNumero,
:aGrupo,
:aData,
:aRow,
:aTexto);

*SQL*Plus> print aNumero;
*SQL*Plus> print Grupo;
*SQL*Plus> print aData;
*SQL*Plus> print Row;