Source position: gem.pas line 310
procedure SetPtmplt(
tree: PAESTree;
obj: SmallInt;
const str: string
);