payout.php

<?php
/* Copyright (C) 2018-2023  Thibault FOUCART        <support@ptibogxiv.net>
 * Copyright (C) 2019-2026  Frédéric France         <frederic.france@free.fr>
 * Copyright (C) 2024   MDW           <mdeweerd@users.noreply.github.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
// Put here all includes required by your class file
 
// Load Dolibarr environment
require '../main.inc.php';
require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php';
require_once DOL_DOCUMENT_ROOT.'/stripe/class/stripe.class.php';
//require_once DOL_DOCUMENT_ROOT.'/core/lib/stripe.lib.php';
require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
require_once DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php';
require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
if (isModEnabled('accounting')) {
  require_once DOL_DOCUMENT_ROOT.'/accountancy/class/accountingjournal.class.php';
}
 
// Load translation files required by the page
$langs->loadLangs(array('compta', 'salaries', 'bills', 'hrm', 'stripe'));
 
// Security check
$socid = GETPOSTINT("socid");
if ($user->socid) {
  $socid = $user->socid;
}
//restrictedArea($user, 'salaries', '', '', '');
 
$limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
$rowid = GETPOST("rowid", 'alpha');
$sortfield = GETPOST('sortfield', 'aZ09comma');
$sortorder = GETPOST('sortorder', 'aZ09comma');
$page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
if (empty($page) || $page == -1) {
  $page = 0;
}     // If $page is not defined, or '' or -1
$offset = $limit * $page;
$pageprev = $page - 1;
$pagenext = $page + 1;
$optioncss = GETPOST('optioncss', 'alpha');
$param = "";
$num = 0;
 
$result = restrictedArea($user, 'banque');
 
 
/*
 * View
 */
 
$form = new Form($db);
$acc = new Account($db);
$stripe = new Stripe($db);
 
llxHeader('', $langs->trans("StripePayoutList"));
 
if (isModEnabled('stripe') && (!getDolGlobalString('STRIPE_LIVE')/* || GETPOST('forcesandbox', 'alpha') */)) {
  $service = 'StripeTest';
  $servicestatus = '0';
  dol_htmloutput_mesg($langs->trans('YouAreCurrentlyInSandboxMode', 'Stripe'), [], 'warning');
} else {
  $service = 'StripeLive';
  $servicestatus = '1';
}
 
$stripeacc = $stripe->getStripeAccount($service);
/*if (empty($stripeaccount))
{
  print $langs->trans('ErrorStripeAccountNotDefined');
}*/
 
$moreforfilter = '';
$totalnboflines = -1;
 
if (!$rowid) {
  print '<form method="POST" action="'.dolBuildUrl($_SERVER["PHP_SELF"]).'">';
  if ($optioncss != '') {
    print '<input type="hidden" name="optioncss" value="'.$optioncss.'">';
  }
  print '<input type="hidden" name="token" value="'.newToken().'">';
  print '<input type="hidden" name="formfilteraction" id="formfilteraction" value="list">';
  print '<input type="hidden" name="action" value="list">';
  print '<input type="hidden" name="sortfield" value="'.$sortfield.'">';
  print '<input type="hidden" name="sortorder" value="'.$sortorder.'">';
  print '<input type="hidden" name="page" value="'.$page.'">';
 
  $title = $langs->trans("StripePayoutList");
  $title .= $form->textwithpicto('', $stripeacc ? ' (Stripe connection with Stripe OAuth Connect account '.$stripeacc.')' : ' (Stripe connection with keys from Stripe module setup)');
 
  print_barre_liste($title, $page, $_SERVER["PHP_SELF"], $param, $sortfield, $sortorder, '', $num, $totalnboflines, 'title_accountancy.png', 0, '', '', $limit);
 
  print '<div class="div-table-responsive">';
  print '<table class="tagtable noborder liste'.(!empty($moreforfilter) ? " listwithfilterbefore" : "").'">'."\n";
 
  print '<tr class="liste_titre">';
  print_liste_field_titre("Ref", $_SERVER["PHP_SELF"], "", "", "", "", $sortfield, $sortorder);
  print_liste_field_titre("DatePayment", $_SERVER["PHP_SELF"], "", "", "", '', $sortfield, $sortorder, 'center ');
  print_liste_field_titre("DateOperation", $_SERVER["PHP_SELF"], "", "", "", '', $sortfield, $sortorder, 'center ');
  print_liste_field_titre("Description", $_SERVER["PHP_SELF"], "", "", "", '', $sortfield, $sortorder, 'left ');
  print_liste_field_titre("Amount", $_SERVER["PHP_SELF"], "", "", "", '', $sortfield, $sortorder, 'right ');
  print_liste_field_titre("", $_SERVER["PHP_SELF"], "", "", "", '', $sortfield, $sortorder, 'right ');  // For info links
  print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "", "", "", '', '', '', 'center ');
  print "</tr>\n";
 
  print "</tr>\n";
 
  try {
    if ($stripeacc) {
      $payout_all = \Stripe\Payout::all(array("limit" => $limit), array("stripe_account" => $stripeacc));
    } else {
      $payout_all = \Stripe\Payout::all(array("limit" => $limit));
    }
    '@phan-var-force \Stripe\Payout $payout_all';  // TStripeObject suggested, but is a template
 
    foreach ($payout_all->data as $payout) {
      '@phan-var-force \Stripe\Payout $payout';  // TStripeObject suggested, but is a template
      print '<tr class="oddeven">';
 
      // Ref
      if (!empty($stripeacc)) {
        $connect = $stripeacc.'/';
      } else {
        $connect = null;
      }
 
      $url = 'https://dashboard.stripe.com/'.$connect.'test/payouts/'.$payout->id;
      if ($servicestatus) {
        $url = 'https://dashboard.stripe.com/'.$connect.'payouts/'.$payout->id;
      }
 
      print '<td><a href="'.$url.'" target="_stripe">'.img_picto($langs->trans('ShowInStripe'), 'globe')." ".dolPrintHTML($payout->id)."</a></td>\n";
 
      // Date payment
      print '<td class="center">'.dol_print_date($payout->created, 'dayhour')."</td>\n";
      // Date payment
      print '<td class="center">'.dol_print_date($payout->arrival_date, 'dayhour')."</td>\n";
      // Type
      print '<td>'.dolPrintHTML($payout->description).'</td>';
      // Amount
      print '<td class="right"><span class="amount">'.price(($payout->amount) / 100, 0, '', 1, -1, -1, strtoupper($payout->currency))."</span></td>";
      // Info links
      print '<td>';
      print '<span class="small">';
      // TODO Add missing link to bank transfer for the num_chq = $payout->id
      print '</span>';
      print "</td>";
      // Status
      print '<td class="center">';
      if ($payout->status == 'paid') {
        print img_picto($langs->trans($payout->status), 'statut4');
      } elseif ($payout->status == 'pending') {
        print img_picto($langs->trans($payout->status), 'statut7');
      } elseif ($payout->status == 'in_transit') {
        print img_picto($langs->trans($payout->status), 'statut7');
      } elseif ($payout->status == 'failed') {
        print img_picto($langs->trans($payout->status), 'statut7');
      } elseif ($payout->status == 'canceled') {
        print img_picto($langs->trans($payout->status), 'statut8');
      }
      print '</td>';
      print "</tr>\n";
    }
  } catch (Exception $e) {
    print '<tr><td colspan="6">'.$e->getMessage().'</td></td>';
  }
  print "</table>";
  print '</div>';
  print '</form>';
}
 
// End of page
llxFooter();
$db->close();