inserts as a new first record
setlink(newpointer,*phead);
*phead = newpointer;