Lions2011

Naja, hoffen wir mal das beste! Bist du für längere Zeit da oder nur für ein paar Wochen/Monate? Weißt du zufällig, ob Airbus zufällig noch FI-AE sucht, wenn aber in Deutschland?

Na das denk ich doch, dass das klappen wird! Oder meinst du, die Franzosen kennen noch kein Internet?

Das ist ja mal nicht schlecht! Würdest mir auch nen paar Fotos dann zukommen lassen?

Danke für eure Hilfe, teile euch dann mal mit, ob das funktioniert!

Wird durch den Call eigentlich das ganze Unterprogramm durchlaufen oder was genau passiert dann? Wenn ich im Hauptprogramm die Variablen hinter dem Using alle lasse, wie muss ich diese dann noch im Programm in der WOrking-Storage aufrufen und wie erkenne ich, welche PIC-Klausel ich nutzen muss? Anbei die beiden Programme ND999 (mein Programm) NDYIKT ("Unterprogramm, das aufgerufen werden soll) Kannst du mir anhand dieser Dateien sagen, was ich machen muss? nd999.txt ndyikt.txt

Und bei meinem Beispiel? Oben drüber (über der Proc-Div.) ist die Copystrecke NDYIKTCS. Bei den "Using"-Einträgen will ich eigentlich auch nur auf diese eingehen, denn die anderen brauche ich nicht zwingend für mein Programm. In der NDYIKTCS stehen die Variablen, die ich benötige.

Kann man denn auch nur eine der variablen übergeben? Oder muss man immer alle angeben, die im Unterprogramm unter Using stehen? COPY NDYIKTCS REPLACING =="Y-"== BY ==NDYIKT==. PROCEDURE DIVISION USING IO-PCB ERR-PCB *------------------------- * Eingabe-Schnittstelle *------------------------- CONT01E *------------------------- * Ein-Ausgabe-Schnittstell *------------------------- NDYIKTCS. Woher weiß ich, was ich im Hauptprogramm für eine PIC-Klausel angeben muss? NDYIKTCS ist eine Copystrecke, die im Unterprogramm aufgerufen wird.

Ja kannst du gerne mal mitteilen! Bin für alle Möglichkeiten offen.

PROCEDURE DIVISION. ------------------------------------------------------- A0000000-STEUER SECTION. - EINMALIGE PROGRAMM-INITIALISIERUNG - ANWENDUNGSSPEZIFISCHE VERARBEITUNG - PROGRAMM BEENDEN MIT GOBACK ------------------------------------------------------- A0000000-SECTION-START. PERFORM A0010000-INIT-PROGRAMM CALL 'NDYIKT' USING IO-PCB ERR-PCB CONT01E NDYIKTCS PERFORM V0000000-VERARBEITUNG PERFORM A0090000-GOBACK CONTINUE. A0000000-SECTION-ENDE. EXIT. habe jetzt den Call eingebaut in das Hauptprogramm. Was muss denn jetzt noch gemacht werden? Im Unterprogramm sollten die Variablen jetzt eigentlich korrekt sein.

Im Folgenden der Code aus dem Unterprogramm. Was muss ich dort ergänzen, damit das Hauptprogramm die Daten lesen kann? PROCEDURE DIVISION USING IO-PCB ERR-PCB *--------------------------------------- * Eingabe-Schnittstelle *--------------------------------------- CONT01E *--------------------------------------- * Ein-Ausgabe-Schnittstelle *--------------------------------------- NDYIKTCS.

Aber wie sieht es aus: Das ND999 wird auch von anderen Programmen genutzt. Dadurch gibt es dort sehr viele Variablen. Ich benötige jetzt aber nur ein paar davon. Wie kann ich das dem Programm "klar machen", welche es nutzen muss? Das ND999 ist kein direktes Unterprogramm von meinem. Es ist bereits heute in Nutzung. Mein Programm (Statistik) soll nun auch auf das Programm zugreifen, da dort die entscheidenden Teile stehen, um die Statistik zu erstellen.

wie wäre es wenn jeder der will, mal einen tipp zu den nächsten Spielen abgibt? meine Tipps schreibe ich gleich mal hinter die Ergebnisse: 18.10.2005 Kölner Haie - DEG Metro Stars 3:2 Hamburg Freezers - Eisbären Berlin 1:4 20.10.2005 Nürnberg Ice Tigers - Hannover Scorpions 2:5 21.10.2005 Krefeld Pinguine - DEG Metro Stars 2:3 n.P. ERC Ingolstadt - EV Duisburg Die Füchse 4:0 Frankfurt Lions - Eisbären Berlin 3:1 Adler Mannheim - Augsburger Panther 4:1 23.10.2005 Hannover Scorpions - Hamburg Freezers 6:2 DEG Metro Stars - Adler Mannheim 3:4 Iserlohn Roosters - Frankfurt Lions 2:5 Kölner Haie - Krefeld Pinguine 3:1 Eisbären Berlin - Nürnberg Ice Tigers 3:0 EV Duisburg Die Füchse - Kassel Huskies 1:3 Augsburger Panther - ERC Ingolstadt 4:5 n.P.

Das heißt, im Hauptprogramm (ND998) einen Call auf das andere Programm (ND999) machen? Müssen die Variablennamen in beiden Programmen gleich lauten? Oder können sie sich vom namen her unterscheiden?

Kann man auch nur den Call angeben ohne eine Reference? Ich will in meinem Programm nichts an den Variablen ändern. Ich muss sie nur auslesen, um zu sehen, was für ein Wert in der Variable steht, da es davon abhängt, in welche Kategorie diese in der Statistik eingetragen werden muss Beispiel: TYPE = H bedeutet Hotelanfrage dann soll diese in der Statistik in den Bereich Hotelanfragen addiert werden.

Hast ja teilweise Recht! Aber eigentlich wollte ich hierüber halt jemanden finden, der auch "Spotter" ist!

Wir arbeiten hier bei uns im Unternehmen mit Copystrecken. Jedoch benötige ich keine Copystrecke sondern möchte direkt von dem Programm das ich schreibe auf ein anderes Programm zugreifen, da ich von dort Daten benötige, um diese für eine Statistik zu prüfen. Kannst du mal ein Beispiel mit dazu schreiben, da ich mich nicht so gut auskenne in COBOL.

Irgendwie sind wir mittlerweile vom ursprünglichen Thema abgekommen.

Hallo zusammen, kann mir hier jemand sagen, wie man in COBOL auf dem Großrechner (HOST) zwei Programme (Beisp: ND998 und ND999) miteinander verbinden kann? Ich möchte von ND998 auf ND999 zugreifen können. Und was genau passiert dann? Kann ich dann auf alle Variablen von ND999 zugreifen oder nur auf bestimmte? Gruß Martin

Nein habe ich nicht!

Kann ich verstehen! Würd ich an der Arbeit auch nicht machen! Also so sehr interessierst du dich nich für die Luftfahrt? Nur ein bisschen? Ich habe mittlerweile eine Fotosammlung von über 1000 Fotos und eine Modellsammlung von Herpa (Maßstab 1:500) von ca. 350 Flugzeugen.

Das ist natürlich schlecht. Machst du denn auch selbst Fotos? Und wenn ja, an welchen Airports hauptsächlich?

Dann müssen sie sich aber dieses Jahr auch anstrengen. Denn ab nächster Saison soll es keinen Aufsteiger mehr aus der 2. Liga in die DEL geben. Bedeutet: Wenn müssen sie es dieses Jahr schaffen, sonst können sie den Traum DEL erstmal vergessen. Wenn Sie es schaffen, hat es aber den Vorteil, dass sie vorerst in der DEL bleiben können und nicht Angst haben müssen, abzusteigen.

Um noch mal ein bisschen näher auf das Thema einzugehen! Ich suche jemanden mit dem man Neuigkeiten austauschen kann oder auch selbst "geschossene" Fotos von zivilen Flugzeugen. Gerne aber auch zu jedem anderen Thema, dass die zivile Luftfahrt betrifft.

Molling hat doch auch mal in Kassel gespielt wenn ich mich nicht irre oder? Die Trikots sehen wirklich gut aus!

Ja sicher, aber es ist doch trotzdem interessant, ein paar Details von jemandem zu bekommen, der da schon dabei ist!