PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → As400 Natif - copie d'1 structure avec éléments packés dans 1 chaîne
As400 Natif - copie d'1 structure avec éléments packés dans 1 chaîne
Débuté par ptchiot, 02 nov. 2005 08:45 - Aucune réponse
Posté le 02 novembre 2005 - 08:45
Bonjour,

Nous travaillons sous Windev 9 version As400 natif.
Je souhaite copier un tableau de structure avec des zones packées dans une zone de type chaîne.

La structure :
01 MATRICE-POLICE.
05 ELT-BRANPOL OCCURS 50.
10 MA-CODCIEBRAN PIC S9 COMP-3.
10 MA-CODBRANCHE PIC S99 COMP-3.
10 MA-PRORATAPR PIC S9(7)V99 COMP-3.
10 MA-PRORATATX PIC S9(7)V99 COMP-3.
10 MA-COMISADMAG PIC S9(7)V99 COMP-3.
10 MA-COMISADMAR PIC S9(7)V99 COMP-3.
10 MA-COMISAFFNV PIC S9(7)V99 COMP-3.
10 MA-COMISRNVLT PIC S9(7)V99 COMP-3.

La zone :
01 ELT-BRA-POL PIC X(2032).

En cobol, il me suffit d’alimenter les zones souhaitées et d’ensuite faire un simple « move » (MOVE MATRICE-POLICE to ELT-BRA-POL).

Est-ce possible d’en faire autant en Windev ?
Merci.

Christophe.