ADELIA |
|
|
|
|
(I/B) |
|
|
|
|
Paragraphe d'utilisation
INITIALISATION, VERIFICATION, VALIDATION, TRAITEMENT BATCH, ou tout autre paragraphe interactif, lorsque le numéro de transaction est indiqué.
Syntaxe
PRESENTER VueOuEntité Transaction Option
Transaction |
→ |
NumTransaction | Rien |
|
|
|
Option |
→ |
*FORCER |Rien |
Description
Cet ordre permet, après la lecture du fichier lié à la vue par la cinématique, de charger les zones du fichier dans les zones maquette correspondantes.
Si l'option *FORCER n'est pas indiquée et que la précédente lecture sur la vue ou la précédente lecture SQL sur l'entité n'a pas abouti (enregistrement non trouvé), deux cas sont possibles :
les zones sont remises à blanc ou à zéro s'il n'existe pas de valeur par défaut ;
la valeur par défaut est placée dans la zone écran partout où il y en a une.
Dans un contexte interactif :
si le numéro de transaction n'est pas indiqué derrière le mot directeur de la vue, alors cet ordre ne concerne que les zones écrans de la transaction où se trouve l'instruction,
si le numéro de transaction est indiqué derrière le mot directeur de la vue, alors cet ordre concerne les zones écrans de la transaction indiquée.
Dans un contexte batch, cet ordre concerne les zones d'édition reliées à la vue par la cinématique des données.
Cet ordre n'est applicable que sur des vues utilisées lors de la cinématique.
Voir également l'ordre IMPRIMER.
Par exemple
Exemple d'utilisation avec une vue :
***********************
INITIALISATION 02
***********************
LIRE COMMANDES
PRESENTER COMMANDES
LIRE REGLEMENTS
PRESENTER REGLEMENTS
*
* L'instruction PRESENTER mettra à blanc les zones écrans si la commande n'existe pas
*
GESTION_SFL 2
* chargement de toutes les lignes de commande dans le sous-fichier 2
* inversion de la date
* et lecture de la dénomination articles
PRESENTER LIGNES_CDE
ZDATE_CDE = &FORMAT_DATE6('YMD';'DMY';ZDATE_CDE)
LIRE ARTICLES
PRESENTER ARTICLES
DERNIER_NUMERO = ZLIGNE_CDE_N
MAJ_SFL
FIN_GESTION_SFL
Exemple d'utilisation avec une entité :
LIRE_SQL COMMANDE *COND(CNUM_CDE= :ZNUM_CDE)
PRESENTER COMMANDE