OVRDBF auf eine bereits überschriebene Datei

[Starocotes]

Okay, kann ich auch vergessen:

Bei mir sieht das in etwa vereinfacht folgendermaßen aus:

ProgrammA

If Schalter
OVRDBF FILE(DateiX) TOFILE(DateiY)
Endif

open DateiX
Machwas
close DateiX

call ProgrammB

ProgrammB

If Schalter
OVRDBF FILE(DateiX) TOFILE(DateiY)
Endif

open DateiX
Machwas
close DateiX

Selbst bei nem SHARE(*YES) und nem open vorher würde ja ProgrammB wieder den OVRDBF machen können.

Ich denke ich lege mir noch nen Datenbereich an den ich einlese und als neuen Schalter verwende nur für MEIN OVRDBF verwende.

[Starocotes]

Sorry, muss euch nochmal als "Reflektor" missbrauchen.

Datenbereich ist nicht weil die Programme in Theorie paralell laufen können.
Datenbereich in QTEMP würde wieder voraussetzen, das ich zuerst prüfe ob der da ist weil ProgammA und ProgrammB auch woanders aufgerufen werden können.

Wo bekomme ich nen Jobbedingten Parameter her der "automatisch" da ist?

[Robi]

???????????
Der LDA ist Jobbedingt
Parallel interaktiv im selben job geht nicht
Parallel im Batch = 2 LDA

oder was meinst du?
Robi

[Starocotes]

ProgrammA kann in unterschiedlichen Jobs parallel laufen. Da hab ich ja dann unterschiedliche LDA's.
Denn kann ich aber nicht verwenden da der in zu vielen anderen Programmen gleich genutzt wird.

Ne statische Datenstruktur geht nicht weil dann ja beim Parallelbetrieb eventuell was durcheinander kommen würde.

Bin gerade am prüfen ob ich nicht doch einen Übergabeparameter missbrauchen kann.

[Fuerchau]

Missbrauch ist immer schlecht.
Aber die LDA kann man schon benutzen (ich mache das auch häufig):
- Ursprüngliche LDA (1KB) komplett einlesen
- LDA modifizieren, CALL oder SBMJOB
- LDA wiederherstellen

Beim SBMJOB wird die lokale LDA kopiert und an den Batchjob übergeben.

[BenderD]

... da könnte man doch einen UserSpace mit Pxxxxxx (xxxxxx = Jobnummer und P ein Prefix erstellen), das ist dann gleich auf 26 Stück erweiterbar, den könnte man dann noch über LIBL suchen lassen, beim SBMJOB kann man dann den LDA da rein sichern und den Namen des zu verwendenden USRSPC in den LDA reinmalen und dann im aufgerufenen Jobe wieder alles richtig rumkopieren; das müsste doch genug hergeben, dass man die Programme garnicht mehr versteht...

D*B

[Starocotes]

Danke für die Hilfreichen Antworten, habe mich gerade entschieden das komplette Programm in Assembler auf nem 286 neu zu schreiben oder alternativ hab ich hier auch noch 2 Programmtafeln zum Stecken rumliegen

LDA sichern ist nicht, weil es doch ein wenig komplexer ist und ich die Daten aus dem LDA auch brauche.
Werd das jetzt mit dem Parameter probieren.

[Pikachu]

Vorsicht mir der Jobnummer! Es kann durchaus (wenn auch sehr selten) mehrere (aktive) Jobs mit derselben Jobnummer geben, solange sich diese Jobs im Benutzernamen oder Jobnamen unterscheiden.

[BenderD]

Vorsicht mir der Jobnummer! Es kann durchaus (wenn auch sehr selten) mehrere (aktive) Jobs mit derselben Jobnummer geben, solange sich diese Jobs im Benutzernamen oder Jobnamen unterscheiden.

Im Workmanagement Guide steht immer noch: The job number is a unique number assigned by the system.
Hast Du da andere, dokumentierte Informationen? Oder ist das wieder die Kaffeesatz Diskussion mit dem ewig laufenden Job und dem Wrap der Jobnummer?

D*B

[Fuerchau]

Das wäre mir auch neu.
Wenn in der Job-Tabelle kein Platz mehr ist, kann kein neuer Job initiiert werden.
Beim Überlauf dauert das Erstellen halt ein wenig länger, da die interne Jobtabelle sequentiell nach Lücken durchsucht wird.

[Pikachu]

Ich hab eine 825 mit V5R3 und 9 aktiven Jobs mit der gleichen Jobnummer auf meiner Seite.

Holger ist mein Zeuge (seit 2007) ...

Im Workmanagement Guide steht immer noch: The job number is a unique number assigned by the system.
Hast Du da andere, dokumentierte Informationen? Oder ist das wieder die Kaffeesatz Diskussion mit dem ewig laufenden Job und dem Wrap der Jobnummer?

D*B

[Fuerchau]

Die Job-Nr. 666666 scheint da wohl ein Spezialfall zu sein.
Die fällt zumindest aus dem normalen Rahmen.
Ich denke mal, die zählt hier nicht .