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:
(3198 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:
(3138 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:
(3113 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

14.05.2024

Einsparpotenziale in der Weiterverarbeitung

Online
Dienstag, 14. Mai 2024, 10.00 - 10.30 Uhr

Webinar

Prozessoptimierung ist ein Teamsport! Keine Software und keine Maschine allein kann Ihnen helfen, die Effizienzpotenziale Ihres Betriebes maximal auszuschöpfen. Von der Auftragsannahme über die Vorstufe und den Druck bis hin zur Weiterverarbeitung – alles muss optimal ineinandergreifen. Apropos Weiterverarbeitung – in vielen Druckbetrieben fristet sie in Sachen Prozessoptimierung immer noch ein Schattendasein. Dabei liegen hier mittlerweile die größten Einsparpotenziale! In einem Webinar von Horizon und Impressed erfahren Sie, wie Sie diese Einsparungen realisieren können. Horizon, bekannt für innovative Lösungen in der Druckweiterverarbeitung, bietet mit iCE LiNK eine Workflowlösung für die Weiterverarbeitung. iCE LiNK überwacht, visualisiert und analysiert Produktionsabläufe und unterstützt bei der Wartung – damit immer alles reibungslos läuft. Den gleichen Anspruch hat der von Impressed entwickelte Impressed Workflow Server – er ist die smarte PDF-Workflow-Lösung für Druckereien, die Datenmanagement, Preflight und Produktionssteuerung übernimmt. Im Webinar zeigen Ihnen die Experten von Horizon und Impressed, wie beide Lösungen im Team die Effizienz und Produktivität Ihres Betriebes steigern können. Melden Sie sich am besten gleich an, wir freuen uns auf Sie! PS: Melden Sie sich in jedem Fall an – sollten Sie zum Termin verhindert sein, erhalten Sie die Aufzeichnung.

kostenlos

Organisator: Impressed / Horizon

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

Einsparpotenziale in der Weiterverarbeitung

Veranstaltungen

16.05.2024

Und es geht doch: Automatisierung im Großformatdruck!

Online
Donnerstag, 16. Mai 2024, 10.00 - 10.30 Uhr

Webinar

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? Günther Business Solutions und Impressed treten in einem Webinar den Gegenbeweis an. Experten beider Unternehmen zeigen, wie Großformatdrucker vom Einsatz zweier bewährter Lösungen profitieren können: • von advanter print+sign von Günther Business Solutions, dem ERP-System für den Großformatdruck, dass alle Phasen der Wertschöpfung im Large Format Printing abdeckt • von Impressed Workflow Server, der smarten PDF-Workflow-Lösung für Druckereien, die Datenmanagement, Preflight und Produktionssteuerung übernimmt Über die Kombination beider Lösungen können Großformatdrucker ihre Prozesse mit modernen Workflows Schritt für Schritt automatisieren – und so zügig deutliche Zeit- und Kosteneinsparungen realisieren. Das Webinar sollten Sie sich nicht entgehen lassen – damit Sie keine Effizienzpotenziale mehr liegen lassen. Melden Sie sich am besten gleich an, wir freuen uns auf Sie! PS: Melden Sie sich in jedem Fall an – sollten Sie zum Termin verhindert sein, erhalten Sie die Aufzeichnung.

kostenlos

Nein

Organisator: Impressed / Günther Business Solutions

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

Und es geht doch: Automatisierung im Großformatdruck!

Weitere Events

Neuste Foreneinträge

Switch/PitStop: Sprachdatei vom Report ändern

Mit Preflight Registerfarbe ALL nach Grau konvertieren geht nicht

Absatzsetzer in CC24 ME lösen Probleme aus

Quark Objekte lassen sich nicht neben Layout ziehen.

Barrierefreie PDFs | Mögliche unangebrachte Verwendung des Strukturelements xy

Barrierefreiheit in indesign 2022: figure-Tags haben als Attributobjekt "block" statt "inline"?

Kontrollkästchen in PDF-Formular

Indesign Tabelle ausrichten

Mehrfach geschichtete und übereinander gelagerte PDFs bereinigen

InDesign 19.2 konvertiert 19.3-Dateien beim Öffnen ungefragt

Weitere Stellenangebote