Bestimmungs-Exit editieren

Beginn der AnweisungslisteUm den von einer Ressource verwendeten Bestimmungs-Exit zu editieren:

  • Geben Sie im Bildschirm Ressourcen das Zeilenkommando E im Feld vor der betreffenden Ressource ein.

    Drücken Sie Enter.

    Der Editor-Bildschirm wird angezeigt. Er enthält das Subprogramm, das den Exit darstellt, zum Beispiel:

     EDITNAT:EOR-T531(AA-X0RES)->Subprogram->Struct->Esc:'&'------- Columns 001 072
     ====>                                                       Blaettern===> CSR 
     ***** ****************************** top of data *****************************
     00010 DEFINE DATA PARAMETER USING NOPXPL-A                                    
     00020 END-DEFINE                                                              
     00030 * ----------------------------------------------------------------      
     00040 IF P-RMD-PARAMETER IS (N10)                                             
     00050   P-RMD-NEW-QTY-INITIAL := VAL(P-RMD-PARAMETER)                         
     00060 END-IF                                                                  
     00070 END                                                                     
     ***** **************************** bottom of data ****************************
                                                                                   
                                                                                   
                                                                                   
                                                                                   
                                                                                   
                                                                                   
                                                                                   
                                                                                   
                                                                                   
                                                                                   
    Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
          Help        End   Quit  Rfind Rchan Up    Down  Symbo Left  Right Curso  

    Sie können das Subprogramm ändern.