Faire un setll avec une valeur nulle

RPG (3 et 4, free), CL, SQL, etc...
Répondre
BrigitteG
Messages : 109
Enregistré le : jeu. 20 sept. 2012, 08:56:38

Faire un setll avec une valeur nulle

Message par BrigitteG »

Bonjour,

J'ai un fichier qui a trois zones clé. Deux alpha et une date (si vide elle est à nulle).

Je veux faire un setll/reade avec ces trois zones en initialisant ma date à nulle.

Il me semble que c'est possible de le faire. Je fais une recherche sur le net mais je dois mal mis prendre car je ne trouve pas.

Merci d'avance pour votre aide.

cmasse
Site Admin
Messages : 813
Enregistré le : mer. 14 févr. 2007, 18:00:03
Localisation : Nantes
Contact :

SETLL et val. nulles

Message par cmasse »

Bonjour,

si vous êtes en specif C

Code : Tout sélectionner

  C               MACLE      KLIST
  C                          KFLD                   ZONE1
  C                          KFLD                   ZONE2
  C                          KFLD      *in40        ZONEDAT
si *IN40 est à *OFF vous recherchez avec la date, s'il est *ON vous recherchez avec val. nulle

SI vous êtes en free, c'est mieux

Code : Tout sélectionner

  DCL-DS  MACLE LIKEREC(leFormat : *KEY);
ou
  D MACLE        DS           LIKEREC(leFormat : *KEY)
et vous mettez %NULLIND(ZONEDAT) à *ON ou à *OFF avant

Code : Tout sélectionner

CHAIN %KDS(macle) lefichier;
Modifié en dernier par cmasse le dim. 13 déc. 2015, 17:56:27, modifié 1 fois.
Christian Massé (Volubis.fr)

BrigitteG
Messages : 109
Enregistré le : jeu. 20 sept. 2012, 08:56:38

Faire un setll avec une valeur nulle

Message par BrigitteG »

Merci pour votre réponse.

BrigitteG
Messages : 109
Enregistré le : jeu. 20 sept. 2012, 08:56:38

Faire un setll avec une valeur nulle

Message par BrigitteG »

Remplacer LIKERCD par LIKEREC

cmasse
Site Admin
Messages : 813
Enregistré le : mer. 14 févr. 2007, 18:00:03
Localisation : Nantes
Contact :

oups !

Message par cmasse »

Oups !

C'est fait, merci.
Christian Massé (Volubis.fr)

Répondre