Hallo zusammen,

dieses mal habe ich kein Problem sondern würde gerne was in Erfahrung bringen.
Wir haben ab und an das Problem, das ein Programm mit einem Dezimaldatenfehler abbricht.
Ein Dump hilft nur so weit, das wir die Felder prüfen können.
Es wird hierbei eine Zeilennummer ausgegeben, die der Sequentiellen Zeile entspricht (So habe ich das verstanden!).

Nun habe ich festgestellt, das es div. Optionen gibt, die man im Header von ILE-Sourcen angeben kann um u.a. die richtige Zeile im Dump zu erhalten.
Die Option: *SRCSTMT ist dabei die interessante.

Ich habe bei uns vorgeschlagen, den Parameter automatisch beim generieren von ILE-Sourcen aufzunehmen.
Die Bedenken meiner Kollegen, warum hat die IBM diesen Parameter nicht als Standard, was bewirkt diese Parameter noch alles, das man nicht direkt sieht?

Wisst ihr mehr über diesen Parameter bzw. könnt mir Quellen nennen, wo ich mich über diese Option weiter schlau machen kann =)


Anbei noch ein kleines Programm, wo ich einen Dump provoziere um die richtige Zeile zu erhalten.

Code:
0001.00 H DEBUG DECEDIT('0,') DATEDIT(*DMY.) OPTION(*SRCSTMT):confused:                          
0002.00 FFMX04PF   IF   E           K DISK                                
0003.00 C**                                                               
0004.00 C                   EXSR      SUB10                               
0005.00 C**                                                               
0006.00 C                   MOVE      '1'           *INLR                 
0007.00 C*----------------------------------------------------------------
0008.00 C**    S U B 1 0   AUSLESEN DRUCKDATEI BEI SAMMELAUFRUF           
0009.00 C*----------------------------------------------------------------
0010.00 C     SUB10         BEGSR                                         
0011.00 C**                                                               
0012.00 C                   Z-ADD     0             FXDRNR                
0013.00 C                   Z-ADD     0             X2                4 0 
0014.00 C     FXDRNR        SETLL     RFMX04PF                            
0015.00 C     *IN35         DOUEQ     '1'                                 
0016.00 C                   READ      RFMS04PF                            
0017.00 C                   ADD       1             X2                    
0018.00 C     *IN35         IFEQ      '0'                                 
0019.00 C     X2            IFGT      999                                 
0020.00 C                   MOVEL     'ÄÖPKNK9*'    X2                  
0021.00 C                   END                                         
0022.00 C                   END                                         
0023.00 C                   END                                         
0024.00 C**                                                             
0025.00 C                   ENDSR
Danke für eure Bemühungen =)