Value not Setting in Macro or Loop

[DavidPhillips2]

I used this

filename code temp;
data _null_;
  set departmentList;
  file code;
  put '%callStudentBody(No, %bquote(' department +(-1) '))';
run; 
%include code / source2;

with

OPTIONS MPRINT SYMBOLGEN MLOGIC;