Read txt file with comma in currency

How to read txt file with comma in currency?

123,"Harold Wilson",Acct,01/15/1989,$78,123.

128,"Julia Child",Food,08/29/1988

007,"James Bond",Security,02/01/2000,$82,100

Here is my attempt:

data employee;
    infile file dsd;
    input 
        id : $3. 
        name : $20. 
        xxx : $ 
        date : mmddyy8.
        cash : dollar8.;
    format 
        date date9.
        cash dollar8.;
run;

proc print data=employee;
run;