SchreiberLars

let 
fn = (MyDate as date, StartMonat as text) =>
let
    Startmonatsnummer = 
       List.PositionOf(
             {"januar", "februar","märz","april","mai","juni", "juli", "august", "september", "oktober", "november", "dezember"}, 
             Text.Lower(StartMonat)
       ) + 1,
    Offset = Startmonatsnummer -1, 
    AtuellerKalendermonat = Date.Month(MyDate),

SchreiberLars

let 
fn = (MyDate as date, StartMonat as text) =>
let
    Startmonatsnummer = 
       List.PositionOf(
             {"januar", "februar","märz","april","mai","juni", "juli", "august", "september", "oktober", "november", "dezember"}, 
             Text.Lower(StartMonat)
       ) + 1,
    Offset = Startmonatsnummer -1, 
    AtuellerKalendermonat = Date.Month(MyDate),

SchreiberLars

let 
fn = (MyDate as date, StartMonat as text) =>
let
    Startmonatsnummer = 
       List.PositionOf(
             {"januar", "februar","märz","april","mai","juni", "juli", "august", "september", "oktober", "november", "dezember"}, 
             Text.Lower(StartMonat)
       ) + 1,
    Offset = Startmonatsnummer -1, 
    AtuellerKalendermonat = Date.Month(MyDate),

SchreiberLars

let 
fn = (MyDate as date, StartMonat as text) =>
let
    Startmonatsnummer = 
       List.PositionOf(
             {"januar", "februar","märz","april","mai","juni", "juli", "august", "september", "oktober", "november", "dezember"}, 
             Text.Lower(StartMonat)
       ) + 1,
    Offset = Startmonatsnummer -1, 
    AtuellerKalendermonat = Date.Month(MyDate),

SchreiberLars

let
 /*
   Beginn der Funktionsdefinition, mit Funktionsnamen, Funktionsparametern und Typ des Funktionsrückgabewertes
 */
  fnInsertDiffColumn = (ColumnName as text, MyTable as table) as table =>
    let
        /*
          Parameter für das Testen der Funktion, während der Entwicklungsphase
        */
        /*        

SchreiberLars

(DateTimeUTC as datetime) as datetime =>
let
    /*
        ================================================================================
        Wesentliche Bestandteile der Funktion basieren auf der Arbeit von 'Frank Tonsen'
        ================================================================================
    */ 
    Year = Date.Year(DateTimeUTC),

    //Ermittlung der Grenze der Winterzeit --> letzter Sonntags im März, 00:59:59 Uhr UTC

SchreiberLars

(IDCustErr as number)=> 
let
   //IDCustErr = 5, /* for debugging purposes */

  //  ============ START: Define your list of custom error records here ====================
  ListCustomErrors = {
        //Custom error #1: The only permissible tax rates are as follows 7% and 19% 
        [
            CustErrID = 1, 
            reason ="Illegal tax rate", 

SchreiberLars

let func = (Kalenderjahr as number) as table =>
   let
     //Liste aller Bundeländer für den Aufbau der URL bei arbeitstage.org
     List_Bundeslaender = {
         "baden-wuerttemberg", 
         "bayern", "berlin", 
         "brandenburg", 
         "bremen", 
         "hamburg", 
         "hessen", 

SchreiberLars

let func = (PfadZumOrdner as text, Spaltentrennzeichen as text, EncodingCode as number ) as table =>
   let
     //Hier den Funktions-Corpus eintragen

	 //=========================================Beispielparameter fürs Debugging====================================
        /*PfadZumOrdner = "H:\SSBI-Blog\Website\Business Topics\_csvs mit verschiedenen Headern einlesen\Datenquelle",
          Spaltentrennzeichen = ";",
          EncodingCode = 1252 
	*/
       //=========================================Beispielparameter fürs Debugging==================================== */ 

SchreiberLars

let fn = (Kalenderjahr as list, Bundesland as text) as list =>
let
  
    //Bundesland = "berlin",
    //Kalenderjahr = {2018, 2019},
    //Kalenderjahr = 2019,
  
    #"In Tabelle konvertiert" = Table.FromList(if Kalenderjahr is list then Kalenderjahr else {Kalenderjahr}, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Geänderter Typ1" = Table.TransformColumnTypes(#"In Tabelle konvertiert",{{"Column1", Int64.Type}}),
    #"Umbenannte Spalten" = Table.RenameColumns(#"Geänderter Typ1",{{"Column1", "Jahre"}}),