public class Rechnungslauf_class
{

 public static void addRechnung(Rechnungslauf__c[] rl)
 {
  for (Rechnungslauf__c rlf:rl)
  {
   Contract[] con;
   list<Rechnungspositionen__c> listrp = new list<Rechnungspositionen__c>();
   list<ProductLineItem_recurring__c> listpliupdate = new list<ProductLineItem_recurring__c>();
     
   // Select aller aktiven Verträge
   //******************************
   
   con = [select 
        id,
        AccountID,
        Rechnungsempfaenger__c     
     from contract 
     where 
     StartDate <= LAST_MONTH and      
     (Vertragsende_nfon__c >= LAST_MONTH OR Vertragsende_nfon__c = NULL)
     and Rechnung_manuell__c = false
     
     //zum Ausschluss von 0 Rechnungen
     //*******************************
     and Summe_netto__c !=0
     
     //Testrechnungslauf erstellen mit bestimmter ID (Hier Testaccount)
     //****************************************************************
     //and id ='80020000001Cdmu'
                
     //Einzelne Pakete erstellen
     //*************************
     //and ContractNumber >= '00000242'
     //and ContractNumber <= '00000243' 
     and ContractNumber >= :rlf.Vertragsnummer_von__c
     and ContractNumber <= :rlf.Vertragsnummer_bis__c     
    ];
     
      
   // For Loop zur Erstellung der Rechungen, Bezug auf die aktiven Verträge
   //**********************************************************************      
   for (contract connew:con)
   {
    // Definition neuer Variable zur Rechnungserstellung
    //**************************************************
    Rechnung__c r = new Rechnung__c();
      
    // Insert Rechnung - Relation to contractdata by variable 
    //*******************************************************        
    r.Firma__c = connew.AccountID;
    r.Rechnungsemail__c = connew.Rechnungsempfaenger__c;
    r.Rechnungslauf_ID__c = rlf.id;
    r.Vertrag_ID__c = connew.id;
    insert r;
     
    // Map für Lineitems mit Vertrags-ID und Status zum berechnen
    //***********************************************************
    map<id,ProductLineItem_recurring__c> plimap = new map<id,ProductLineItem_recurring__c>
    (
     [select Verkaufspreis__c,
       Menge__c,Discount__c,
       Listenpreis__c,
       Beschreibung__c,
       berechnet__c,
       MwSt__c,
         Vertrag__c,
       id     
      from ProductLineItem_recurring__c
      where next_RL_berechnet__c ='JA' 
      and Vertrag__c = :connew.id
     ]
    );
    
    //For-Loop zur Selektion der einzufügenden Items
    //**********************************************  
    for (ProductLineItem_recurring__c plis:[select Verkaufspreis__c,
        Menge__c,Discount__c,
        Listenpreis__c,
        Beschreibung__c,
        berechnet__c,
        MwSt__c,
          Vertrag__c,
        id     
      from ProductLineItem_recurring__c
      where id in :plimap.keyset()
      ]
     ) 
    {
     ProductLineItem_recurring__c plinew = plimap.get(plis.id);
     
     //Zurückschreiben des Datums der Rechnungsstellung
     //************************************************
     //plinew.berechnet__c = date.today();
                    //update plinew;
     
     //Abfrage ob die Liste =50 ist
     //****************************
     if(listrp.size() == 50)
     {
      insert listrp;
      listrp.clear();
     }
     
     //Hinzufügen zur Liste
     //********************
     listrp.add
     (
      new Rechnungspositionen__c
      (   
       Rechnungsnummer__c = r.id,
       Leistung__c = plinew.Beschreibung__c,
       Einzelpreis__c = plinew.Verkaufspreis__c,
       Discount__c = plinew.Discount__c,
       Listenpreis__c = plinew.Listenpreis__c,      
       Anzahl__c = plinew.Menge__c,
       MwSt__c = plinew.MwSt__c,
       Vertrag_ID__c = r.Vertrag_ID__c,
       recurring_Product_Line_Item_ID__c = plinew.id,
       Rechnungslauf_ID__c = rlf.id
       
      )
     );     
     
    }
    
    //For Loop zum Update des Berechnetdatums
    //***************************************
    for (ProductLineItem_recurring__c pliupdate:[select id,berechnet__c from ProductLineItem_recurring__c where id in :plimap.keyset()])
    {
     ProductLineItem_recurring__c pliupdatenew = plimap.get(pliupdate.id);
     
     //Abfrage ob die Liste =50 ist
     //****************************
     if(listrp.size() == 50)
     {
      update listpliupdate;
      listpliupdate.clear();
     }
     pliupdatenew.berechnet__c = date.today();
     listpliupdate.add
     (
     pliupdatenew
     );
    }
            
   }
   
   //Wenn die Liste noch Daten <50 enthält, werden diese hier eingefügt
   //******************************************************************
   if (listrp.size() >0) insert listrp;
   if(listpliupdate.size() >0) update listpliupdate;
 
  }
 } 
}