*** BG PGEN ***
replace bgpbbila_new = 11 if bgpbbila == 1 & (bepm_l1_73 == 1 | bfpm_l1_150 == 1)
replace bgpbbila_new = 12 if bgpbbila == 2 & (bepm_l2_73 == 1 | bfpm_l2_150 == 1)
replace bgpbbila_new = 13 if bgpbbila == 3 & (bepm_l3_73 == 1 | bfpm_l3_150 == 1)
replace bgpbbila_new = 14 if bgpbbila == 4 & (bepm_l4_73 == 1 | bfpm_l4_150 == 1)
replace bgpbbila_new = 14 if bgpbbila == 4 & (bepm_l5_73 == 1 | bfpm_l5_150 == 1)
replace bgpbbila_new = 19 if bgpbbila == 9 & (bepm_l6_73 == 1 | bfpm_l6_150 == 1)
replace bgpbbila_new = 15 if bgpbbila == 5 & (bepm_l7_73 == 1 | bfpm_l7_150 == 1)

*** BF PGEN ***
replace bfpbbila_new = 11 if bfpbbila == 1 & (bepm_l1_73 == 1 | bfpm_l1_150 == 1)
replace bfpbbila_new = 12 if bfpbbila == 2 & (bepm_l2_73 == 1 | bfpm_l2_150 == 1)
replace bfpbbila_new = 13 if bfpbbila == 3 & (bepm_l3_73 == 1 | bfpm_l3_150 == 1)
replace bfpbbila_new = 14 if bfpbbila == 4 & (bepm_l4_73 == 1 | bfpm_l4_150 == 1)
replace bfpbbila_new = 14 if bfpbbila == 4 & (bepm_l5_73 == 1 | bfpm_l5_150 == 1)
replace bfpbbila_new = 19 if bfpbbila == 9 & (bepm_l6_73 == 1 | bfpm_l6_150 == 1)
replace bfpbbila_new = 15 if bfpbbila == 5 & (bepm_l7_73 == 1 | bfpm_l7_150 == 1)

*** BE PGEN ***
replace bepbbila_new = 11 if bepbbila == 1 & bepm_l1_73 == 1
replace bepbbila_new = 12 if bepbbila == 2 & bepm_l2_73 == 1
replace bepbbila_new = 13 if bepbbila == 3 & bepm_l3_73 == 1
replace bepbbila_new = 14 if bepbbila == 4 & bepm_l4_73 == 1
replace bepbbila_new = 14 if bepbbila == 4 & bepm_l5_73 == 1
replace bepbbila_new = 19 if bepbbila == 9 & bepm_l6_73 == 1
replace bepbbila_new = 15 if bepbbila == 5 & bepm_l7_73 == 1

*** [SOEPlong] PGEN ***

clonevar pgpbbila_new = pgpbbila

replace pgpbbila_new = 11 if pgpbbila == 1 & lm0073l01 == 1
replace pgpbbila_new = 12 if pgpbbila == 2 & lm0073l02 == 1
replace pgpbbila_new = 13 if pgpbbila == 3 & lm0073l03 == 1
replace pgpbbila_new = 14 if pgpbbila == 4 & lm0073l04 == 1
replace pgpbbila_new = 14 if pgpbbila == 4 & lm0073l05 == 1
replace pgpbbila_new = 19 if pgpbbila == 9 & lm0073l06 == 1
replace pgpbbila_new = 15 if pgpbbila == 5 & lm0073l07 == 1

* Fortschreibung für spätere Jahre (sofern sich Abschluss nicht geändert hat)
sort pid syear
replace pgpbbila_new = 11 if pgpbbila_new[_n-1] == 11 & pgpbbila == 1 & pid == pid[_n-1]
replace pgpbbila_new = 12 if pgpbbila_new[_n-1] == 12 & pgpbbila == 2 & pid == pid[_n-1]
replace pgpbbila_new = 13 if pgpbbila_new[_n-1] == 13 & pgpbbila == 3 & pid == pid[_n-1]
replace pgpbbila_new = 14 if pgpbbila_new[_n-1] == 14 & pgpbbila == 4 & pid == pid[_n-1]
replace pgpbbila_new = 19 if pgpbbila_new[_n-1] == 19 & pgpbbila == 9 & pid == pid[_n-1]
replace pgpbbila_new = 15 if pgpbbila_new[_n-1] == 15 & pgpbbila == 5 & pid == pid[_n-1]