[Report 6i] Edition Etiquettes [Résolu]

[gaultier]

Bonjour

J'ai une table qui contient une commande dans un article et une quantité commandée.

Exemple : 2 thuya ou 2 rosiers.

Voici mon problème, je dois éditer en report autant d'etquettes qu'il y a de plantes commandées. Dons l'exemple je dois sortir 2 etiquettes de Thuya et 2 de rosiers. Mais pour report il n'y a que 2 lignes d'articles donc il va sortir seulement une seule etiquette de chaque.
que la quantitée commandée. Ou bien dans une vue d'éclater les lignes pour avoir 4 lignes de 1 article ??

Attention, toutes les plantes doivent sortir a la suite pas sur des feuilles différentes.

J'espère avoir été assez clair. Ce n'est pas facile à expliquer.

Merci d'avance.

[salim11]

Salut,

Partie plqsql
Essaie cette solution avec pipe row, je l'ai testé avec la 10g

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
--  package refcur_pkg  me permet de dupliquer le record selon la quantité
 
CREATE OR REPLACE PACKAGE refcur_pkg IS
TYPE refcur_t IS REF CURSOR RETURN commande%ROWTYPE;
TYPE outrec_typ IS RECORD (
article varchar2(50),
quantite number);
TYPE outrecset IS TABLE OF outrec_typ;
FUNCTION duplicate_row_table(p_article IN varchar2 ,p_quantite IN NUMBER)
RETURN outrecset PIPELINED;
END refcur_pkg;
 
 
CREATE OR REPLACE PACKAGE BODY refcur_pkg IS
FUNCTION duplicate_row_table(p_article IN varchar2 ,p_quantite IN NUMBER)
RETURN outrecset PIPELINED IS
--out_rec outrec_typ;
BEGIN
FOR out_rec  IN ( SELECT * FROM commande WHERE article=p_article )
loop
FOR i IN 1 .. p_quantite-1 LOOP
        PIPE ROW(out_rec);
   END LOOP;
end LOOP;
RETURN;
END;
END refcur_pkg;
/

Partie reports:
Dans le rapport il faut créer deux requetes:

La première:

Code :

1
2
3
 
SELECT article art1, quantite qte_p
  FROM commande

La deuxième ( sert à récupérer les records manquants)

Code :

1
2
 
SELECT *  FROM TABLE(refcur_pkg.duplicate_row_table(:art1,:qte_p))

Après tu relies les deux requetes par le numero d'article.

Voici une capture d'ecran de mon modèle de données
duplicate.png

[gaultier]

Bonjour,

Merci pour cette réponse, il faut que j'ouvre grand mon esprit pour comprendre. Je vais tester tout ca.

Précision je travaille sur une base 8.1.7 et bientot sur 9.2.0.4.

[gaultier]

Lorsque je compile ton script package, il me donne l'erreur suivante :

Code :

1
2
3
4
5
6
LINE/COL ERROR
-------- -----------------------------------------------------------------
8/18     PLS-00103: Encountered the symbol "PIPELINED" when expecting one
         of the following:
         . @ % ; IS authid deterministic parallel_enable AS character
         The symbol "." was substituted FOR "PIPELINED" TO continue.

Je rappelle je travaille sur une base 8.1.7

[salim11]

salut,

Ma solution fonctionne à partir de la version 9i.

Tu vois que c'est important de spécifier la version de tes outils.

[gaultier]

Bonjour,

Désolé de t'avoir fait chercher, mais pas pour rien car la migration de V8 et V9 est prevu en Septembre.
Donc je garde ta solution sous le coude

En oracle V8, il n'existe pas de solution à mon problème !!!

[McM]

Sinon, faut avoir une table de paramètre qui contient le nb de ligne voulu.

[plaineR]

Ou passer par une procédure stockée qui insère dans une table temporaire le nb de lignes voulues.

[gaultier]

Merci de vos conseils, je vais chercher du côté d'une procédure stockée.

Je vous tiendrais au courant des avancées.

[gaultier]

Bonjour à tous

Voici les dernières nouvelles de mon problème. J'ai suivi le conseil de PlaineR.

J'ai créé un table temporaire table_etiquette et une procédure stockée qui lit les lignes de la table commande et insert dans la table table_etiquette, une ligne pour une etiquette.
J'utilise un curseur pour les lignes de la table commande et une boucle for de 1 à quantité commandée, on créé une ligne pour une etiquette

Je lance cette procédure stockée dans le trigger AFTER PARAMETER FORM de report (car le user saisi la cde à imprimer) et je détruis les lignes créées avec le trigger AFTER REPORT.

Cette solution est du bidouillage. Mais ca fonctionne c'est le principal.

Merci à tous pour votre aide.