#include <bits/stdc++.h>
using namespace std;
int n,m,k;
int par[100005],got[200005],sz[100005];
vector<int> adj[100005];
vector<pair<int,long long> > work[100005];
priority_queue<long long,vector<long long>,greater<long long> > pq[100005];
long long tot[100005];
void dfssize(int x){
	sz[x]=1;
	for(int i:adj[x]){
		dfssize(i);
		sz[x]+=sz[i];
	}
}
void calc(int x){
	while(!pq[x].empty()) pq[x].pop();
	tot[x]=0;
	for(pair<int,long long> i:work[x]){
		if(got[i.first]){
			pq[x].push(i.second);
			tot[x]+=i.second;
		}
	}
	while((int)pq[x].size()>sz[x]){
		tot[x]-=pq[x].top();
		pq[x].pop();
	}
	for(int i:adj[x]){
		calc(i);
		if(pq[i].size()>pq[x].size()){
			swap(pq[i],pq[x]);
			swap(tot[i],tot[x]);
		}
		while(!pq[i].empty()){
			tot[x]+=pq[i].top();
			pq[x].push(pq[i].top());
			pq[i].pop();
		}
		while((int)pq[x].size()>sz[x]){
			tot[x]-=pq[x].top();
			pq[x].pop();
		}
	}
}
int32_t main(){
	ios::sync_with_stdio(0);
	cin.tie(0);
	int st;
	cin >> st;
	cin >> n >> k >> m;
	for(int i=2; i<=n; i++){
		cin >> par[i];
		adj[par[i]].push_back(i);
	}
	dfssize(1);
	for(int i=1; i<=k; i++){
		got[i]=1;
		int x;
		long long v;
		cin >> x >> v;
		work[x].push_back({i,v});
	}
	calc(1);
	cout << tot[1] << ' ';
	for(int i=0; i<m; i++){
		int cmd;
		cin >> cmd;
		if(cmd==1){
			k++;
			got[k]=1;
			int x;
			long long v;
			cin >> x >> v;
			work[x].push_back({k,v});
		}
		else{
			int x;
			cin >> x;
			got[x]=0;
		}
		calc(1);
		cout << tot[1] << ' ';
	}
}