Ошибка в односвязном списке

#include <iostream>
#include <fstream>
#include <string>
using namespace std;
 
struct Node
{
string Name;
int Num;
Node *next;
};
Node *Head = NULL;
 
Node *CreateNode(string Name, int Num)
{
Node *NewNode = new Node;
NewNode->Name = Name;
NewNode->Num = Num;
NewNode->next = NULL;
return NewNode;
}
 
void AddFirst(Node *NewNode)
{
NewNode->next = Head;
Head = NewNode;
}
 
Node *Find(Node *Head, int Num)
{
Node *q = Head;
while(q && (q->Num != Num))
q = q->next;
return q;
}
 
void RemoveNode(Node *OldNode)
{
Node *q = Head;
if(Head == OldNode) Head = OldNode -> next;
else
{
while(q && q->next != OldNode) q = q->next;
if(q==NULL) return;
q->next = OldNode->next;
}
delete OldNode;
}
 
void AddAfter(Node *p, Node *NewNode)
{
NewNode->next = p->next;
p->next = NewNode;
}
 
void AddLast(Node *NewNode)
{
Node *q = Head;
if(Head == NULL)
{
AddFirst(NewNode);
return;
}
while(q->next) q=q->next;
AddAfter(q, NewNode);
}
 
void Print_xD(Node *Head)
{
Node *q = Head;
while(q)
{
cout << q->Name << " " << q->Num << endl;
q = q->next;
}
}
 
void WriteToFile(Node *Head)
{
ofstream WFile("mraz.txt");
if(!WFile)
{
cout << "Iceberg" << endl;
}
Node *q = Head;
while(q)
{
WFile << q->Name;
WFile << q->Num;
q = q->next;
}
WFile.close();
}
 
void DestroyList(Node *Head)
{
Node *q = Head;
while(q)
{
Node *q = Head;
while(q) q=q->next;
delete q;
}
}
 
Node *BackupNodeOfFile(Node *Head)
{
string Name;
int Num;
ifstream RFile("mraz.txt");
if(!RFile)
{
cout << "Iceberg" << endl;
}
RFile >> Name;
RFile >> Num;
Node *NewNode = CreateNode(Name, Num);
Node *NextNode;
while(!RFile.eof()) 
{
RFile >> Name;
RFile >> Num;
AddLast(NewNode);
}
return NewNode;
}
 
void main()
{
setlocale(LC_ALL, "Russian");
int N;
int Num=0;
string Name;
Node *NewNode;
Node *OldNode;
do
{
cout << "Введите номер, вызываемой функции. Или 0 для выхода." << endl;
cin >> N;
switch(N)
{
case 1:
cout<<"Создание списка"<<endl;
getline(cin, Name);
Num++;
NewNode = CreateNode(Name, Num);
break;
case 2:
cout << "Добавление в спис'ok" << endl;
getline(cin, Name);
AddLast(NewNode);
break;
case 3:
cout << "Удаление элемента по номеру" << endl;
cin >> Num;
OldNode = Find(Head, Num);
RemoveNode(OldNode); 
break;
case 4:
cout << "Вывод на печать" << endl;
Print_xD(Head);
break;
case 5:
cout << "Запись в файл" << endl;
WriteToFile(Head);
break;
case 6:
cout << "Удаление списка" << endl;
DestroyList(Head);
break;
case 7:
cout << "Восстановление списка" << endl;
NewNode = BackupNodeOfFile(Head);
break;
default:
cout << "Вы ввели не ту цифру!" << endl;
}
}while(N);
system("pause");
}