Limiter le nombre de caractère d'un champs dynamiquement [Résolu]

[gengen]

Bonjour,

Tout d'abord, config : forms 9i, base 10g.
J'aimerais savoir si il est possible de changer la limite du nombre de caractères d'un champs basé.
C'est à dire, on a deux champs(A et B) :
Si A =1 je veux que le champs B se limite à 100 caractère.
Si A = 2 je veux que le champs B se limite à 200 caractère.
...

Merci

[orafrance]

tu as regardé l'aide de SET_ITEM_PROPERTY ?

[gengen]

Oui, j'ai regardé mais je n'ai rien trouvé.

[gengen]

Justement, je viens de trouver ça sur le tuto forms :

Longueur maximum nombre maximum de caractères saisissable :
Cette propriété ne peut être fixée qu'au moment du design.

Quelqu'un aurait une idée pour contourner le problème?

[orafrance]

éventuellement tu peux créer plusieurs items (A_100, A_200, etc...) avec chacun une règle différente et tu affiches celui qui t'intéresse en fonction de la valeur de A.

[plaineR]

Ou sinon tu peux afficher une erreur dans le WHEN-VALIDATE-ITEM.

[gengen]

A oui, je vois je vais créer un item pour chaque cas, basé sur le même champs, et j'affiche l'item qui correspond à la valeur.
j'y avais pas pensé . Merci

[SheikYerbouti]

Vous pouvez utiliser la syntaxe suivante:

Code :

Set_Custom_property( 'block.item', 1, 'MAX_LENGTH', 200);

[orafrance]

c'est beaucoup mieux

[gengen]

Effectivement ca me simplifie réellement la tâche.
Je vais tester ça ce week-end.

Merci

[plaineR]

Envoyé par SheikYerbouti

Vous pouvez utiliser la syntaxe suivante:

Code :

Set_Custom_property( 'block.item', 1, MAX_LENGTH, 200);

Intéressant, je ne savais pas qu'il était possible de modifier dynamiquement des propriétés non modifiables via set_item_property. Est-ce documenté quelque part ?

[SheikYerbouti]

Non il n'y a aucune doc. Mais comme la plupart des items Forms sont un Pluggable Java Component (PJC), il est possible de fixer/lire les valeurs de ces propriétés.
Pour connaitre la liste des propriétés, il suffit de créer un simple PJC qui étend l'item en question (VTextField dans l'exemple) et de faire une sortie sur la console au niveau de la méthode setProperty().

[SheikYerbouti]

deplus, la surcharge de l'instruction Set_Custom_Property() ne permet que d'envoyer des valeurs de type VARCHAR, NUMBER ou BOOLEAN

[SheikYerbouti]

Sortie sur la console:

Version de Forms Applet : 902110
setProperty()--> BORDER_BEVEL:oracle.forms.properties.BorderBevel@13ec2dd
setProperty()--> UI_PARENT:16
setProperty()--> LOCATION:java.awt.Point[x=43,y=47]
setProperty()--> OUTERSIZE:java.awt.Point[x=388,y=28]
setProperty()--> FOREGROUND:java.awt.Color[r=0,g=0,b=0]
setProperty()--> BACKGROUND:java.awt.Color[r=255,g=255,b=255]
setProperty()--> FONT:java.awt.Font[family=Dialog,name=Dialog,style=plain,size=11]
setProperty()--> BORDERUSE:true
setProperty()--> BORDER_BEVEL:oracle.forms.properties.BorderBevel@1f10a67
setProperty()--> LANGUAGE_DIRECTION:oracle.forms.properties.LanguageDirection@1e2161d
setProperty()--> DEFAULTKEYS:1
setProperty()--> CLASSNAME:oracle.forms.fd.PJCJtextArea
setProperty()--> MAX_LENGTH:30
setProperty()--> VISIBLE:true
setProperty()--> VALUE:coucou
getProperty()<-- EDITABLE:true
getProperty()<-- VALUE:coucou
getProperty()<-- FOREGROUND:java.awt.Color[r=0,g=0,b=0]
getProperty()<-- BACKGROUND:java.awt.Color[r=255,g=255,b=255]
setProperty()--> BGPATTERN:null
setProperty()--> FOCUS:true
getProperty()<-- EDITABLE:true
getProperty()<-- SELECTION:java.awt.Point[x=0,y=0]
getProperty()<-- OK_TO_PASTE:true
getProperty()<-- VALUE:coucou
...

a partir du code Java suivant:

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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
package oracle.forms.fd;
 
import javax.swing.BorderFactory;
import javax.swing.JTextField;
import javax.swing.border.BevelBorder;
import javax.swing.border.Border;
import javax.swing.border.EtchedBorder;
import javax.swing.border.TitledBorder;
import oracle.ewt.util.stringFilter.StringFilter;
import oracle.forms.handler.IHandler;
import oracle.forms.ui.CustomEvent;
import oracle.forms.properties.ID;
import oracle.forms.ui.VTextField;
 
 
public class PJCJtextArea extends VTextField
 
{
    static IHandler mHandler;
    // properties you can SET
    protected static final ID SET_01   = ID.registerProperty("SET_01");
    protected static final ID SET_02   = ID.registerProperty("SET_02");
    // properties you can be get
    protected static final ID GET_01   = ID.registerProperty("GET_01");
    // events you can raise
    protected static final ID EVT_01   = ID.registerProperty("EVT_01");    
    protected JTextField jText = new JTextField();
    protected Border border, loweredetched = BorderFactory.createEtchedBorder(EtchedBorder.LOWERED);
    protected TitledBorder title;
 
    // DEFAULT constructor
    public PJCJtextArea()
    {
      super();
    }
 
    public void init(IHandler handler)
    {
      super.init(handler);
      mHandler = handler;
      // put your initialisation instructions here
    }      
 
 /**
   * Set the properties to the bean
   **/    
  public BOOLEAN setProperty(ID property, Object value)
  {
    System.out.println("setProperty()--> " + property+":"+value) ;       
    IF(property == SET_01)
    {     
       RETURN true;       
    }
    else IF (property == SET_02)
    {
        // ADD your code here
        RETURN true;
    }
    else // DEFAULT behaviour
    {
       RETURN super.setProperty(property, value);
    }      
  }
 
 /**
   * Get the properties of the bean
   **/
  public Object getProperty(ID property)
  {
    System.out.println("getProperty()<-- " + property+":"+super.getProperty(property)) ;       
    IF (property == GET_01)
    {
      // RETURN the corresponding value
      RETURN "the property needed" ;
    }
    else // DEFAULT behaviour
    {
      RETURN super.getProperty(property);
    }
  }
 
 
}

[SheikYerbouti]

petite correction : la propriété doit être passée entre quotes:

Code :

Set_Custom_Property('bloc.item',1, 'MAX_LENGTH',5);

[plaineR]

Merci Sheik pour toutes ces précisions.