painaz
Guest
nous imaginons avoir cette situation de départ:
avec cette liste:
maintenant orienté la grande roue dentée:
Je voudrais écrire une macro qui coule les parties de la liste, localise la partie avec le même nom de fille de la vue front1
et l'agrégat obtenant ce résultat:
maintenant la macro l'aurait écrit, pour la relire devrait fonctionner, au lieu d'échouer:
définir unie
line_tabella locale
nom_parte_current local
courant_id_parte_local
nom_part_confront local
local id_parte_confrontolocal list_parti
éditer la _partie '.
indice
le nome_parte_current (q 301)
le nom_parte_current (nom_parte_current)
le nome_parte_current (substr name_parte_current 1 8)
indice
(po 302)
ii)
pb_ltab_update
list_parti 'pbt_ltab '
laisser ligne_tabella 1
boucle
le linea_tabella (riga_tabella+1)
exit_if (rega_tabella>(ltab_rows list_parts))
let name_part_comparison (read_ltab list_parts line_tabella 1)
let name_part_comparison (trim name_part_confront)
le nome_parte_confronto (substr name_parte_confronto 1 8)
le id_parte_confronto (read_ltab list_parti riga_tabella) 2)
iii)
si (id_parte_current < id_part_face)
si (nom_part_current = nom_part_confront)
_Modifier la partie supérieure
rassembler id_parte_confront
Éditer_partie id_parte_current
rassembler id_parte_confront
_sous-partie id_part_confront
pb_ltab_update
list_parti 'pbt_ltab '
♪
♪
let line_tabella (rega_tabella + 1)
end_loop
fin
fin
_Modifier la partie supérieure
fin
si quelqu'un a des suggestions...



et l'agrégat obtenant ce résultat:

définir unie
line_tabella locale
nom_parte_current local
courant_id_parte_local
nom_part_confront local
local id_parte_confrontolocal list_parti
éditer la _partie '.
indice
le nome_parte_current (q 301)
le nom_parte_current (nom_parte_current)
le nome_parte_current (substr name_parte_current 1 8)
indice
(po 302)
ii)
pb_ltab_update
list_parti 'pbt_ltab '
laisser ligne_tabella 1
boucle
le linea_tabella (riga_tabella+1)
exit_if (rega_tabella>(ltab_rows list_parts))
let name_part_comparison (read_ltab list_parts line_tabella 1)
let name_part_comparison (trim name_part_confront)
le nome_parte_confronto (substr name_parte_confronto 1 8)
le id_parte_confronto (read_ltab list_parti riga_tabella) 2)
iii)
si (id_parte_current < id_part_face)
si (nom_part_current = nom_part_confront)
_Modifier la partie supérieure
rassembler id_parte_confront
Éditer_partie id_parte_current
rassembler id_parte_confront
_sous-partie id_part_confront
pb_ltab_update
list_parti 'pbt_ltab '
♪
♪
let line_tabella (rega_tabella + 1)
end_loop
fin
fin
_Modifier la partie supérieure
fin
si quelqu'un a des suggestions...