ADELIA |
VADELIA |
SADELIA |
WADELIA |
MADELIA |
(I/B) |
(I/B) (S) |
(B) (S) |
(I/B) (S) |
(I) (S) |
Attention : dans le cas des programmes de type ADELIA, cet ordre est uniquement compatible avec le générateur RPG.
Paragraphe d'utilisation
Tous
Syntaxe
SUPPRIMER_SQL NomEntité ConditionAdélia Paramètre
Paramètre |
→ |
*NON_RG | *RG | Rien |
Description
Cet ordre supprime le ou les enregistrements dans l'entité NomEntité, en respectant la condition ConditionAdélia (facultative).
Il correspond à l'ordre SQL : "Delete from NomEntité where ConditionAdélia".
Pour les programmes de type que ADELIA, il est possible de s'assurer que l'enregistrement n'est pas verrouillé en le testant à l'aide du mot réservé *BLOQUE.
Le paramètre *RG permet de générer les règles de gestion implicites de suppression liées à l'entité, même si le programme est généré sans l'option de génération des règles de gestion implicites.
Le paramètre *NON_RG permet de ne pas générer les règles de gestion implicites de suppression liées à l'entité, même si le programme est généré avec l'option de génération des règles de gestion implicites.
Après exécution de l'ordre, il est possible de tester le code retour SQL à l'aide du mot réservé *SQLCODE.
Par exemple
SUPPRIMER_SQL LIGNE_CMDE *COND(NUM_CMDE= :ZNUM_CMDE)
Autre exemple d'utilisation
(programme WADELIA)
* boucle de lecture de la liste pour prendre
* toutes les lignes sélectionnées
LECTURE_LST LST_PERSO:LISTE *SELECT
* envoi msg dans boîte avec réponse oui ou non
ENVOYER_MSG INF0007 *BOITE(*OUI_NON, W_REP, 2)
SI W_REP = *BTN_OUI
SUPPRIMER_SQL PERSONNEL -
*COND(PE_COD_MATRICUL=:ZZ_COD_MATRICUL)
SUPPRIMER_ELT LST_PERSO:LISTE
FIN
*
FIN_LECTURE_LST