Re: [oracle_br] Retirar a tela de Logon na inicialização Forms 10G

[Edison Eduardo Bonomi]

Marcelo, não entendi bem a sua dúvida, mas aki vai uma dica:
   
  C:\orant\BIN\ifrun60.EXE \ARQUIVO.FMX 
/@

  Att,
   
  Edison.
  
Marcelo Moacir Florindo <[EMAIL PROTECTED]> escreveu:
  Colegas,

Eu quero que ao abrir o meu sistema não apareça a tela padrão de login.
Somente o formulário, pois o logon será feito na inicialização do formulário
em questão.

Como posso resolver este problema??

Grato a todos...

-- 
Marcelo Moacir Florindo
Analista/Desenvolvedor
http://www.gestaotec.com.br

[As partes desta mensagem que não continham texto foram removidas]



 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

Re: RES: [oracle_br] Re: Função de cód igo sequencial SEM deixar numero "vago" 1 "" 3

[Edison Eduardo Bonomi]

Dae Gabriel, que tal utilizar deste jeito, acho que vai funcionar:
   
  --
  -- CRIANDO A TABELA TESTE
  -
  create table sequencia (codigo number);
  /
  ---
  -- INSERINDO 50 REGISTROS NA TABELA
  ---
  declare
  v_codigo number;
  begin
  loop
  v_codigo := nvl(v_codigo,0) + 1;
  insert into sequencia values(v_codigo);
  exit when v_codigo > 49;
  end loop; 
  end;
  /
  commit;
  /
  ---
  -- EXCLUÍNDO ALGUNS REGISTROS
  ---
  delete from sequencia where codigo in (3,25,33,40);
  /
  commit;
  /
  
  -- SELECIONANDO O PRIMEIRO CODIGO VALIDO
  
  select nvl(min(codigo),0)+1 
  from sequencia
  where (codigo+1) not in (select codigo from sequencia);
   
   
  Att,
   
  Edison Eduardo
  Metido a DBA. :)
  

Gabriel Herdt <[EMAIL PROTECTED]> escreveu:
  é assim:
Código - Descrição
1 - margarida
2 - paulinha
3 - fernanda
4 - Jussara
5 - Camila
Vamos supor que eu tenha essas 5 mulheres cadastradas.
EU apague a paulinha:
1 - margarida
3 - fernanda
4 - Jussara
5 - Camila
Ao Inserir uma nova mulher que se chama-ra michela deve assumir o
local da paulinha
1 - margarida
2 - Michela
3 - fernanda
4 - Jussara
5 - Camila

Se depois inserir outra vai cair no código 6 caso nao tenha nenhum
vago, sequencial cheio.

--- Em oracle_br@yahoogrupos.com.br, "HENRIQUIS Milton"
<[EMAIL PROTECTED]> escreveu
>
> Eu estou procurando uma solução bem mais simples que isso por aqui...
> Porém, preciso antes que o colega me responda o seguinte:
> 
> Vamos supor que v c tenha 10 registros, campo chave de 1 a 10.
> Se o registro 5 for apagado, vc quer que IMEDIATAMENTE
> o 6 assuma o lugar do 5, o 7 assuma o lugar do 6, e assim por diante
> até o final dos registros?
> Ou pode ficar vago o registro 5 até uma nova inserção, e então
> essa inserção usar essa chave 5?
> 
> 
> 
> Milton Bastos Henriquis Junior
> 
> Oracle Database Administrator
> 
> 
> 
> 
> 
> -Mensagem original-
> De: oracle_br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em nome de Roberto Amorim
> Enviada em: quarta-feira, 28 de novembro de 2007 11:42
> Para: oracle_br@yahoogrupos.com.br
> Assunto: Re: [oracle_br] Re: Função de código sequencial SEM deixar
numero "vago" 1 "" 3 4 5 6
> 
> 
> 
> Uma excelente idéia. Torna o registro usável novamente. Melhor que a 
> minha por sinal. Mas, e sobre acessos concorrentes?
> 
> Eduardo de Paula escreveu:
> > Já pensou em criar um campo chamado de "vago" e depois fazer um
select para
> > ver quais campos estão marcados como vagos... senão crie mais uma
linha...
> >
> > On Nov 28, 2007 11:26 AM, Gabriel Herdt <[EMAIL PROTECTED]
 > wrote:
> >
> > 
> >> Eu concordo com vocês. acho besteira ter que preencher números
vagos.
> >> Mas não tem meios de convence o chefe hehehe.
> >> Uma solução é colocar sequence já que essa tabela tem um alto volume
> >> de dados. e assim nao precisar preencher os numeros vagos.
> >>
> >> Mas a solução ótima seria preencher os vagos rápido :D
> >>
> >> resumindo: é importante sim. não uso sequence porque preciso
preencher
> >> números vagos(delatados)
> >>
> >> --- Em oracle_br@yahoogrupos.com.br
 ,
> >> "Andre Santos"
> >>  escreveu
> >>
> >> 
> >>> Gabriel
> >>>
> >>> Pegando carona na pergunta do Roberto... é tão importante assim não
> >>> 
> >> deixar
> >> 
> >>> números "vagos" na seqüência?
> >>>
> >>> [ ]
> >>>
> >>> André
> >>>
> >>>
> >>> Em 28/11/07, Roberto Amorim  escreveu:
> >>> 
>  Pode parecer ingenuidade minha, mas, porque não usar o sequence?
> 
>  Gabriel Herdt escreveu:
>  
> > Pessoal to com um problema. Fiz essa função no meu oracle 10g
> > enteprise. em que ele faz um sequence do campo x e da tabela x.
> > A função atende muito bem ate um certo numero de dados na tabela
> > depois fica muito lento(20.000 registros +).
> >
> > O que posso fazer para otimizar a rotina?
> > Objetivo dela é fazer seqüencia, e no caso de algum código for
> > detetado. o próximo cadastrado assuma seu lugar.
> >
> > FUNCTION FN_NVAGO
> > ( pn_nomeCAM IN VARCHAR2,-- parametro Nome do campo
> > pn_nomeTab IN VARCHAR2,-- parametro Nome da Tabela
> > pr_texto OUT varchar2) -- Paramentro de saida msg de erro
> > RETURN NUMBER IS
> > ln_cont NUMBER;-- variavel de retorno informando o menor "buraco"
> > na sequencia
> > ln_tam NUMBER; -- variavel informando o maior numero da sequencia
> > i NUMBER; -- contador do loop
> > BEGIN
> > pr_texto := '';
> >
> > --SQL PARA vereficar maior numero da sequencia do campo e tabela
> > infomado por parametro
> > EXECUTE IMMEDIATE 'Select Max('||pn_nomeCAM||') FROM
'||pn_nomeTAB
> > into ln_tam;
> > if ln_tam is null t

Re: [oracle_br] Re: Função de código s equencial SEM deixar numero "vago" 1 "" 3 4 5 6

[Edison Eduardo Bonomi]

  Galera, creio que assim seja mais fácil:
   
  
  -- SELECIONANDO O PRIMEIRO CODIGO VALIDO
  
  select nvl(min(codigo),0)+1 
  from sequencia
  where (codigo+1) not in (select codigo from sequencia);
   
  Att,
   
  Edison Eduardo.
  

Gabriel Herdt <[EMAIL PROTECTED]> escreveu:
  Eu concordo com vocês. acho besteira ter que preencher números vagos.
Mas não tem meios de convence o chefe hehehe.
Uma solução é colocar sequence já que essa tabela tem um alto volume
de dados. e assim nao precisar preencher os numeros vagos.

Mas a solução ótima seria preencher os vagos rápido :D

resumindo: é importante sim. não uso sequence porque preciso preencher
números vagos(delatados)

--- Em oracle_br@yahoogrupos.com.br, "Andre Santos"
<[EMAIL PROTECTED]> escreveu
>
> Gabriel
> 
> Pegando carona na pergunta do Roberto... é tão importante assim não
deixar
> números "vagos" na seqüência?
> 
> [ ]
> 
> André
> 
> 
> Em 28/11/07, Roberto Amorim <[EMAIL PROTECTED]> escreveu:
> >
> > Pode parecer ingenuidade minha, mas, porque não usar o sequence?
> >
> > Gabriel Herdt escreveu:
> > > Pessoal to com um problema. Fiz essa função no meu oracle 10g
> > > enteprise. em que ele faz um sequence do campo x e da tabela x.
> > > A função atende muito bem ate um certo numero de dados na tabela
> > > depois fica muito lento(20.000 registros +).
> > >
> > > O que posso fazer para otimizar a rotina?
> > > Objetivo dela é fazer seqüencia, e no caso de algum código for
> > > detetado. o próximo cadastrado assuma seu lugar.
> > >
> > > FUNCTION FN_NVAGO
> > > ( pn_nomeCAM IN VARCHAR2,-- parametro Nome do campo
> > > pn_nomeTab IN VARCHAR2,-- parametro Nome da Tabela
> > > pr_texto OUT varchar2) -- Paramentro de saida msg de erro
> > > RETURN NUMBER IS
> > > ln_cont NUMBER;-- variavel de retorno informando o menor "buraco"
> > > na sequencia
> > > ln_tam NUMBER; -- variavel informando o maior numero da sequencia
> > > i NUMBER; -- contador do loop
> > > BEGIN
> > > pr_texto := '';
> > >
> > > --SQL PARA vereficar maior numero da sequencia do campo e tabela
> > > infomado por parametro
> > > EXECUTE IMMEDIATE 'Select Max('||pn_nomeCAM||') FROM '||pn_nomeTAB
> > > into ln_tam;
> > > if ln_tam is null then
> > > Return 1;
> > > end if;
> > > --For de 1 ate numero maximo de sequencia
> > > FOR i IN 1..ln_tam LOOP
> > > -- select para localizar "buracos" na sequencia e informar
> > > menor numero faltando na seq
> > > EXECUTE IMMEDIATE 'Select count('||i||') From '||pn_nomeTab||'
> > > Where '||pn_nomeCAM||' = '||i into ln_cont;
> > > IF ln_cont = 0 THEN
> > > RETURN i;
> > > EXIT;
> > > END IF;
> > > END LOOP;
> > > If ln_cont = 1 THEN -- se nao achar nada pega o maior numero de
> > > sequencia e somar mais 1
> > > return ln_tam+1;
> > > end if;
> > > EXCEPTION
> > > WHEN OTHERS THEN
> > > ROLLBACK;
> > > pr_texto := 'Erro -3000 : Erro ao gerar sequencia';
> > > DBMS_OUTPUT.put_line (SUBSTR ('Error ' || TO_CHAR (SQLCODE) || ':
> > > ' || SQLERRM, 1, 255));
> > > END;
> > >
> > >
> > >
> > >
> > >> Apostilas » Dicas e Exemplos » Funções » Mundo Oracle » Package »
> > Procedure » Scripts » Tutoriais acesse:
> > http://www.oraclebr.com.br/codigo/ListaCodigo.php
> > >>
> > > --
> > >
> > >> Atenção! As mensagens do grupo ORACLE_BR são de acesso público e de
> > inteira responsabilidade de seus remetentes.
> > >>
> > > Acesse: http://www.mail-archive.com/oracle_br@yahoogrupos.com.br/
> > > --
> > >
> > >> O GRUPO ORACLE_BR TEM SEU PROPRIO ESPAÇO! VISITE:
> > http://www.oraclebr.com.br/
> > >>
> > > --
> > > Links do Yahoo! Grupos
> > >
> > >
> > >
> > >
> > >
> > 
> >
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>



 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]