Discussion :

[oviich]

Bonjour,

Je demande si y'a un autre moyen plus pratique d'initialiser une zone sans passer par INITIALIZE, et sans passer par une initialisation ( variable par variable ).

par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14

01  MXXXXXX-OP01.
   03 OP01-D-REF.
        05 C-FORMT-D PIC 9(4) COMP-4.
             88 ED-ISO VALUE 0.
             88 ED-XXX VALUE 1.  
             88 ED-YYY VALUE 2.
        05 D-ISO.
             06 D-ISO-AAAA PIC 9(4).
             06 D-ISO-CT1 PIC X.
             06 D-ISO-MM PIC 9(2).
             06 D-ISO-CT2 PIC X. 
             06 D-ISO-JJ PIC 9(2).

Ceci est mon premier post sur ce forum, montrez moi votre chaleur d'accueil

[BernardBZH]

Bonjour oviich

Non il n'y a pas de commande autre que l'INITIALIZE et le MOVE variable par variable permettant d'initialiser une variable.

Ce qui peut être fait en revanche c'est valoriser tes variables en les déclarant. Si on reprend ton code en exemple ça donnerait ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
01  MXXXXXX-OP01.
   03 OP01-D-REF.
        05 C-FORMT-D PIC 9(4) COMP-4.
             88 ED-ISO VALUE 0.
             88 ED-XXX VALUE 1.  
             88 ED-YYY VALUE 2.
        05 D-ISO.
             06 D-ISO-AAAA PIC 9(4) VALUE 0.
             06 D-ISO-CT1  PIC X    VALUE SPACE.
             06 D-ISO-MM   PIC 9(2) VALUE 0.
             06 D-ISO-CT2  PIC X    VALUE SPACE. 
             06 D-ISO-JJ   PIC 9(2) VALUE 0.

Mais je ne vois pas en quoi l'INITIALIZE ne te semble pas pratique. Un INITIALIZE sur une zone groupe initialise les variables élémentaires selon leur PICTURE.

[escartefigue]

Bonjour

Sujet récurrent, dont voici l'un des clones http://www.developpez.net/forums/d13...on-initialize/

Le souci éventuel d'initialize est la présence de redefines, auquel cas il faut faire les move avec les valeurs souhaitées (numérique par exemple)

[oviich]

Bonjour

Sujet récurrent, dont voici l'un des clones http://www.developpez.net/forums/d13...on-initialize/

Le souci éventuel d'initialize est la présence de redefines, auquel cas il faut faire les move avec les valeurs souhaitées (numérique par exemple)

Merci escartefigue, je vais y jeter un coup d'oeil.

Bonjour oviich

Mais je ne vois pas en quoi l'INITIALIZE ne te semble pas pratique. Un INITIALIZE sur une zone groupe initialise les variables élémentaires selon leur PICTURE.

INITIALIZE c'est pratique, mais le client avec lequel je travaille m'a demandé de ne pas l'utiliser, peut être, çà consôme trop en memoire. Vu qu'on travaille avec des copy oû y'a beaucoup de zones, et juste quelques unes qui seront utilisées à chaque traitement, c'est pas la peine de initializer 1000 variable si on ne va utiliser que 40 par exemple.

Merci pou votre passage

[el_slapper]

(.../...)
INITIALIZE c'est pratique, mais le client avec lequel je travaille m'a demandé de ne pas l'utiliser, peut être, çà consôme trop en memoire. Vu qu'on travaille avec des copy oû y'a beaucoup de zones, et juste quelques unes qui seront utilisées à chaque traitement, c'est pas la peine de initializer 1000 variable si on ne va utiliser que 40 par exemple.

Merci pou votre passage

Il est louche, le client. 99% des problèmes de perf, c'est de l'entrée/sortie en trop grand nombre. les 1% restants étant généralement des algorithmes aberrants(j'ai pratiqué, honte à moi). Franchement, l'emprunte d'un initialize, par rapport à une entrée sortie, c'est peanuts.

Après, si il te fait chier là dessus, ben, pas d'autre choix que de faire un MOVE correspondant à la valeur à initialiser. Mais c'est vraiment chercher à économiser des grains de sables dans le Sahara...

[oviich]

... pas d'autre choix que de faire un MOVE correspondant à la valeur à initialiser. Mais c'est vraiment chercher à économiser des grains de sables dans le Sahara...

Y'a rien de plus chiantque ces MOVE.. TO pour initializer. Y'avais vraiment beaucoup d'allez retour concernant ce sujet, mais ce client insiste pour ne pas utiliser INITIALIZE. Je pense que je n'ai pas d'autre choix.

Merci pour ton passage

[Darkzinus]

Franchement, l'emprunte d'un initialize, par rapport à une entrée sortie, c'est peanuts.

Il y a quand même le cas des initialize de tableaux (à outrance) qui peuvent être très coûteux. Suite à une modification sur ce genre d'initialize j'ai eu une fois un gain avec un facteur 100 niveau temps CPU.

[escartefigue]

Il est louche, le client. 99% des problèmes de perf, c'est de l'entrée/sortie en trop grand nombre. les 1% restants étant généralement des algorithmes aberrants(j'ai pratiqué, honte à moi). Franchement, l'emprunte d'un initialize, par rapport à une entrée sortie, c'est peanuts.

Tout à fait d'accord concernant les I/O qui représentent le plus clair du temps de traitement, mais les développeurs oublient trop souvent l'impact du format des données.
Ce n'est guère surprenant, ce genre de subtilités n'est plus enseigné, mais il faut quand même rappeler que les mêmes instructions appliquées sur des montants binaires, packés ou étendus n'ont pas du tout le même coût.
Le format étendu, tant prisé par les débutants car facile à lire dans les dumps, coûte 8 fois plus cher que du binaire, et 3 fois plus que du packé !
Le gain n'est pas toujours marginal, certains traitements qui font essentiellement du calcul, méritent qu'on soigne aussi cet aspect du code.