[Forms] chargement de liste impossible [Résolu]

[bargou]

salut tous le monde,j'ai essayé pour la premier fois de faire une liste déroulante sous forms a partir d'une requete
j'ai fait un petit recherche sur ce forum
mon code est le suivant :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
DECLARE 
	rg_name  VARCHAR2(40) := 'STRAT_SYSTEM';
	 rg_id    RecordGroup; 
	   errcode  NUMBER; 
BEGIN 
 
      rg_id := Find_Group( rg_name ); 
          IF Id_Null(rg_id) THEN 
          rg_id := Create_Group_From_Query( rg_name, 'select sys_code, sys_name from stratsystem'); 
          END IF; 
	errcode := Populate_Group( rg_id ); 
	POPULATE_LIST  ('SYS_CODE',rg_name);
END;

j'ai mis ce code au niveau de when-new-record-instance au niveau de bloc
mais ce code d'erreur m'apparait

Code :

FRM 41337 :Chargement de liste impossible à partir du GROUP d'enregistrement

stp qu'est ce que je ferais dans ce cas
merci pour tous vos réponse

[plaineR]

Aide en ligne de forms :

Cause: The record group is invalid or the list item does not satisfy the requirements for deleting and adding elements.

Action: Make sure the record group is valid. For more information about deleting and adding list elements, refer to help for restrictions on
DELETE_LIST_ELEMENT and ADD_LIST_ELEMENT .

Quel est le statut de ton block ? Tu ne peux modifier une liste que si le statut est différent de QUERY et de CHANGED.

[bargou]

comment je peux savoir le statu de mon bloc

[orafrance]

recherche GET_BLOCK_PROPERTY dans l'aide forms

[bargou]

oui le statut de mon block est QUERY merci orafrance:-)
mais je parviend pas encore à résoudre mon pb

[plaineR]

J'ai corrigé mon message j'avais écrit une grosse boulette

Le statut de ton block doit être 'NEW' pour pouvoir la générer par le code.
D'où ton problème. Il faut que tu alimente ta liste avant de faire ton query.

[bargou]

donc je remplace mon code par un autre simailaire que je le met dans le new-form-instance?
le statut de mon block est new mais j'ai tj le meme pb

[plaineR]

Es-tu sûr que ton record group est correct ? Quelle est la valeur de ta variable errcode après avoir fait populate_group ?

[bargou]

mon errcode a de valeurs 0

[SheikYerbouti]

Avez-vous l'assurance que le datatype de votre item de type list est du même type (et suffisament dimentionné) que la première colonne de votre record group ?

[bargou]

voila un desc sur la table stratsystem :

Code :

1
2
3
4
5
6
7
8
9
10
 
SQL> DESC stratsystem
 Nom                                       NULL ?   Type
 ----------------------------------------- -------- ----------------------------
 SYS_CODE                                  NOT NULL VARCHAR2(15)
 SYS_NAME                                           VARCHAR2(80)
 SYS_DESC                                           VARCHAR2(300)
 PRG_CODE                                           VARCHAR2(15)
 ARCCOV                                             VARCHAR2(50)
 ARCITEM                                            VARCHAR2(8)

le data type de ma liste est de char de longueur maximale 15 com le sys_code
est ce que c'est une pb de valeurs par défaut ou quelque chose comme ca.. dans l'initialisation de la liste
je sais pas
est ce que mon code est sufisant? est ce que sa porté (au niveau du form :when-new-form) est valide ?...je sais pas

[plaineR]

Je crois avoir trouvé l'erreur
Il faut que tu inverses tes 2 colonnes dans ta requête : en premier la colonne qui sera affichée dans ta poplist en deuxième la colonne qui servira à définir la valeur de ta popliste.

[bargou]

,non pas encore c'est la meme erreur
stp donne moi les étapes pour se faire
peut être j'ai oublié une
je sais plus

[plaineR]

1. Tu crées ta liste pour laquelle tu mets comme longueur 15, et tu ne renseignes pas les valeurs par défaut ni la propriété "Correspondance autres valeurs"

2. Dans le trigger when-new-form-instance, tu mets le code suivant :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
DECLARE 
   rg_name  VARCHAR2(40) := 'STRAT_SYSTEM'; 
   rg_id    RecordGroup; 
   errcode  NUMBER; 
BEGIN 
   rg_id := Find_Group( rg_name ); 
   IF Id_Null(rg_id) THEN 
      rg_id := Create_Group_From_Query( rg_name, 'select sys_name, sys_code from stratsystem'); 
   END IF; 
   IF Populate_Group( rg_id ) = 0 then
      POPULATE_LIST  ('SYS_CODE',rg_name);
   end IF;
END;

3. Et puis c'est tout !!! Tu n'as pas besoin de créer de record group dans le navigateur de forms, ni rien d'autre.

[bargou]

merci j'ai pu afficher les information a partir de la base dans une liste
mais en fait j'ai tj une probleme,

Code :

1
2
3
4
FRM-30351: Aucun élément de liste n'a été défini pour cet élément Liste.
Liste SYS_CODE
 
Fichier d'application Forms MODULE1.fmx créé

j'ai cette erreur avant l'excution

[plaineR]

Oui c'est un warning, le programme fonctionne sans cela. Si tu ne veux pas avoir cette erreur tu peux toujours dans la propriété "Elements de la liste", renseigner une ligne.

Pour info, qu'est-ce qui faisait que cela ne marchait pas ?

N'oublie pas de cliquer sur le bouton résolu

[SheikYerbouti]

Mettez un élément bidon dans votre item liste. juste pour la compilation.

[bargou]

merci a tous pour votre patience
et surtout a toi PlaineR
cordialement