Skip to content

Instantly share code, notes, and snippets.

@ddellacosta
Last active August 29, 2015 14:06
Show Gist options
  • Save ddellacosta/9a72a6ce52283ecbb1ae to your computer and use it in GitHub Desktop.
Save ddellacosta/9a72a6ce52283ecbb1ae to your computer and use it in GitHub Desktop.
I am going insane
user=> keys-as-str
"#{\"CostCenterOfficeCode\" \"CostCenterFirmFunctionMediumDesc\" \"Date_LastDayWorked\" \"CostCenterOfficeDesc\" \"JobLevelText\" \"FacilityRegionCode\" \"Name_Last\" \"CostCenterServiceLineCode\" \"Date_MostRecentHire\" \"CompanyCodeDesc\" \"CostCenterServiceLineDesc\" \"PersonnelAreaDesc\" \"MasterCostCenterName\" \"CostCenterServiceAreaMediumDesc\" \"Name_PreferredFirst\" \"FacilityRegionDesc\" \"FacilityCode\" \"Date_Valid_From\" \"PersonnelSubareaCode\" \"FacilityName\" \"Date_Valid_To\" \"PersonnelSubareaDesc\" \"CostCenterServiceAreaCode\" \"Date_OriginalHire\" \"Email_Address\" \"Name_OutlookDisplayName\" \"EmployeeGroupDesc\" \"JobText\" \"IsPPD\" \"PersonnelAreaCode\" \"PreferredFullName\" \"IsManager\" \"CostCenterFirmFunctionCode\" \"Name_Middle\" \"EmployeeGroupCode\" \"Date_EmployeeTerminated\" \"JobLevelCode\" \"EmployeeAlias\" \"Phone_Desk\" \"PersonnelNbr\" \"Date_PartnerTerminated\" \"Addr_PersonnelAreaOfficeCity\" \"CompanyCode\" \"Name_First\" \"MasterCostCenterNumber\"}"
user=> (disj (read-string keys-as-str) "PersonnelNbr")
#{"CostCenterOfficeCode" "CostCenterFirmFunctionMediumDesc" "Date_LastDayWorked" "CostCenterOfficeDesc" "JobLevelText" "FacilityRegionCode" "Name_Last" "CostCenterServiceLineCode" "Date_MostRecentHire" "CompanyCodeDesc" "CostCenterServiceLineDesc" "PersonnelAreaDesc" "MasterCostCenterName" "CostCenterServiceAreaMediumDesc" "Name_PreferredFirst" "FacilityRegionDesc" "FacilityCode" "Date_Valid_From" "PersonnelSubareaCode" "FacilityName" "Date_Valid_To" "PersonnelSubareaDesc" "CostCenterServiceAreaCode" "Date_OriginalHire" "Email_Address" "Name_OutlookDisplayName" "EmployeeGroupDesc" "JobText" "IsPPD" "PersonnelAreaCode" "PreferredFullName" "IsManager" "CostCenterFirmFunctionCode" "Name_Middle" "EmployeeGroupCode" "Date_EmployeeTerminated" "JobLevelCode" "EmployeeAlias" "Phone_Desk" "PersonnelNbr" ;; <-- WTF!?
"Date_PartnerTerminated" "Addr_PersonnelAreaOfficeCity" "CompanyCode" "Name_First" "MasterCostCenterNumber"}
user=> (filter #(= "CompanyCode" %) (read-string keys-as-str))
("CompanyCode")
user=> (filter #(= "PersonnelNbr" %) (read-string keys-as-str))
() <-- WTF!?
user=>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment