DToday s d DPrevday s d c eval Today = %date() c eval Prevday = Today - %days(1) c call 'DT7BK' C PARM Prevday C SETON LR