laufende Nr für Liste in Liste

[Gast] Foren Programmierung/Entwicklung AppleScript laufende Nr für Liste in Liste

Programmierung/Entwicklung

Themen

Beiträge

Moderatoren

Letzter Beitrag

AppleScript

1260

8218

Hans Haesler

8. Nov 2023, 13:38

mb_new

Goar

Beiträge gesamt: 395

20. Sep 2022, 11:59
Beitrag # 1 von 3
Bewertung:
(3588 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo Skripter,
für eine Veranstaltung können Kuchen gespendet werden.
Um die Spenden zu erfassen gibt es ein Formular.

Wer mehrere Exemplare des gleichen Kuchens spenden möchte, kann die entsprechende Anzahl eingeben, im Muster curItem habe ich einmal die 3 gesetzt.
In der Gesamtliste sollen diese Mehrfachspenden aber vereinzelt werden, dort gibt es also nachher für diese Spende drei identische Einträge.
Nun sollen alle Einträge eine laufende Nummer bekommen.
Das habe ich so probiert:

Code

set AppleScript's text item delimiters to tab 
set allList to {} -- sammelt die einzelnen (!) Kuchenspenden 
set cakeCounter to 1 
set curItem to "Thatcher	Margret	(176) 12345678	Schokokuchen	X	3	gluten, eier, kannSpuren	X	SA	X" 
set curList to text items of curItem 
set beginning of curList to "" -- setzt einen Platzhalter für die lfdnr 
set cntCakes to item 7 of curList 
set item 7 of curList to "1" 
if (cntCakes > 1) then 
	repeat cntCakes times 
		set item 1 of curList to cakeCounter as text -- setzt die lfdnr ein 
		set end of allList to curList 
		set cakeCounter to cakeCounter + 1 
	end repeat 
else 
	set item 1 of curList to cakeCounter as text -- setzt die lfdnr ein 
	set end of allList to curList 
	set cakeCounter to cakeCounter + 1 
end if 
set AppleScript's text item delimiters to {""} 
allList

Wie ich es auch drehe und wende, die vereinzelten Einträge aus der Schleife repeat cntCakes times bekommen immer die gleiche, nämlich die höchste Nummer.
Bei einem Test mit 2 (statt 3) habe ich immerhin festgestellt, dass das erste Exemplar korrekt mit der lfdnr 1 in allList eingesetzt wird, sobald das zweite Exemplar mit der lfdnr 2 ergänzt wird, hat das erste aber auch die 2.

Auch der Versuch, nach Fertigstellung der Gesamtliste allList die lfdnr einzufügen führte nicht zum gewünschten Ergebnis.
So habe ich es versucht:

Code

set cntCakes to length of allList 
repeat with i from 1 to cntCakes 
	set beginning of item i of allList to i as text 
end repeat

Wo steckt mein Denkfehler oder meine Ungeschicklichkeit in der Umsetzung?

Viele Grüße

laufende Nr für Liste in Liste

TMA

Beiträge gesamt: 399

21. Sep 2022, 09:54
Beitrag # 2 von 3
Beitrag ID: #584432
Bewertung:
(3528 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo Goar,
auf die schnelle probiere bitte mal dieses aus:

Code

set AppleScript's text item delimiters to tab 
set allList to {} -- sammelt die einzelnen (!) Kuchenspenden  
set curItem to "Thatcher	Margret	(176) 12345678	Schokokuchen	X	3	gluten, eier, kannSpuren	X	SA	X" 
set curList to text items of curItem 
set beginning of curList to "" -- setzt einen Platzhalter für die lfdnr  
set cntCakes to item 7 of curList as integer 
set item 7 of curList to "1" 
repeat with i from 1 to cntCakes 
	set item 1 of curList to i as text -- setzt die lfdnr ein  
	copy curList to end of allList 
end repeat 
set AppleScript's text item delimiters to {""} 
allList

Gruß
TMA

als Antwort auf: [#584428]

laufende Nr für Liste in Liste

Goar

Beiträge gesamt: 395

21. Sep 2022, 10:47
Beitrag # 3 von 3
Beitrag ID: #584433
Bewertung:
(3503 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo TMA,

klappt, super!

Vielen Dank!

als Antwort auf: [#584432]

Aktuell

PDF / Print

Neue axaio MadeToPrint-Version, inkl. Kompatibilität mit Adobe InDesign 2024

| 03.11.2023

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen

18.06.2024

So optimieren Sie Ihren LFP-Workflow

Online
Dienstag, 18. Juni 2024, 10.00 - 10.30 Uhr

Webinar

In diesen beiden kostenlose Webinaren erfahren Sie, wie Sie mit Hilfe von Enfocus Griffin und dem Impressed Workflow Server Ihren LFP-Workflows optimieren können. 18.06.2024: So optimieren Sie Ihre Prozesse mit Enfocus Griffin 02.07.2024: So sparen Sie Zeit und Geld mit Impressed Workflow Server in der LFP-Edition Griffin: Griffin ist das leistungsstarke Kraftpaket fuÌˆr das automatische Nesting im Großformatdruck. Dank eines ausgekluÌˆgelten, KI-basierten Nesting-Algorithmus können Sie mit Griffin Vorlagen schnell und effizient vernutzen – und das klappt auch mit unregelmäßigen Formen perfekt. Das spart Ihnen unzählige Stunden, die Sie bisher mit dem manuellen Nesting und Ausschießen verbracht haben. Einige wichtige Funktionen ≡ Anlage von Beschnittzugaben ≡ Automatische Erzeugung der Schnittkontur ≡ Erstellung von Strichcodes, Textmarkierungen und Registrierungen IWS LFP Edition: Komplizierte, kleinteilige Aufträge; alles sehr speziell; seit Jahren bewährte Prozesse – da können wir nichts standardisieren und automatisieren! Das sagen viele Großformatdrucker – aber stimmt das wirklich, ist dem tatsächlich so? Mit dem IWS LFP Edition automatisieren Sie Ihre Produktion von der Übernahme der Daten aus dem ERP-System bis zur Erzeugung der verschachtelten Druckform und der Übergabe an den RIP. Phoenix Core ist eine hochentwickelte KI-Technologie fuÌˆr die Planung und das Nesting von Druckerzeugnissen. Anders als herkömmliche Ausschießlösungen arbeitet Phoenix nicht auf Basis von Vorlagen, sondern erzeugt entsprechend der Maschinen- und Produktionsanforderungen druckfertige Layouts „on-the-fly“.

kostenlos

Organisator: Impressed GmbH

https://www.impressed.de/schulung.php?c=sDetail&sid=328