#include <bits/stdc++.h>
#include <ext/pb_ds/assoc_container.hpp>
#include <ext/pb_ds/tree_policy.hpp>
#define int long long

#define all(X) (X).begin(), (X).end()
#define reset(X) memset(X, 0, sizeof(X))
#define mp(a, b) make_pair(a, b)
#define pb push_back
#define endl '\n'
#define fi first
#define se second

using namespace __gnu_pbds;
using namespace std;
const int mod = 1e9 + 7;
// const int mod=998244353;
//const int mod=1e9+9;
//const int INF=4e18+10;
const int INF = 4e18 + 10;
template <typename T>
using ordered_set = tree<T, null_type, less<T>, rb_tree_tag, tree_order_statistics_node_update>;
template <typename T>
using ordered_multiset = tree<T, null_type, less_equal<T>, rb_tree_tag, tree_order_statistics_node_update>;

#define read(n) \
int n;      \
cin >> n;
#define readv(x, n)   \
vector<int> x(n); \
for (auto &i : x) \
    cin >> i;

typedef vector<int> vi;
typedef vector<vector<int>> vvi;
typedef pair<int, int> pii;

template <typename T1, typename T2>
void set_min(T1 &a, T2 b)
{
    a = min(a, (T1)b);
}

int multiply(int a, int b, int in_mod) { return (a * b) % in_mod; }
int mult_identity(int a) { return 1; }


auto power(auto a, int b, int in_mod)
{
    auto prod = mult_identity(a);
    auto mult = a % in_mod;
    while (b != 0)
    {
        if (b % 2)
        {
            prod = multiply(prod, mult, in_mod);
        }
        mult = multiply(mult, mult, in_mod);
        b /= 2;
    }
    return prod;
}
int mod_inv(int q, int in_mod)
{

    return power(q, in_mod - 2, in_mod);
}


int S(int x)
{
    int sm = 0;
    while(x)
    {
        sm+=x%10;
        x/=10;
    }
    return sm;
}
void solve()
{
    string s;
    cin>>s;
    int n=s.size();
    vector<vector<vector<int>>> dp(n, vector<vector<int>>(3,vector<int>(4)));

    int cnt[3][4];
    reset(cnt);
    int vacant = 0;
    for(int i= 0;i<n;i++)
    {
        if(s[i]=='?')
            vacant++;
        for(int j= 2;j>=0;j--)
        {
            for(int k =0;k<4;k++)
            {

                if(s[i]=='?')
                {
                    if(k>0 && k<=j+1)
                    {

                    if(j>0)
                        dp[i][j][k] = cnt[j-1][k-1];
                    else dp[i][j][k] = 1;

                    cnt[j][k]+=dp[i][j][k];
                    }
                }
                else if(j == s[i]-'A')
                {
                    if(j>0)
                        dp[i][j][k] = cnt[j-1][k];
                    else if(k==0) dp[i][j][k] = 1;
                cnt[j][k]+=dp[i][j][k];

                }
            }
        }
    }
    int ans = 0;
    for(int i= 0;i< min((int)4, vacant+1);i++)
    {
        ans = (ans + power(3, vacant - i, mod)*(cnt[2][i]%mod))%mod;
    }
    cout<<ans<<endl;
}



signed main()
{
    ios_base::sync_with_stdio(false);
    cin.tie(NULL);
    cerr.tie(NULL);
#ifndef ONLINE_JUDGE
    if (fopen("INPUT.txt", "r"))
    {
        freopen("INPUT.txt", "r", stdin);
        freopen("OUTPUT.txt", "w", stdout);
    }
#endif
    auto clk = clock();
    mt19937 rng(chrono::steady_clock::now().time_since_epoch().count());
    // -------------------------------------Code starts here---------------------------------------------------------------------

    int t = 1;
    // cin >> t;

    for (int test = 1; test <= t; test++)
    {
        // cout<<"Case #"<<test<<":\n";
        //cout<<"Trip #"<<test<<": ";
        // cout<<endl;
        solve();
        // solveB();

        // cout<<endl;
    }

    // -------------------------------------Code ends here------------------------------------------------------------------

    clk = clock() - clk;
    // cerr << fixed << setprecision(6) << "Time: " << ((long double)clk) / CLOCKS_PER_SEC << "\n";
    return 0;
}


Measured memory_bytes: 27548