Opérations sur les zones alphanumériques
= Attribution
Attribue un champ alphanumérique, une valeur hexadécimale fixe ou une valeur nulle à un champ alphanumérique.
FieldR = Field1/Constant/NullFieldR reçoit le contenu de Field1.
Sur AS/400 IBMi, si la nature alphanumérique de Field1 et FieldR est différente (CHAR et NCHAR), le contenu est automatiquement converti au format destinataire de FieldR.
O.DESCRIPTION = I.DESCR
O.DESCRIPTION(10:1) = ‘@’
O.DESCRIPTION(11:1) = X’09’LTRIM – Suppression des blancs à gauche (non AS/400 IBMi)
Disponible uniquement sur les sources ou cibles non AS/400 IBMi.
Cette opération supprime les blancs à gauche dans une chaîne de caractères et place le résultat dans une autre chaîne.
LTRIM b.Field1/Constant TO b.Field2 DCL W.Field_1 CHAR 15
DCL W.Field_2 CHAR 15
W.Field_1 = ‘ TEST ’
LTRIM W.Field_1 TO W.Field_2
TRACE W.field_2 Trace "TEST"
RTRIM – Suppression des blancs à droite (non AS/400 IBMi)
Disponible uniquement sur les sources ou cibles non AS/400 IBMi.
Cette opération supprime les blancs à droite dans une chaîne de caractères et place le résultat dans une autre chaîne.
RTRIM b.Field1/Constant TO b.Field2 DCL W.Field_1 CHAR 15
DCL W.Field_2 CHAR 15
W.Field_1 = ‘ TEST ’
RTRIM W.Field_1 TO W.Field_2
TRACE W.field_2 Trace "TEST"
TRIM – Suppression des blancs à gauche et à droite (non AS/400 IBMi)
Disponible uniquement sur les sources ou cibles non AS/400 IBMi.
Cette opération supprime les blancs à gauche et à droite dans une chaîne de caractères et place le résultat dans une autre chaîne.
TRIM b.Field1/Constant TO b.Field2 DCL W.Field_1 CHAR 15
DCL W.Field_2 CHAR 15
W.Field_1 = ‘ TEST ’
TRIM W.Field_1 TO W.Field_2
TRACE W.field_2 Trace "TEST"
CONCAT – Concaténation (non AS/400 IBMi)
Disponible uniquement sur les sources ou cibles non AS/400 IBMi.
Cette opération concatène le contenu de deux chaînes de caractères et place le résultat dans une troisième.
CONCAT b.Field1/Constant WITH b.Field2/Constant TO b.Field3 DCL W.Field_1 CHAR 10
DCL W.Field_2 CHAR 10
DCL W.Field_3 CHAR 20
W.Field_1 = ‘ TEST ’
W.Field_2 = ‘ 1234 ’
CONCAT W.Field_1 WITH W.Field_2 TO W.Field_3
TRACE W.field_3 Trace "TEST 1234"
LEN – Longueur d'une chaîne (non AS/400 IBMi)
Disponible uniquement sur les sources ou cibles non AS/400 IBMi.
Envoie dans un champ numérique la longueur du contenu d'une chaîne de caractères.
LEN b.Field1/Constant TO b.Field2/N@n DCL W.Field_1 CHAR 10
DCL W.Field_2 NUMERIC 5
W.Field_1 = ‘ TEST ’
LEN W.Field_1 TO W.Field_2
TRACE W.Field_2 Trace "6"
VAL – Conversion d'alpha à numérique (non AS/400 IBMi)
Disponible uniquement sur les sources ou cibles non AS/400 IBMi.
Place le résultat d'une conversion d'alpha à numérique dans un champ.
STR b.Field1/N@n TO b.Field2/N@nDCL W.Field_1 CHAR 15
DCL W.Field_2 NUMERIC 9,2
W.Field_1=‘ -15.2’
VAL W.Field_1 TO W.Field_2
TRACE W.field_2 Trace -15.20