/////////////////
//Run the getpts command when the graph window is opened
getpts 3;

//Run the following after executing getpts command
type -a Dataset: %(getpts.data$) Index Data: %(getpts.indexdata$) X Data: %(getpts.xdata$);
//XPOS=_XPOS; INDX=_INDX; edit XPOS; edit INDX; 
range xx = [??]!_INDX;  //range of the index loose ds
range ro=[Book2]1!col(1); //destination dataset
ro=xx; //copy loose dataset to a permanent dataset
ds$=getpts.data$;
str1$=Token(ds$,1, '_')$;
str2$=Token(ds$,1, '@')$;
str2$=Token(str2$,2, '_')$;
str3$=Token(ds$,2, '@')$;
type -a Book: %(str1$) Sheet: %(str3$) Column: %(str2$);

//The out put would be like:
Dataset: Book1_B@2 Index Data: _indx X Data: _xpos
Book: Book1 Sheet: 2 Column: B
/////////////////