Results 1 to 3 of 3
  1. #1
    Join Date
    Mar 2004
    Posts
    5

    block based in procedure for Oracle Forms Developer

    Hello,
    In Oralce forms 6 I am trying to create a bock based in a procedure. I can insert data and update at b.d only but I can not select data so I can not delete. I have create all procedures like in www.osborne.com Examples from "Avanced Forms and Report" and I have used asistend to create block and Help of Forms 6. I am locking for code source is in trigger "when button pressed" to execute query of block.
    Thanks. Peternac26. Madrid (Spain).

    Hola compañeros del metal,
    En Oracle Forms 6 estoy intentando crear un bloque basado en un procedimiento. Puedo insertar y updatear en b.d pero no puedo ver los datos y por tanto borrar. He creado todos los procedimientos como el ejemplo de www.osborne.com "Examples de forms y reports avanzados" y he utilizado el asistente para crear el bloque y tambien he consultado la ayuda. Necesito el codigo que se podría en el trigger when button pressed para ejecutar y ver los datos en el bloque.
    Gracias. Peternac26. Madrid (España).

    alarcon_jp1@ya.com

  2. #2
    Join Date
    Mar 2004
    Posts
    5

    PETERNAC26

    bueno, la solucion es que no utilizar para el procedimiento de select
    un ref cursor sino un tipo tabla igual que los demas procedimientos de
    insercion, update, borrado y bloqueo.
    La estructura de datos que se utiliza:

    type RECORD_MANHOR_01 is RECORD
    (
    TIPCOS VECTRA_TRAHOR.TIPCOS%TYPE,
    TIPACC VECTRA_TRAHOR.TIPACC%TYPE,
    FECVIG VECTRA_TRAHOR.FECVIG%TYPE,
    CLAPAR VECTRA_TRAHOR.CLAPAR%TYPE,
    DIASEM VECTRA_TRAHOR.DIASEM%TYPE,
    TIPHOR VECTRA_TRAHOR.TIPHOR%TYPE,
    HORINI VECTRA_TRAHOR.HORINI%TYPE,
    HORFIN VECTRA_TRAHOR.HORFIN%TYPE
    );
    type T_MANHOR_01
    IS TABLE OF RECORD_MANHOR_01
    INDEX BY BINARY_INTEGER;



    procedure SELECT_MANHOR_01(p_cursor IN OUT T_MANHOR_01) IS

    cursor p_cursor2 is
    select TIPCOS ,
    TIPACC ,
    FECVIG ,
    CLAPAR ,
    DIASEM ,
    TIPHOR ,
    HORINI ,
    HORFIN
    FROM VECTRA_TRAHOR;
    contatore number default 1;

    BEGIN
    for cursor_rec in p_cursor2
    loop
    p_cursor(contatore).TIPCOS := cursor_rec.TIPCOS;
    p_cursor(contatore).TIPACC := cursor_rec.TIPACC;
    p_cursor(contatore).FECVIG := cursor_rec.FECVIG;
    p_cursor(contatore).CLAPAR := cursor_rec.CLAPAR;
    p_cursor(contatore).DIASEM := cursor_rec.DIASEM;
    p_cursor(contatore).TIPHOR := cursor_rec.TIPHOR;
    p_cursor(contatore).HORINI := cursor_rec.HORINI;
    p_cursor(contatore).HORFIN := cursor_rec.HORFIN;

    contatore:=contatore+1;
    end loop;
    END;

    El asistente crea un trigger INSERT-PROCEDURE que se ejecuta cuando hacemos un EXECUTE_QUERY.

    buff, a costado !

  3. #3
    Join Date
    Apr 2010
    Posts
    1
    Hola, yo tengo todo eso hecho correcto, pero me surge un problema al intentar hacer un maestro-detalle de dos bloques basados en procedimientos. El bloque detalle referencia a un procedimiento que recibe parámetros del bloque maestro, pero no me funciona pasándole de parametros :bloque_maestro.campo si pongo literales sí me echa la consulta...

    alguna ayuda por favor!!

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •