Mainframe JCL Execution

Re(26): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 19:16:53 GMT

Ich sags offen vorweg - ich habe keinerlei Zugriff auf das angesprochene Micro
Focus Produkt, sondern "nur" auf einen IBM Host selbst ohne irgendeine Pimperl
Windowszwischenlösung, dementsprechend bewegen sich meine Kenntnisse auch nur
auf diesem Gebiet (dafür halt etwas intensiver)

seih Froh

Da es sich aber um einen RC 8 handelt, ist es ein Fehler im Source welchen der
Compiler nicht eindeutig zuordnen kann (nicht abgeschlossenes If etc.). Würde
aber mal die Procedure gleich dem Programmnamen setzen

hab es einem Freund geschickt und der kann es aber kompilieren

Re(25): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 19:08:41 GMT

Ähem du sollst ein Programm für die Schule machen und kannst es nichtmal umwandeln? (Was bekommt ihr beigebracht?)

Ich sags offen vorweg - ich habe keinerlei Zugriff auf das angesprochene Micro Focus Produkt, sondern "nur" auf einen IBM Host selbst ohne irgendeine Pimperl Windowszwischenlösung, dementsprechend bewegen sich meine Kenntnisse auch nur auf diesem Gebiet (dafür halt etwas intensiver)

Da es sich aber um einen RC 8 handelt, ist es ein Fehler im Source welchen der Compiler nicht eindeutig zuordnen kann (nicht abgeschlossenes If etc.). Würde aber mal die Procedure gleich dem Programmnamen setzen

pong

Re(24): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 18:58:52 GMT

ich bin Project > Built Settings for p2berg.pli > Message Level > Informational

stimmt das?
was soll ich machen?

Re(23): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 18:50:43 GMT

IDEID1007S Non-zero return code from compiler with messages suppressed

Aber der Error wird weiterhin nicht aufgelistet

pong

Re(22): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 18:41:50 GMT

hab das Message Level jetzt auf Informational gestellt, ...

Build starting...
Updating source times...
Updating output times...
Updating status...
Compiling p2berg.PLI...
IDEID1007S Non-zero return code from compiler with messages suppressed
Compilation complete with 1 errors, 0 warnings, 0 notices and an exit code of 8

Build finished with 1 errors, 0 warnings, and 0 notices.
Completed in 1 seconds

Re(22): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 18:41:50 GMT

hab das Message Level auf Informational gestellt, ...

Build starting...
Updating source times...
Updating output times...
Updating status...
Compiling p2berg.PLI...
IDEID1007S Non-zero return code from compiler with messages suppressed
Compilation complete with 1 errors, 0 warnings, 0 notices and an exit code of 8

Build finished with 1 errors, 0 warnings, and 0 notices.
Completed in 1 seconds

Re(21): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 18:20:16 GMT

with messages suppressed

Dann stell den Compiler so ein, dass er dir alle Meldungen anzeigt

pong

Re(20): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 18:08:34 GMT

ich komm ja gar nicht zum Ausführen, weil beim Builten der Fehler kommt

Re(19): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 18:06:01 GMT

Solange du nicht dein Programm ausführst, wirst auch weiterhin diesen Fehler bekommen

pong

Re(18): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 18:02:05 GMT

wenn ich auf run klicke kommt trotzdem der Fehler

Re(17): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 17:48:42 GMT

du sollst dein Programm aufrufen

pong

Re(16): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 17:43:51 GMT

meinst du, dass ich das JCL File verändern soll?

//KINO  JOB 'P2BERG',CLASS=A,MSGCLASS=X
//AUSFUEHR EXEC PGM=BERG
//FILEOUT DD SYSOUT=*
//FILEIN DD *
Deja Vu             Science-Fiction     12712Tony           Scott               2006
Children of Men     Science-Fiction     10816Alfonso        Cuaron              2006
Casino Royale       Action              14512Martin         Campbell            2006
Cars                Komoedie            11600John           Lasseter            2006
Borat               Komoedie            08512Larry          Charles             2006
Black Christmas     Thriller            08516Glen           Morgan              2006
Babel               Drama               14414Alejandro      Gonzalez Inarritu   2006
Apocalypto          Action              13814Mel            Gibson              2006
Ab durch die Hecke  Komoedie            08300Karey          Kirkpatrick         2006
7 Zwerke 2          Komoedie            09506Sven           Unterwaldt          2006

Re(16): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 17:43:51 GMT

meinst du, dass ich das JCL File verändern soll?

//KINO  JOB '<b>P2BERG</b>',CLASS=A,MSGCLASS=X
//AUSFUEHR EXEC PGM=BERG
//FILEOUT DD SYSOUT=*
//FILEIN DD *
Deja Vu             Science-Fiction     12712Tony           Scott               2006
Children of Men     Science-Fiction     10816Alfonso        Cuaron              2006
Casino Royale       Action              14512Martin         Campbell            2006
Cars                Komoedie            11600John           Lasseter            2006
Borat               Komoedie            08512Larry          Charles             2006
Black Christmas     Thriller            08516Glen           Morgan              2006
Babel               Drama               14414Alejandro      Gonzalez Inarritu   2006
Apocalypto          Action              13814Mel            Gibson              2006
Ab durch die Hecke  Komoedie            08300Karey          Kirkpatrick         2006
7 Zwerke 2          Komoedie            09506Sven           Unterwaldt          2006

Re(15): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 17:40:22 GMT

Das Modul heißt p2berg....

pong

Re(14): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 16:48:40 GMT

so habs verändert

Das neue JCL File:

//KINO  JOB 'KINO-PR2',CLASS=A,MSGCLASS=X
//AUSFUEHR EXEC PGM=BERG
//FILEOUT DD SYSOUT=*
//FILEIN DD *
Deja Vu             Science-Fiction     12712Tony           Scott               2006
Children of Men     Science-Fiction     10816Alfonso        Cuaron              2006
Casino Royale       Action              14512Martin         Campbell            2006
Cars                Komoedie            11600John           Lasseter            2006
Borat               Komoedie            08512Larry          Charles             2006
Black Christmas     Thriller            08516Glen           Morgan              2006
Babel               Drama               14414Alejandro      Gonzalez Inarritu   2006
Apocalypto          Action              13814Mel            Gibson              2006
Ab durch die Hecke  Komoedie            08300Karey          Kirkpatrick         2006
7 Zwerke 2          Komoedie            09506Sven           Unterwaldt          2006

Der Fehler kommt aber trotzdem:

Build starting...
Updating source times...
Updating output times...
Updating status...
Compiling p2berg.PLI...
IDEID1007S Non-zero return code from compiler with messages suppressed
Compilation complete with 1 errors, 0 warnings, 0 notices and an exit code of 8

Re(14): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 16:48:40 GMT

so habs verändert

Das neue JCL File:

//KINO  JOB 'KINO-PR2',CLASS=A,MSGCLASS=X
//AUSFUEHR EXEC PGM=BERG
//FILEOUT DD SYSOUT=*
//FILEIN DD *
Deja Vu             Science-Fiction     12712Tony           Scott               2006
Children of Men     Science-Fiction     10816Alfonso        Cuaron              2006
Casino Royale       Action              14512Martin         Campbell            2006
Cars                Komoedie            11600John           Lasseter            2006
Borat               Komoedie            08512Larry          Charles             2006
Black Christmas     Thriller            08516Glen           Morgan              2006
Babel               Drama               14414Alejandro      Gonzalez Inarritu   2006
Apocalypto          Action              13814Mel            Gibson              2006
Ab durch die Hecke  Komoedie            08300Karey          Kirkpatrick         2006
7 Zwerke 2          Komoedie            09506Sven           Unterwaldt          2006

Der Fehler kommt aber trotzdem:

Build starting...
Updating source times...
Updating output times...
Updating status...
Compiling p2berg.PLI...
IDEID1007S Non-zero return code from compiler with messages suppressed
Compilation complete with 1 errors, 0 warnings, 0 notices and an exit code of 8

hilfeeeeeeee, bin echt verzweifelt, weil ichs morgen brauch

Re(13): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 16:31:05 GMT

Compiling p2eric.PLI...

Na da haben wirs doch auch schon... dein Modul schimpft sich p2eric nicht Berg

pong

Re(12): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 16:28:51 GMT

Und das Umwandeln läuft fehlerlos ab?

Build starting...
Updating source times...
Updating output times...
Updating status...
Compiling p2eric.PLI...
IDEID1007S Non-zero return code from compiler with messages suppressed
Compilation complete with 1 errors, 0 warnings, 0 notices and an exit code of 8

Build finished with 1 errors, 0 warnings, and 0 notices.
Completed in 0 seconds

Weiters - wie schimpft sich dein Modul physisch?

Ich weiß nicht ganz was du meinst; PL/I ?

Re(12): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 16:27:21 GMT

und wie beseitige ich diesen Error? durch http://forum.geizhals.at/t485163,4017627.html#4017627 ?

Re(11): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 16:26:32 GMT

Und das Umwandeln läuft fehlerlos ab?

Weiters - wie schimpft sich dein Modul physisch?

pong

Re(11): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 16:23:54 GMT

Das ist der Error des jobs, aber nicht der des Programms bzw. dessen Umwandlung

pong

Re(10): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 16:22:53 GMT

Re(10): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 16:22:30 GMT

ich klick zuerst Built und dann Run

Re(9): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 16:21:55 GMT

es kommt immer der selbe Error

und zwar welcher?

pong

Re(9): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 16:19:35 GMT

So... hast du dein Programm gar nicht umgewandelt (compile & link)?

pong

Re(8): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 16:17:39 GMT

ein selbst geschriebenes

Das PL/1 File:

KINO: Procedure Options (Main);

  dcl 1 Kino                                                  ,
        2 Titel         char(20)                              ,
        2 Genre         char(20)                              ,
        2 Laenge        pic '999'                             ,
        2 Freigabe      pic '99'                              ,
        2 Regisseu                                            ,
          3 vorname     char(15)                              ,
          3 nachname    char(20)                              ,
        2 KinoStar      pic '9999'                            ;
  dcl 1 KinoOut                                               ,
        2 Titel         char(20)                              ,
        2 Laenge        pic '999'                             ,
        2 Freigabe      pic '99'                              ,
        2 Regisseu                                            ,
          3 vorname     char(15)                              ,
          3 nachname    char(20)                              ,
        2 KinoStar      pic '9999'                            ;
  dcl 1 Head                                                  ,
        2 Titel         char(20)    init('Titel')             ,
        2 Laenge        char(20)    init('Laenge')            ,
        2 Freigabe      char(20)    init('Freigegeben ab')    ,
        2 Regisseu      char(35)    init('Regisseur')         ,
        2 KinoStar      char(10)    init('Film gestartet am') ;
  dcl FileIn            file record input env(f recsize(80))  ;
  dcl FileOut           file record output env(f recsize(80)) ;
  dcl eof               bit(1) init('0'B)                     ;
  dcl 1 countTot                                              ,
        2 absta         char(5)                               ,
        2 num           dec(3,0)                              ,
        2 abstb         char(93)                              ;
  dcl Grenze            char(105)                             ;
  dcl 1 GenreAnf                                              ,
        2 absta         char(5)                               ,
        2 typ           char(6)     init('Ende')              ,
        2 Titel         char(20)                              ,
        2 abstb         char(70)                              ;
  dcl 1 GenreEnd                                              ,
        2 absta         char(5)                               ,
        2 typ           char(6)     init('Anfang')            ,
        2 Titel         char(20)                              ,
        2 numa          char(2)     init(' (')                ,
        2 numb          dec(3,0)                              ,
        2 numc          char(1)     init(')')                 ,
        2 abstb         char(64)                              ;
  dcl Meins             char(105)                             ;

  open file(FileIn);
  open file(FileOut);

  Meins = 'Kino-Programm con Erich Berger 3BHDV';
  write file(FileOut) from (Meins);
  write file(FileOut) from (Head);

  on endfile(FileIn) eof=1;
  countTot.num = 0;

  do while(^eof);
    read file(FileIn) into(Kino);

    GenreEnd.numb = 0;
    GenreEnd.Titel = Kino.Genre;
    GenreAnf.Titel = Kino.Genre;
    write file(FileOut) from(GenreAnf);

    do while((GenreAnf.Titel = Kino.Genre) & ^eof);
      KinoOut.Titel = Kino.Titel;
      KinoOut.Laenge = Kino.Laenge;
      KinoOut.Freigabe = Kino.Freigabe;
      KinoOut.Regisseu.vorname = Kino.Regisseu.vorname;
      KinoOut.Regisseu.nachname = Kino.Regisseu.nachname;
      KinoOut.KinoStar = Kino.KinoStar;

      write file(FileOut) from (KinoOut);
      read file(FileIn) into (Kino);
      GenreEnd.numb = GenreEnd.numb + 1;
    end;

    countTot.num = countTot.num + GenreEnd.numb;

    write file(FileOut) from(GenreEnd);
    write file(FileOut) from(Grenze);
  end;

  write file(FileOut) from(Grenze);
  write file(FileOut) from(countTot);

  close file(FileIn);
  close file(FileOut);
end KINO;

Das JCL File:

//KINO  JOB 'KINO-PR2',CLASS=A,MSGCLASS=X
//AUSFUEHR EXEC PGM=ERIC
//FILEOUT DD SYSOUT=*
//FILEIN DD *
Deja Vu             Science-Fiction     12712Tony           Scott               2006
Children of Men     Science-Fiction     10816Alfonso        Cuaron              2006
Casino Royale       Action              14512Martin         Campbell            2006
Cars                Komoedie            11600John           Lasseter            2006
Borat               Komoedie            08512Larry          Charles             2006
Black Christmas     Thriller            08516Glen           Morgan              2006
Babel               Drama               14414Alejandro      Gonzalez Inarritu   2006
Apocalypto          Action              13814Mel            Gibson              2006
Ab durch die Hecke  Komoedie            08300Karey          Kirkpatrick         2006
7 Zwerke 2          Komoedie            09506Sven           Unterwaldt          2006

Re(7): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 16:12:17 GMT

Welches Programm versuchst denn gerade durchzuführen?

pong

Re(6): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 16:11:34 GMT

sry, aber welche Umwandlung?

Re(5): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 16:09:13 GMT

wie kann ich das Lademodul finden?

Ist in der Umwandlung das passende PDS nicht zu sehen?

pong

Re(3): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 15:45:36 GMT

indem du das Lademodul dorthin kopierst wo es hingehört bzw. wenn nicht in der Linklist aufgeführt, das entsprechende PDS in der Steplib vorverkettest

pong

Re(3): Mainframe JCL Execution

pong — Sun, 18 Mar 2007 15:45:36 GMT

indem du das Lademodul dorthin kopierst wo es hingehört bzw. wenn nicht in der Linklist aufgeführt, das entsprechende PDS in der Steplib vorverkettest

btw. gibts Mainframe Express mittlerweile kostenlos für den Privatgebrauch?

pong

Re(2): Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 15:44:04 GMT

thx, wie kann ich diesen Fehler beheben?

Re: Mainframe JCL Execution

pong — Sun, 18 Mar 2007 15:43:29 GMT

das Lademodul liegt nicht auf der entsprechenden Lib

pong

Mainframe JCL Execution

_E_r_I_c_H_ — Sun, 18 Mar 2007 09:55:06 GMT

warum kommt der Fehler?

hier mein JCL File:


//T3BERG  JOB 'T3BERG',CLASS=A,MSGCLASS=X
//AUSFUEHR EXEC PGM=BERG
//FILEOUT DD SYSOUT=*
//FILEIN DD *
2222222222DER MÄRCHENPRINZ    GRIMM             TRÄUMEVERLAG   M221888099900066
1212121212PROGRAMMIEREN-DUMMYSWITZMANN          OLDENBERG      F092001088800055

Info: verwende Mainframe Express 3.0.75 und habe es schon zwei mal neuinstalliert, hat aber leider nichts genutzt

thx für eure Hilfe