#include<bits/stdc++.h>
#define cir(i,a,b) for(int i=a;i<b;++i)
using namespace std;
#define fcin cin
#define fcout cout
using lint=long long;
class tree{
private:
    vector<vector<int>> gr;
    vector<multiset<int>> w;
    auto dfs(int u,multiset<int,greater<int>>&ux)->lint{
        map<int,int> cnt;
        for(auto&i:w[u]) ux.emplace(i),cnt[i]=ux.count(i);
        auto res=(ux.empty()?0:(lint)(*ux.begin()));
        if(!ux.empty()) ux.erase(ux.begin());
        for(auto&i:gr[u]) res+=dfs(i,ux);
        for(auto&i:w[u]) if(ux.count(i)==cnt[i]){
            ux.erase(ux.find(i));
        }else{
            --cnt[i];
        }
        return res;
    }
public:
    auto link(int u,int f){
        gr[f].emplace_back(u);
    }
    auto worker(int u,int wx){
        w[u].emplace(wx);
    }
    auto rmworker(int u,int wx){
        w[u].erase(w[u].find(wx));
    }
    auto check(){
        multiset<int,greater<int>> x;
        return dfs(0,x);
    }
    tree(int _n):gr(_n),w(_n){}
};
int main(){
    ios::sync_with_stdio(false),fcin.tie(nullptr);
    int sid;fcin>>sid;
    int n,k,m;fcin>>n>>k>>m;
    tree tr(n);
    cir(i,1,n){
        int f;fcin>>f;tr.link(i,f-1);
    }
    vector<pair<int,int>> info;
    cir(i,0,k){
        int x,w;fcin>>x>>w;tr.worker(x-1,w);
        info.emplace_back(x-1,w);
    }
    fcout<<tr.check()<<' ';
    cir(i,0,m){
        int op;fcin>>op;
        if(op==1){
            int x,w;fcin>>x>>w;--x;
            tr.worker(x,w);
            info.emplace_back(x,w);
        }else{
            int id;fcin>>id;--id;
            tr.rmworker(info[id].first,info[id].second);
        }
        fcout<<tr.check()<<'\n';
    }
    return 0;
}