Aller au contenu

Code source wiki de Rupture Adelia

Modifié par Julien EYMERY le 2015/08/07 15:14
Afficher les derniers auteurs
1 (((
2 = Correspondance pour ordres de rupture Adelia =
3 )))
4
5
6 Ci-après un exemple mettant en parallèle deux codes réalisant le même traitement.
7 Le deuxième (partie droite du tableau) met en avant l'utilisation des (% style="color: rgb(255,102,0);" %)ruptures d'Adelia(%%) et démontre la (% style="color: rgb(255,102,0);" %)simplicité(%%) de mise en œuvre.
8
9 Entité : (% style="color: rgb(0,0,0);" %)LIG_FACTURES(%%)
10 Vue : **(% style="color: rgb(51,153,102);" %)LIGNES_FACTURES(%%)**
11 Fichier : LIGFACL3 (fichier ayant comme clés le code article et le n° de facture)
12 Clé : LCOD_ARTICLE (zone clé du fichier)
13
14 |(((
15 **(% style="color: rgb(0,102,255);" %)Transcription en ordres décomposés
16 (%%)**)))|(((
17 **(% style="color: rgb(0,102,255);" %)Avec ordres de rupture Adelia
18 (%%)**)))
19 |(((
20 LCOD_ARTICLE ~= *LOVAL)))|(((
21 LCOD_ARTICLE ~= *LOVAL)))
22 |(% colspan="1" %)(((
23 )))|(% colspan="1" %)(((
24 )))
25 |(% colspan="1" %)(((
26 WCOD_ARTICLE ~= *LOVAL)))|(% colspan="1" %)(((
27 **(% style="color: rgb(0,102,255);" %)INIT_RUPTURE(%%) RUPT_ARTICLE**)))
28 |(% colspan="1" %)(((
29 )))|(% colspan="1" %)(((
30 )))
31 |(((
32 POSITIONNER_AV (% style="color: rgb(255,102,0);" %)**LIGNES_FACTURES**(%%))))|(((
33 POSITIONNER_AV (% style="color: rgb(255,102,0);" %)**LIGNES_FACTURES**(%%))))
34 |(((
35 LIRE_AVANT (% style="color: rgb(255,102,0);" %)**LIGNES_FACTURES**(%%))))|(((
36 LIRE_AVANT (% style="color: rgb(255,102,0);" %)**LIGNES_FACTURES**(%%))))
37 |(((
38 (% style="color: rgb(255,255,255);" %)⋅(%%))))|(((
39 (% style="color: rgb(255,255,255);" %)⋅(%%))))
40 |(((
41 TANT_QUE (% style="color: rgb(255,102,0);" %)**LIGNES_FACTURES**(%%) EXISTE)))|(((
42 TANT_QUE (% style="color: rgb(255,102,0);" %)**LIGNES_FACTURES**(%%) EXISTE)))
43 |(((
44 SI WCOD_ARTICLE <> LCOD_ARTICLE)))|(((
45 (% style="color: rgb(255,255,255);" %)⋅(%%))))
46 |(((
47 TRAITER_PROC **ENTART**)))|(((
48 **(% style="color: rgb(0,102,255);" %)TRAITER_CHG(%%) RUPT_ARTICLE**)))
49 |(((
50 WCOD_ARTICLE ~= LCOD_ARTICLE)))|(((
51 (% style="color: rgb(255,255,255);" %)⋅(%%))))
52 |(((
53 FIN)))|(((
54 (% style="color: rgb(255,255,255);" %)⋅(%%))))
55 |(((
56 (% style="color: rgb(255,255,255);" %)⋅(%%))))|(((
57 (% style="color: rgb(255,255,255);" %)⋅(%%))))
58 |(((
59 TRAITER_PROC DETAIL)))|(((
60 TRAITER_PROC DETAIL)))
61 |(((
62 (% style="color: rgb(255,255,255);" %)⋅(%%))))|(((
63 (% style="color: rgb(255,255,255);" %)⋅(%%))))
64 |(((
65 LIRE_AVANT(% style="color: rgb(255,102,0);" %)** LIGNES_FACTURES**(%%))))|(((
66 LIRE_AVANT (% style="color: rgb(255,102,0);" %)**LIGNES_FACTURES**(%%))))
67 |(((
68 SI WCOD_ARTICLE <> LCOD_ARTICLE -)))|(((
69 (% style="color: rgb(255,255,255);" %)⋅(%%))))
70 |(((
71 OU LIGNES_FACTURES N_EXISTE_PAS)))|(((
72 **(% style="color: rgb(0,102,255);" %) (%%)**)))
73 |(((
74 TRAITER_PROC **TOTART**)))|(((
75 **(% style="color: rgb(0,102,255);" %) TRAITER_TOTAL(%%) RUPT_ARTICLE**)))
76 |(((
77 FIN)))|(((
78 )))
79 |(((
80 )))|(((
81 )))
82 |(((
83 REFAIRE)))|(((
84 REFAIRE)))
85 |(((
86 )))|(((
87 )))
88 |(((
89 DEBUT_PROCEDURE DETAIL)))|(((
90 DEBUT_PROCEDURE DETAIL)))
91 |(((
92 …)))|(((
93 …)))
94 |(((
95 FIN_PROCEDURE)))|(((
96 FIN_PROCEDURE)))
97 |(((
98 (% style="color: rgb(255,255,255);" %)⋅(%%))))|(((
99 (% style="color: rgb(255,255,255);" %)⋅(%%))))
100 |(((
101 DEBUT_PROCEDURE **ENTART**)))|(((
102 **(% style="color: rgb(0,102,255);" %)TRT_CHANGEMENT(%%) RUPT_ARTICLE**)))
103 |(((
104 …)))|(((
105 …)))
106 |(((
107 FIN_PROCEDURE)))|(((
108 **FIN_TRAITEMENT**)))
109 |(((
110 (% style="color: rgb(255,255,255);" %)⋅(%%))))|(((
111 (% style="color: rgb(255,255,255);" %)⋅(%%))))
112 |(((
113 DEBUT_PROCEDURE **TOTART**)))|(((
114 **(% style="color: rgb(0,102,255);" %)TRT_TOTAL(%%) RUPT_ARTICLE**)))
115 |(((
116 …)))|(((
117 …)))
118 |(((
119 FIN_PROCEDURE)))|(((
120 **FIN_TRAITEMENT**)))
121
122 (((
123 = Le mode de déclaration des ruptures ne sont pas identiques dans Adelia iSeries Studio ou Adelia Visual/Web Studio. =
124 )))
125
126 (((
127 === Pour (% style="color: rgb(0,102,255);" %)Adelia iSeries Studio(%%) vous devez créer la rupture et définir les informations suivantes : ===
128 )))
129 |(((
130 Nom de la rupture)))|(((
131 RUPT_ARTICLE)))
132 |(((
133 Fichier)))|(((
134 LIGFACL3)))
135 |(((
136 Zone 1 rupture)))|(((
137 LCOD_ARTICLE)))
138
139
140 Le fichier est défini en sélectionnant la vue(% style="color: rgb(255,102,0);" %)** LIGNES_FACTURES**(%%).
141 (((
142 === Pour (% style="color: rgb(0,102,255);" %)Adelia Visual/Web Studio(%%) vous devez créer une rupture puis ajouter dans la partie déclaration : ===
143 )))
144
145
146 {{code language="none"}}
147 RUPTURE LCOD_ARTICLE *VUE(LIGNES_FACTURES) /* pour un accès natif iSeries
148 * ou
149 RUPTURE LCOD_ARTICLE *SQL(LIG_FACTURES) /* pour un accès SQL sur l'entité LIG_FACTURES
150 {{/code}}
151
152
153
154 {{hardis-info type="info" icon="true"}}
155 ****(% style="text-decoration: underline;" %)Rappel (%%): Les ruptures peuvent porter sur une vue, une liste, un accès SQL ou un accès SQL sur une entité.
156 {{/hardis-info}}
157