Needs["DatabaseLink`"]

conn=OpenSQLConnection[ "publisher"];

data=SQLSelect[conn,"ROYSCHED",{"TITLE_ID","ROYALTY"}]

ListLinePlot[Last/@data]