diff --git a/Droplister/Droplister_v2.py b/Droplister/Droplister_v2.py index cf4c3ff..4c52132 100644 --- a/Droplister/Droplister_v2.py +++ b/Droplister/Droplister_v2.py @@ -7,9 +7,9 @@ # format_version: '1.5' # jupytext_version: 1.15.2 # kernelspec: -# display_name: spesh +# display_name: stat-helse-test # language: python -# name: spesh +# name: stat-helse-test # --- # + [markdown] toc-hr-collapsed=true @@ -725,6 +725,7 @@ def lag_navn_orgnr_kolonner(fvdf, ant_kolonner, med_foretak = True): columns={"NAVN_KLASS": "FORETAKETS_NAVN"} ) + # + finne_virksomheter_df2 = pd.merge( SFUklass, skj46O, how="left", on=["ORGNR_FORETAK", "NAVN_KLASS", "HELSEREGION"] @@ -742,13 +743,13 @@ def lag_navn_orgnr_kolonner(fvdf, ant_kolonner, med_foretak = True): skj46O = pd.merge(skj46O, undervirksomheter_navn_og_kolonner, how="left", on="ORGNR_FORETAK") -skj46O = pd.merge(skj46O, finne_virksomheter_df, how="left", on="ORGNR_FORETAK") +skj46O = pd.merge(skj46O, finne_virksomheter_df, how="left", on=["ORGNR_FORETAK", "NAVN_KLASS"]) skj46O['USERID'] = skj46O['ORGNR_FORETAK'] skj46O = skj46O.rename(columns={"ORGNR_FORETAK": "FORETAKETS_ORGNR", "NAVN_KLASS": "FORETAKETS_NAVN"}) -# - +# + skj46O = pd.merge(skj46O, regionoppslag, how="left", on="HELSEREGION") skj46O = skj46O[kolonner] diff --git a/Institusjonslister/Institusjonslister.R b/Institusjonslister/Institusjonslister.R index 883c27d..41459ff 100644 --- a/Institusjonslister/Institusjonslister.R +++ b/Institusjonslister/Institusjonslister.R @@ -14,7 +14,7 @@ suppressPackageStartupMessages({ # ## Angir årgang og kobler til Oracle -aargang <- 2022 +aargang <- 2023 # Logg på for å få tilgang til Oracle con <- fellesr::dynarev_uttrekk(con_ask = "con") # fellesr:: @@ -53,14 +53,34 @@ RHF <- klassR::GetKlass(603, output_level = 2) %>% RHF = NAVN) %>% dplyr::select(ORGNR_FORETAK, NAVN, RHF, Helseregion, Foretakstype) -stotteforetak <- klassR::GetKlass(605, output_style = "wide") %>% - dplyr::rename(ORGNR_FORETAK = code3, - NAVN = name3, - RHF = name2, - Helseregion = code1) %>% - dplyr::mutate(Foretakstype = "Støtteforetak") %>% +# + +RHF_region <- RHF %>% +select(Helseregion, RHF) + +stotteforetak <- klassR::GetKlass(605, date = c(paste0(aargang, "-01-01"))) %>% + dplyr::filter(!is.na(parentCode), nchar(parentCode) <= 2) %>% + dplyr::rename(ORGNR_FORETAK = code, + NAVN = name, + Helseregion = parentCode) %>% + dplyr::mutate(Foretakstype = "Støtteforetak") %>% # OBS: legg til orgnummer? + dplyr::left_join(RHF_region, by = "Helseregion") %>% + dplyr::mutate(RHF = case_when(is.na(RHF) ~ "FELLESEIDE STØTTEFORETAK", TRUE ~ RHF)) %>% + dplyr::filter(!grepl("RHF", NAVN)) %>% dplyr::select(ORGNR_FORETAK, NAVN, RHF, Helseregion, Foretakstype) +# # HELSE MIDT-NORGE RHF HELSEPLATTFORMEN +# stotteforetak_2 <- klassR::GetKlass(605, output_style = "wide", date = c(paste0(aargang, "-01-01"))) %>% +# dplyr::rename(ORGNR_FORETAK = code3, +# NAVN = name3, +# RHF = name2, +# Helseregion = code1) %>% +# dplyr::mutate(Foretakstype = "Støtteforetak") %>% +# dplyr::select(ORGNR_FORETAK, NAVN, RHF, Helseregion, Foretakstype) + +# stotteforetak <- rbind(stotteforetak_1, stotteforetak_2) +# stotteforetak +# - + offentlig <- rbind(HF, RHF, stotteforetak) oppdrag <- klassR::GetKlass(604, output_style = "wide") %>% @@ -89,6 +109,9 @@ delreg <- fellesr::dynarev_uttrekk(delregnr = c(paste0(24, substr(aargang, 3, 4) sfu_cols = T, con_ask = F) +delreg %>% +filter(ORGNR == "918098275") + delreg <- delreg %>% dplyr::filter(is.na(KVITT_TYPE)) %>% dplyr::filter(!is.na(ORGNR)) %>% @@ -135,9 +158,15 @@ offentlig <- offentlig %>% delreg$ORGNR_FORETAK <- as.character(delreg$ORGNR_FORETAK) delreg_offentlig <- dplyr::inner_join(offentlig, delreg, by = c("ORGNR_FORETAK")) +# + +# delreg_offentlig %>% +# filter(ORGNR_FORETAK == "983658776") +# - + delreg_offentlig_test <- delreg_offentlig %>% dplyr::select(Foretakstype, Helseregion, RHF, ORGNR_FORETAK, H_VAR1_A, ORGNR, NAVN, NYTT_NAVN, - SKJEMA_TYPE, SN07_1, SN07_1_navn, F_POSTNR, F_POSTSTED) %>% + # SKJEMA_TYPE, + SN07_1, SN07_1_navn, F_POSTNR, F_POSTSTED) %>% dplyr::rename(Foretakstype = Foretakstype, Helseregion = Helseregion, Helseregion_navn = RHF, @@ -146,7 +175,7 @@ delreg_offentlig_test <- delreg_offentlig %>% Bedriftsorgnr = ORGNR, HF_navn = NAVN, Institusjonsnavn = NYTT_NAVN, - Skjematype = SKJEMA_TYPE, + # Skjematype = SKJEMA_TYPE, Næringskode = SN07_1, Næringsnavn = SN07_1_navn, Postnummer = F_POSTNR, diff --git "a/Opptaksomr\303\245der/KLASS DPS/DPS, Korrespondansetabell opptaksomr\303\245de-kommune.ipynb" "b/Opptaksomr\303\245der/KLASS DPS/DPS, Korrespondansetabell opptaksomr\303\245de-kommune.ipynb" index 4aeea45..f860e4d 100644 --- "a/Opptaksomr\303\245der/KLASS DPS/DPS, Korrespondansetabell opptaksomr\303\245de-kommune.ipynb" +++ "b/Opptaksomr\303\245der/KLASS DPS/DPS, Korrespondansetabell opptaksomr\303\245de-kommune.ipynb" @@ -144,12 +144,12 @@ "\n", "# Kristiansand og Trondheim fix #\n", "\n", - "kristiansand <- data.frame(OPPTAK_NUMMER = c(\"48\", \"52\"), \n", + "kristiansand <- data.frame(OPPTAK_NUMMER = c(\"D62\", \"D63\"), \n", " OPPTAK = c(\"Solvang\", \"Strømme\"), \n", " KOMMUNENUMMER = c(\"4204\", \"4204\"), \n", " KOMMUNENAVN = c(\"Kristiansand\", \"Kristiansand\"))\n", "\n", - "trondheim <- data.frame(OPPTAK_NUMMER = c(\"36\", \"37\"), \n", + "trondheim <- data.frame(OPPTAK_NUMMER = c(\"D33\", \"D34\"), \n", " OPPTAK = c(\"Nidaros\", \"Nidelv\"), \n", " KOMMUNENUMMER = c(\"5001\", \"5001\"), \n", " KOMMUNENAVN = c(\"Trondheim\", \"Trondheim\")) # OBS: Trondheim - Tråanten i 2023?\n", @@ -164,7 +164,27 @@ "metadata": {}, "outputs": [], "source": [ - "length(unique(opptaksomrader_KLASS_3$KOMMUNENUMMER))" + "length(unique(opptaksomrader_KLASS_3$KOMMUNENUMMER)) # skal være lik antall kommuner" + ] + }, + { + "cell_type": "code", + "execution_count": null, + "id": "429764e0-19db-48b6-ad54-88db34e46ebb", + "metadata": { + "tags": [] + }, + "outputs": [], + "source": [ + "nrow(opptaksomrader_KLASS_3) # skal være høyere enn antall kommuner" + ] + }, + { + "cell_type": "markdown", + "id": "6a28bb98-d824-4d0b-8619-d63cfdfa3a28", + "metadata": {}, + "source": [ + "OBS: endre filsti" ] }, { diff --git a/requirements.txt b/requirements.txt index a8a76ee..552d419 100644 --- a/requirements.txt +++ b/requirements.txt @@ -39,7 +39,7 @@ findspark==1.3.0 fsspec @ file:///home/conda/feedstock_root/build_artifacts/fsspec_1596221475257/work gcsfs==0.6.2 gitdb==4.0.5 -GitPython==3.1.35 +GitPython==3.1.37 gmpy2==2.1.0b1 google-auth==1.21.1 google-auth-oauthlib==0.4.1