Para imprimir o nome da cidade e UF do cadastro da empresa segue exemplo abaixo:

oPrint:Say(nLin,1120,ALLTRIM(SM0->M0_CIDENT)+"-"+SM0->M0_ESTENT+","+STRZERO(DAY(DDATABASE),2)+" de "+MESEXTENSO(DDATABASE)+" de "+StrZero(YEAR(DDATABASE),4))