About Ken_nuga

Ken_nuga · ‎08-13-2022

Many thanks, but I had to do as shown below: DATA have; set have; Pepid2=upcase(Pepid); Pepid_fac2=catx('-',Pepid2,FacilityCode); run; proc sql; create table want1 as select * from have group by Pepid_fac2, patient_id having max(LastPickupDate)=LastPickupDate ; quit; DATA want2; set want1; by Pepid_fac2; if first.Pepid_fac2; run;

Ken_nuga · ‎08-13-2022

That would have worked fine, however, the data set has some facilities mapped under another (a hub and spoke approach) and running an independent database but having the same facility ID, therefore, using that erroneously deletes the records of patients from the 'spoke' see below: 'VHCT00001' from 'spoke' facility has the same Patient_id with TB143 from the 'hub' facility FacilityCode Pepid_fac patient_id Pepid Sex LastPickupDate AgeAtStartofART i6Rcojd7d9S TB143-i6Rcojd7d9S 2 TB143 Male 12-Apr-22 40 i6Rcojd7d9S VHCT00001-i6Rcojd7d9S 2 VHCT00001 Female 30-Jun-22 25 i6Rcojd7d9S OP00002-i6Rcojd7d9S 3 OP00002 Female 22-Feb-18 3 i6Rcojd7d9S PI1825-i6Rcojd7d9S 3 PI1825 Female 13-May-22 38 i6Rcojd7d9S PI0964-i6Rcojd7d9S 4 PI0964 Female 03-Feb-22 28 i6Rcojd7d9S VHCT00002-i6Rcojd7d9S 4 VHCT00002 Male 30-May-22 31 i6Rcojd7d9S CT138-i6Rcojd7d9S 5 CT138 Female 06-Apr-22 48 i6Rcojd7d9S VHCT00003B-i6Rcojd7d9S 5 VHCT00003B Female 20-Jun-22 31 i6Rcojd7d9S CT06237-i6Rcojd7d9S 6 CT06237 Female 11-Feb-22 52 i6Rcojd7d9S VHOPI00009B-i6Rcojd7d9S 6 VHOPI00009B Female 08-Aug-19 10 i6Rcojd7d9S CT04218-i6Rcojd7d9S 7 CT04218 Male 25-Jan-22 64 i6Rcojd7d9S VHOPI00004B-i6Rcojd7d9S 7 VHOPI00004B Female 11-Apr-22 3 i6Rcojd7d9S CT144-i6Rcojd7d9S 8 CT144 Female 11-Feb-19 32 i6Rcojd7d9S VHOPI00005-i6Rcojd7d9S 8 VHOPI00005 Male 13-Jan-18 2 i6Rcojd7d9S CT00272-i6Rcojd7d9S 9 CT00272 Female 25-Mar-22 39 i6Rcojd7d9S VHOP00007-i6Rcojd7d9S 9 VHOP00007 Female 28-Jun-22 7 i6Rcojd7d9S PM01485-i6Rcojd7d9S 10 PM01485 Male 04-Feb-22 40 i6Rcojd7d9S VHCT00009A-i6Rcojd7d9S 10 VHCT00009A Female 05-May-22 37

Ken_nuga · ‎08-12-2022

I have duplicates like CT001 and ct001 under "Pepid" but SAS does not recognize them as duplicates, how do I remove one and keep the most recent of the two? Pepid patient_id Sex LastPickupDate CT08662 8480 Male 05-Apr-22 ct08662 8480 Male 11-Jan-22 IHSD/CT00071 4883 Male 27-Apr-22 IHSD/CT00073 4892 Male 10-May-22 IHSD/CT00079 4859 Male 27-Apr-22 ihsd/ct00071 4883 Male 26-Jan-22 ihsd/ct00073 4892 Male 09-Feb-22 ihsd/ct00079 4859 Male 26-Jan-22

Ken_nuga · ‎08-02-2018

Thank you for your prompt response, sorry it`s been a busy reporting period for me. I have data pulled down from a patient-level DB and the format it has for regimen line and regimen (both at ART start and current) are not consistent with the CDC formats e.g. AZT/3TC/NVP or ZDV/3TC/NVP should both now be AZT-3TC-NVP. The formats actually applied successfully when I attempted to do so. The next step will be to identify patient IDs with missing regimen line and fill up accordingly if the regimen is a 1st, 2nd or 3rd line drug based on age at ART start. Then, should there be a unique ID where the age at ART start is that of a pediatric (0 to 14 years) but the regimen assigned is an adult drug at ART start (except D4T-3TC-NVP or D4T-3TC-EFV), such should be re-assigned AZT-3TC-NVP. Another scenario is where the patient is a paed and the regimen is a 1st line regimen but the regimen line is missing, such regimen line should be Peds.1st.Line. Below is a sample data: PUID_ART Sex DOB Age_ArtStart_Yrs Age_ArtStaMnts_5@ ArtStart_Datdmy RegLne_ArtStart Reg_ArtStart Curr_RegLine Curr_ART_Reg 179 Female 01-Nov-97 20 10-Jan-18 ABC/FTC/LPVr Adult.1st.line TDF/3TC/EFV 36 Male 01-Jan-82 35 14-Feb-17 Adult.1st.line TDF/3TC/EFV Adult.1st.line TDF/3TC/EFV 39 Male 01-Jan-88 29 24-Feb-15 Adult.1st.line TDF/3TC/EFV ABC/FTC/LPVr 55 Female 05-Jul-77 37 24-Jan-15 Adult.1st.line TDF/3TC/EFV ABC/FTC/LPVr 58 Female 18-Jun-56 58 12-Mar-15 ABC/FTC/LPVr ABC/FTC/LPVr 66 Male 11-May-82 33 15-May-15 Adult.1st.line TDF/3TC/EFV Adult.1st.line TDF/3TC/EFV 69 Female 01-Jan-79 36 02-Jul-15 ABC/FTC/LPVr ABC/FTC/LPVr 74 Female 01-Jan-76 39 31-Jul-15 Adult.1st.line TDF/3TC/EFV Adult.1st.line TDF/3TC/EFV 75 Male 01-Jan-88 29 01-Aug-15 ABC/FTC/LPVr Adult.1st.line TDF/3TC/EFV 77 Female 03-Oct-85 29 14-Aug-15 ABC/FTC/LPVr ABC/FTC/LPVr 79 Male 01-Jan-82 35 10-Aug-15 ABC/FTC/LPVr ABC/FTC/LPVr 84 Female 26-Feb-84 31 11-Nov-15 Adult.1st.line TDF/3TC/EFV ABC/FTC/LPVr 91 Female 01-Jun-74 41 26-Nov-15 Adult.1st.line TDF/3TC/EFV Adult.1st.line TDF/3TC/EFV 99 Female 21-Sep-86 29 02-Nov-15 Adult.1st.line TDF/3TC/EFV Adult.1st.line TDF/3TC/EFV 116 Female 05-Mar-95 18 12-Feb-13 ABC/DDI/LPVr Adult.1st.line TDF/3TC/EFV 135 Female 04-Mar-96 18 25-Jun-14 Adult.1st.line TDF/3TC/EFV Adult.1st.line TDF/3TC/EFV 137 Female 14-Nov-96 17 16-Apr-14 ABC/DDI/LPVr Adult.2nd.line ABC/FTC/LPVr 157 Female 31-Aug-13 9 02-Apr-14 ABC/DDI/LPVr Adult.1st.line TDF/3TC/EFV 159 Female 16-Jul-99 15 23-Jul-14 Adult.2nd.line ABC/DDI/LPVr Adult.2nd.line ABC/DDI/LPVr 163 Female 17-Jul-04 9 31-Jul-13 ZDV/3TC/NVP Peds.1st.line ZDV/3TC/NVP 164 Male 04-Mar-04 11 18-Sep-13 ZDV/3TC/NVP 1st Line ZDV/3TC/NVP 177 Male 10-Jun-11 5 03-Feb-16 ZDV/3TC/NVP 1st Line ZDV/3TC/NVP 187 Male 06-Jun-05 8 01-Oct-13 ZDV/3TC/NVP 1st Line ZDV/3TC/NVP 2318 Female 17-Jul-13 3 27-Oct-13 Adult.1st.line ZDV/3TC/NVP Adult.1st.line ZDV/3TC/NVP 5 Female 08-Apr-08 8 11-Jan-17 Adult.1st.line D4T/3TC/NVP 1st Line D4T/3TC/NVP 60 Female 04-Oct-96 16 11-Sep-13 ABC/DDI/LPVr Adult.2nd.line ABC/FTC/LPVr 96 Male 10-Oct-13 14 17-Dec-14 Adult.1st.line ZDV/3TC/NVP Adult.1st.line ZDV/3TC/NVP 102 Male 05-Jun-14 15 16-Sep-15 Adult.1st.line ZDV/3TC/NVP Adult.1st.line ZDV/3TC/NVP Regards.

Ken_nuga · ‎07-30-2018

Please, I need help ASAP. I have tried this using SAS 9.4 but the blank spaces remain blank and only the formats changed. Thanks. DATA FACNAME_MERGED; set work.old_data; run; */ / / To assign serial numbers to observations in a data set / / /; DATA FACNAME_MERGED; SET FACNAME_MERGED; SN = _N_; RUN; */ TO REPLACE SEX RegLne_ArtStart Reg_ArtStart Curr_RegLine Curr_ART_Reg WITH CDC ACCEPTABLE FORMATS /; PROC FORMAT; value $SEX Male = 'Male' Female = 'Female'; value $RegimenLine_start "Adult.1st.line" = "Adult.1st.Line" "Adult.2nd.line" = "Adult.2nd.Line" "Peds.1st.line" = "Peds.1st.Line" "Peds.2nd.line" = "Peds.2nd.Line" "Adult.3rd.line" = "Adult.3rd.Line" "Peds.3rd.line" = "Peds.3rd.Line" ; value $RegimenLine_Current "Adult.1st.line" = "Adult.1st.Line" "Adult.2nd.line" = "Adult.2nd.Line" "Peds.1st.line" = "Peds.1st.Line" "Peds.2nd.line" = "Peds.2nd.Line" "1st Line" = "Peds.1st.Line" "2nd Line" = "Peds.2nd.Line" "Adult.3rd.line" = "Adult.3rd.Line" "Peds.3rd.line" = "Peds.3rd.Line" ; value $Regimen_start "ZDV/3TC/NVP"="AZT-3TC-NVP" "AZT/3TC/NVP"="AZT-3TC-NVP" "NVP only"="AZT-3TC-NVP" "ZDV only"="AZT-3TC-NVP" "ZDV/3TC"="AZT-3TC-NVP" "3TC/3TC/NVP"="AZT-3TC-NVP" "3TC/ZDV/NVP"="AZT-3TC-NVP" "AZT/3TC/EFV"="AZT-3TC-EFV" "ZDV/3TC/EFV"="AZT-3TC-EFV" "3TC/3TC/EFV"="AZT-3TC-EFV" "3TC/ZDV/EFV"="AZT-3TC-EFV" "D4T/3TC/NVP"="D4T-3TC-NVP" "D4T/3TC/EFV"="D4T-3TC-EFV" "TDF/3TC/NVP"="TDF-3TC-NVP" "TDF/3TC"="TDF-3TC-NVP" "TDF/3TC/EFV"="TDF-3TC-EFV" "TDF/FTC/NVP"="TDF-FTC-NVP" "TDF/FTC/EFV"="TDF-FTC-EFV" "AZT/3TC/ABC"="AZT-3TC-ABC" "AZT/3TC/TDF"="AZT-3TC-TDF" "TDF/FTC/LPVr"="TDF-FTC-LPV/r" "TDF/3TC/LPVr"="TDF-3TC-LPV/r" "ZDV/3TC/LPVr"="AZT-3TC-LPV/r" "AZT/TDF/FTC/LPV/r"="AZT-TDF-FTC-LPV/r" "ABC/TDF/LPVr"="AZT-TDF-3TC-LPV/r" "TDF/FTC/ATV/r"="TDF-FTC-ATV/r" "TDF/3TC/ATV/r"="TDF-3TC-ATV/r" "AZT/3TC/ATV/r"="AZT-3TC-ATV/r" "AZT/3TC/DRV/r"="AZT-3TC-DRV/r" "TDF/3TC/DRV/r"="TDF-3TC-DRV/r" "DRVr/DTG±1/2NRTIs"="DRVr-DTG ± 1-2 NRTIs" "DRVr/2NRTIs±NNRTI"="DRVr-2NRTIs ± NNRTI" "DRVr/RAL±1/2NRTIs"="DRVr-RAL ± 1-2NRTIs" "TDF/3TC/DTG"="TDF-3TC-DTG" "TDF/3TC/EFV400"="TDF-3TC-EFV400" "ABC/3TC/DTG"="ABC-3TC-DTG" "ABC/3TC/NVP"="ABC-3TC-NVP" "ABC/3TC/EFV"="ABC-3TC-EFV" "ABC/3TC/AZT"="ABC-3TC-AZT" "ABC/FTC/LPVr"="ABC-3TC-LPV/r" "ABC/3TC/LPVr"="ABC-3TC-LPV/r" "AZT/3TC/LPV/r"="AZT-3TC-LPV/r" "ABC/DDI/LPVr"="ABC-DDI-LPV/r" "DDI/3TC/NVP"="DDI-3TC-NVP" "ABC/3TC/DDI"="ABC-3TC-DDI" "TDF/3TC/RAL"="TDF-3TC-RAL" "d4T/3TC/LPVr"="D4T-3TC-LPV/r" "AZT/3TC/RAL"="AZT-3TC-RAL" "DTG+2NRTIs"="DTG + 2 NRTIs" "DRVr+2NRTIs"="DRVr + 2 NRTIs"; value $Regimen_Current "ZDV/3TC/NVP"="AZT-3TC-NVP" "AZT/3TC/NVP"="AZT-3TC-NVP" "NVP only"="AZT-3TC-NVP" "ZDV only"="AZT-3TC-NVP" "ZDV/3TC"="AZT-3TC-NVP" "3TC/3TC/NVP"="AZT-3TC-NVP" "3TC/ZDV/NVP"="AZT-3TC-NVP" "AZT/3TC/EFV"="AZT-3TC-EFV" "ZDV/3TC/EFV"="AZT-3TC-EFV" "3TC/3TC/EFV"="AZT-3TC-EFV" "3TC/ZDV/EFV"="AZT-3TC-EFV" "D4T/3TC/NVP"="D4T-3TC-NVP" "D4T/3TC/EFV"="D4T-3TC-EFV" "TDF/3TC/NVP"="TDF-3TC-NVP" "TDF/3TC"="TDF-3TC-NVP" "TDF/3TC/EFV"="TDF-3TC-EFV" "TDF/FTC/NVP"="TDF-FTC-NVP" "TDF/FTC/EFV"="TDF-FTC-EFV" "AZT/3TC/ABC"="AZT-3TC-ABC" "AZT/3TC/TDF"="AZT-3TC-TDF" "TDF/FTC/LPVr"="TDF-FTC-LPV/r" "TDF/3TC/LPVr"="TDF-3TC-LPV/r" "ZDV/3TC/LPVr"="AZT-3TC-LPV/r" "AZT/TDF/FTC/LPV/r"="AZT-TDF-FTC-LPV/r" "ABC/TDF/LPVr"="AZT-TDF-3TC-LPV/r" "TDF/FTC/ATV/r"="TDF-FTC-ATV/r" "TDF/3TC/ATV/r"="TDF-3TC-ATV/r" "AZT/3TC/ATV/r"="AZT-3TC-ATV/r" "AZT/3TC/DRV/r"="AZT-3TC-DRV/r" "TDF/3TC/DRV/r"="TDF-3TC-DRV/r" "DRVr/DTG±1/2NRTIs"="DRVr-DTG ± 1-2 NRTIs" "DRVr/2NRTIs±NNRTI"="DRVr-2NRTIs ± NNRTI" "DRVr/RAL±1/2NRTIs"="DRVr-RAL ± 1-2NRTIs" "TDF/3TC/DTG"="TDF-3TC-DTG" "TDF/3TC/EFV400"="TDF-3TC-EFV400" "ABC/3TC/DTG"="ABC-3TC-DTG" "ABC/3TC/NVP"="ABC-3TC-NVP" "ABC/3TC/EFV"="ABC-3TC-EFV" "ABC/3TC/AZT"="ABC-3TC-AZT" "ABC/FTC/LPVr"="ABC-3TC-LPV/r" "ABC/3TC/LPVr"="ABC-3TC-LPV/r" "AZT/3TC/LPV/r"="AZT-3TC-LPV/r" "ABC/DDI/LPVr"="ABC-DDI-LPV/r" "DDI/3TC/NVP"="DDI-3TC-NVP" "ABC/3TC/DDI"="ABC-3TC-DDI" "TDF/3TC/RAL"="TDF-3TC-RAL" "d4T/3TC/LPVr"="D4T-3TC-LPV/r" "AZT/3TC/RAL"="AZT-3TC-RAL" "DTG+2NRTIs"="DTG + 2 NRTIs" "DRVr+2NRTIs"="DRVr + 2 NRTIs"; run; DATA SASUSER.FACNAME; Set FACNAME_MERGED; format Sex $SEX. RegLne_ArtStart $RegimenLine_start. Curr_RegLine $RegimenLine_Current. Reg_ArtStart $Regimen_start. Curr_ART_Reg $Regimen_Current.; run; DATA FACNAME_MERGED; set SASUSER.FACNAME; IF (Age_ArtStaMnts_5_ ^=. OR Age_ArtStart_Yrs <=14) & /* peads 1st line drug class*/ (Reg_ArtStart = "AZT-3TC-NVP" | Reg_ArtStart = "AZT-3TC-EFV" | Reg_ArtStart = "D4T-3TC-NVP" | Reg_ArtStart = "D4T-3TC-EFV" | Reg_ArtStart = "ABC-3TC-NVP" | Reg_ArtStart = "ABC-3TC-EFV" | Reg_ArtStart = "ABC-3TC-AZT" | Reg_ArtStart = "TDF-3TC-EFV" | Reg_ArtStart = "TDF-3TC-DTG" | Reg_ArtStart = "TDF-3TC-EFV400" | Reg_ArtStart = "ABC-3TC-DTG") THEN RegLne_ArtStart = "Peds.1st.Line"; ELSE IF (Age_ArtStaMnts_5_ ^=. OR Age_ArtStart_Yrs <=14) & /* peads 2nd line drug class*/ (Reg_ArtStart = "ABC-DDI-LPV/r" | Reg_ArtStart = "ABC-3TC-LPV/r" | Reg_ArtStart = "AZT-3TC-LPV/r" | Reg_ArtStart = "D4T-3TC-LPV/r" | Reg_ArtStart = "DDI-3TC-NVP" | Reg_ArtStart = "ABC-3TC-DDI" | Reg_ArtStart = "TDF-3TC-ATV/r" | Reg_ArtStart = "TDF-3TC-RAL" | Reg_ArtStart = "AZT-3TC-RAL") THEN RegLne_ArtStart = "Peds.2nd.Line"; ELSE IF (Age_ArtStaMnts_5_ =. OR Age_ArtStart_Yrs >14) & /* adult 1st line drug class*/ (Reg_ArtStart = "AZT-3TC-NVP" | Reg_ArtStart = "AZT-3TC-EFV" | Reg_ArtStart = "D4T-3TC-NVP" | Reg_ArtStart = "D4T-3TC-EFV" | Reg_ArtStart = "TDF-3TC-NVP" | Reg_ArtStart = "TDF-3TC-EFV" | Reg_ArtStart = "TDF-FTC-NVP" | Reg_ArtStart = "TDF-FTC-EFV" | Reg_ArtStart = "AZT-3TC-ABC" | Reg_ArtStart = "AZT-3TC-TDF") THEN RegLne_ArtStart = "Adult.1st.Line"; ELSE IF (Age_ArtStaMnts_5_ =. OR Age_ArtStart_Yrs >14) & /* adult 2nd line drug class*/ (Reg_ArtStart = "TDF-FTC-LPV/r" | Reg_ArtStart = "TDF-3TC-LPV/r" | Reg_ArtStart = "AZT-3TC-LPV/r" | Reg_ArtStart = "AZT-TDF-FTC-LPV/r" | Reg_ArtStart = "AZT-TDF-3TC-LPV/r" | Reg_ArtStart = "TDF-FTC-ATV/r" | Reg_ArtStart = "TDF-3TC-ATV/r" | Reg_ArtStart = "AZT-3TC-ATV/r" | Reg_ArtStart = "TDF-3TC-DRV/r" | Reg_ArtStart = "AZT-3TC-DRV/r") THEN RegLne_ArtStart = "Adult.2nd.Line"; ELSE IF (Age_ArtStaMnts_5_ ^=. OR Age_ArtStart_Yrs <=14) & /* adult 1st line drug class*/ (Reg_ArtStart = "AZT-3TC-NVP" | Reg_ArtStart = "AZT-3TC-EFV" | Reg_ArtStart = "D4T-3TC-NVP" | Reg_ArtStart = "D4T-3TC-EFV" | Reg_ArtStart = "TDF-3TC-NVP" | Reg_ArtStart = "TDF-3TC-EFV" | Reg_ArtStart = "TDF-FTC-NVP" | Reg_ArtStart = "TDF-FTC-EFV" | Reg_ArtStart = "AZT-3TC-ABC" | Reg_ArtStart = "AZT-3TC-TDF") THEN RegLne_ArtStart = "Peds.1st.Line" & Reg_ArtStart = "AZT-3TC-NVP"; ELSE IF (Age_ArtStaMnts_5_ ^=. OR Age_ArtStart_Yrs <=14) & /* adult 2nd line drug class*/ (Reg_ArtStart = "TDF-FTC-LPV/r" | Reg_ArtStart = "TDF-3TC-LPV/r" | Reg_ArtStart = "AZT-3TC-LPV/r" | Reg_ArtStart = "AZT-TDF-FTC-LPV/r" | Reg_ArtStart = "AZT-TDF-3TC-LPV/r" | Reg_ArtStart = "TDF-FTC-ATV/r" | Reg_ArtStart = "TDF-3TC-ATV/r" | Reg_ArtStart = "AZT-3TC-ATV/r" | Reg_ArtStart = "TDF-3TC-DRV/r" | Reg_ArtStart = "AZT-3TC-DRV/r") THEN RegLne_ArtStart = "Peds.2nd.Line" & Reg_ArtStart = "ABC-3TC-LPV/r"; ELSE IF (Age_ArtStaMnts_5_ =. OR Age_ArtStart_Yrs >14) & /* peads 1st line drug class*/ (Reg_ArtStart = "AZT-3TC-NVP" | Reg_ArtStart = "AZT-3TC-EFV" | Reg_ArtStart = "D4T-3TC-NVP" | Reg_ArtStart = "D4T-3TC-EFV" | Reg_ArtStart = "ABC-3TC-NVP" | Reg_ArtStart = "ABC-3TC-EFV" | Reg_ArtStart = "ABC-3TC-AZT" | Reg_ArtStart = "TDF-3TC-EFV" | Reg_ArtStart = "TDF-3TC-DTG" | Reg_ArtStart = "TDF-3TC-EFV400" | Reg_ArtStart = "ABC-3TC-DTG") THEN RegLne_ArtStart = "Adult.1st.Line" & Reg_ArtStart = "AZT-3TC-NVP"; ELSE IF (Age_ArtStaMnts_5_ =. OR Age_ArtStart_Yrs >14) & /* peads 2nd line drug class*/ (Reg_ArtStart = "ABC-DDI-LPV/r" | Reg_ArtStart = "ABC-3TC-LPV/r" | Reg_ArtStart = "AZT-3TC-LPV/r" | Reg_ArtStart = "D4T-3TC-LPV/r" | Reg_ArtStart = "DDI-3TC-NVP" | Reg_ArtStart = "ABC-3TC-DDI" | Reg_ArtStart = "TDF-3TC-ATV/r" | Reg_ArtStart = "TDF-3TC-RAL" | Reg_ArtStart = "AZT-3TC-RAL") THEN RegLne_ArtStart = "Adult.2nd.Line" & Reg_ArtStart = "AZT-3TC-LPV/r"; run;

Ken_nuga · ‎11-02-2017

Alright, it is done! Here is what I did and a partial print out. proc import out = sasuser.CIHP_RADET datafile = 'C:\Users\ONUGHA\Desktop\A.xlsx' dbms=xlsx replace; run; DATA TEST; SET sasuser.CIHP_RADET; k1 = anydigit (A); PUID_PREFIX = substr (A, 1, k1-1); temp = substr(A,k1); k2 = anyalpha (temp); PUID = substr(temp, 1, k2-1); PUID_SUFFIX = substr(temp, k2); keep A PUID_PREFIX PUID PUID_SUFFIX; RUN; PROC PRINT DATA = TEST; RUN; The SAS System Obs A PUID_PREFIX PUID PUID_SUFFIX 1 PM00003DV PM 00003 DV 2 CT00004MSG CT 00004 MSG 3 OPI00004AMOPI OPI 00004 AMOPI 4 CT/PI00005 CT/PI 00005 5 CCP/PM00006 CCP/PM 00006 6 CT00007 CT 00007 7 PM00008 PM 00008 8 OPI00008 OPI 00008 9 PM00009 PM 00009 10 CT00010A CT 00010 A 11 PM00010 PM 00010 Great, thank you!

Ken_nuga · ‎10-30-2017

Many thanks, but I am actually trying this on a variable with several observations. Here is a short copy of it: The SAS System Obs A 10 CT00010A 54 AMOPI00066 55 CT00069DV 56 CTPM00069B 67 OPEI00079DV 68 PM00080A 69 PM00080C 70 TI00080A 71 PM00080b 72 CT00081B 73 CT00081A 75 PM00084A 76 TI00084B 77 CT00085A 78 CT00085B 79 PM00086A 80 PM00086B 81 PM00088A 82 PM00088B 88 PM00092A 89 PM00092B 101 TI00117B 102 TI00117A 179 PM02414 200 PI03049A 201 PI03049B

Ken_nuga · ‎10-25-2017

The prefixes could be any of CT, TI, TII, PM, OPI, AMOPI, TB, OPEI, PNE. Therefore, it is not possible to substring the first two characters, but it is the first set of letters that needs to be moved into a separate column as "prefixes." The alphabet that comes after the numbers always comes after the numbers because they were meant to be entered into a separate column as suffixes and then concatenated. Presently, my challenge is how to separate the last alphabet from the following examples CTA, AMOPIB, OPEIC as the COMPRESS function groups all the alphabets into one column.

Ken_nuga · ‎10-19-2017

Alright, here is a better explanation. I have attached 2 SAS OUTPUT pictures and 2 Excel pictures of the dataset, the variables "prefix", " serial number" and "suffix" were meant to concatenate as "Patient Unique ID", but a data clerk erroneously copied the wrong thing. The A or B after "CT00001A" is the suffix. Thank you.

Ken_nuga · ‎10-19-2017

I have a patient unique ID, say "CT00001A" and I want to separate the prefix "CT" from the serial number "00001" and the suffix "A". Here is a program I used DATA TEST; SET sasuser.CIHP_RADET; B = COMPRESS (A,"","A"); C = COMPRESS (A,B); RUN; PROC PRINT DATA = TEST; RUN; and it returned 00001 in one column and CTA in another. Now I want to separate CT from A in 2 separate columns

Online Status	Offline
Date Last Visited	‎08-13-2022 03:06 AM

Re: Remove duplicate IDs with similar characters

Re: Remove duplicate IDs with similar characters

Remove duplicate IDs with similar characters

Re: To replace regimen line and regimen with standard format and fill ...

To replace regimen line and regimen with standard format and fill up b...

Re: To separate letters in a word

Re: To separate letters in a word

Re: To separate letters in a word

Re: To separate letters in a word

To separate letters in a word

Re: Remove duplicate IDs with similar characters

Re: To separate letters in a word

Re: To separate letters in a word

Re: To separate letters in a word

Re: Remove duplicate IDs with similar characters

Re: Remove duplicate IDs with similar characters

Remove duplicate IDs with similar characters

Re: To replace regimen line and regimen with standard format and fill ...

To replace regimen line and regimen with standard format and fill up b...

Re: To separate letters in a word

Re: To separate letters in a word

Re: To separate letters in a word

Re: To separate letters in a word

To separate letters in a word