[NEWSboard IBMi Forum]

Hybrid View

  1. #1
    Registriert seit
    Apr 2012
    Beiträge
    360
    Hallo Dieter,

    ich hätte wie beschrieben mir eine Quelldatei QRPGLEH erstellt.
    Die Sourcen reinkopiert.
    Code:
     Teildatei  Art         Text                                      
    JOBLOG_P    RPGLE       JOBLOG SERVICE PROGRAMM PROTOTYPES        
    JOBLOG_S    RPGLE       JOBLOG SERVICE PROGRAMM SERVICE PROGRAMM
    Anschließend hätte ich deine Umwandlungsanweisung abgesetzt.
    Code:
    CRTRPGMOD MODULE(JOBLOG_S) 
    SRCFILE(TSTSRC/QRPGLEH) 
    DBGVIEW(*SOURCE)
    Aber ich bekomme das nicht kompeliert.

    Darf ich in den H Bestimmungen kein NoMain angeben.
    Wieso wandelt er das eine Modul so oft?

    lg

    TARKI
    Angehängte Dateien Angehängte Dateien

  2. #2
    Registriert seit
    Mar 2002
    Beiträge
    5.397
    Zitat Zitat von tarkusch Beitrag anzeigen
    Die Sourcen reinkopiert.
    ... kopieren ist was anderes...

    Dieter:
    Code:
    D*B    CRTRPGMOD JOBLOG_S
    D*B+     DBGVIEW(*SOURCE)
    D*B    CRTSRVPGM(JOBLOG_S)
    D*B+     ACTGRP(*CALLER)
    D*B+     EXPORT(*ALL)
    Tarkusch:
    Code:
    D*B    CRTRPGMOD JOBLOG_S
    D*B+     DBGVIEW(*SOURCE)
    D*B+  CRTSRVPGM(JOBLOG_S)
    D*B+     ACTGRP(*CALLER)
    D*B+     EXPORT(*ALL)
    Wenn man das jetzt an den Preprozessor gibt (entweder call crtcpp parm(...) oder mit command create, dann werden die commands aus der Quellle geparsed (D*B kennzeichnet den Anfang einer beliebigen CL Anweisung, folgende D*B+ werden mit angehängt; erneutes D*B ist der nächste command.

    Außerdem hast Du in der QRPGLEH offenkundig die Quelle des Programms nochmal stehen, da muss der Prototyp hin - das löst bei Dir einen Zyklus von Copy aus (auch aus diesem Grund macht man in Copy Strecken das /if not defined cnstruct rein, das mehrfach kopieren verhindert.

    D*B
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •