aggregierte Teile mit demselben Namen

[painaz]

wir stellen uns vor, diese Ausgangssituation zu haben:
mit dieser Liste Teile:
jetzt das große Zahnrad gezahnt:
Ich möchte ein Makro schreiben, das die Listenteile fließt, lokalisiert das Teil mit dem gleichen Töchternamen der Front1 Ansicht
und das Aggregat, das dieses Ergebnis erhält:
Nun hätte das Makro es geschrieben, um es wieder zu lesen sollte funktionieren, stattdessen scheitert es:

definieren vereinheitlicht

Lokal line_tabella
Lokal name_parte_current
id_parte_current
Lokaler Name_part_confront
id_parte_confrontolocal list_parti


edit_part '.
inq
le nome_parte_current (inq 301)
le nome_parte_current (trim name_parte_current)
le nome_parte_current (substr name_parte_current 1 8)

inq
(inq 302)
(ii)

Pb_ltab_update

le list_parti 'pbt_ltab '
lassen line_tabella 1

Schleifen
le linea_tabella (riga_tabella+1)
Ausstieg_if (rega_tabella>(ltab_rows list_parts))
Name_part_comparison (read_ltab list_parts line_tabella 1)
Name_part_comparison (trim name_part_confront)
le nome_parte_confronto (substr name_parte_confronto 1 8)
id_parte_confronto (read_ltab list_parti riga_tabella) 2)
(iii)

wenn (id_parte_current < id_part_face)
wenn (name_part_current = name_part_confront)
edit_part top
id_parte_confront
edit_part id_parte_current
id_parte_confront
id_part_confront
Pb_ltab_update
le list_parti 'pbt_ltab '
♪
♪
line_tabella (rega_tabella + 1)
Endbenutzer
Ende
Ende
edit_part top
Ende

wenn jemand Vorschläge hat....

 

[painaz]

gefunden... kann immer anderen dienen so der Ort:

definieren vereinheitlicht

Lokal line_tabella

Lokal name_parte_current
id_parte_current
id_parte_current_num

Lokaler Name_part_confront
id_parte_confront
id_parte_confront_num

lokale list_parts

inq
le nome_parte_current (inq 301)
le nome_parte_current (trim name_parte_current)
{der Name_part_current(substr name_part_current 1 8)}

inq
(inq 302)
le id_parte_current (str "~"+id_parte_current)
(c)

edit_part top

Pb_ltab_update
le list_parti 'pbt_ltab '
Le riga_tabella (1)

während (line_tabella <= ltab_rows "pbt_ltab" )
le nome_parte_confronto (read_ltab "pbt_ltab" line_tabella 1)
Name_part_comparison (trim name_part_confront)
{let name_part_comparison (substr name_part_confront 1 8)}
le id_parte_confronto (read_ltab "pbt_ltab" line_tabella 2)
(Zahl id_part_confront_number (Zahl id_part_confront_str)
wenn (id_parte_current = id_part_confront)
Anzeige ("=")
♪
{ Display ("in sonst") }
{display(id_parte_current) }
{display(id_part_confront) }
{display (part_current name) }
{display (part_name_confront)
wenn (name_part_current = name_part_confront)
Trap_error
{ display ("unifi") }
edit_part top
id_parte_confront
edit_part id_parte_current
id_parte_confront
id_part_confront
♪
♪
line_tabella (rega_tabella + 1)
Ende
edit_part top
Ende