title=_('Choix TVA'); $pop_tva->value=''; echo $pop_tva->input(); $gDossier=dossier::id(); $p_action=(isset ($_REQUEST['p_action']))?$_REQUEST['p_action']:''; echo ICard::ipopup('ipopcard'); echo ICard::ipopup('ipop_newcard'); echo IPoste::ipopup('ipop_account'); $search_card=new IPopup('ipop_card'); $search_card->title=_('Recherche de fiche'); $search_card->value=''; echo $search_card->input(); $cn=new Database(dossier::id()); $menu_action="?p_action=fin&".dossier::get(); $menu=array( array($menu_action.'&sa=n',_('Nouvel extrait'),_('Encodage d\'un nouvel extrait'),1), array($menu_action.'&sa=l',_('Liste'),_('Liste opération bancaire'),2), array($menu_action.'&sa=s',_('Solde'),_('Solde des comptes'),3), array($menu_action.'&sa=r',_('Rapprochements banquaires'),_('Rapprochements banquaires'),4), array('?p_action=impress&type=jrn&'.dossier::get(),_('Impression'),_('Impression')) ); $sa=(isset($_REQUEST['sa']))?$_REQUEST['sa']:-1; switch ($sa) { case 'n': $def=1; break; case 'l': $def=2; break; case 's': $def=3; break; case 'r': $def=4; break; default: $def=1; } echo '
'; $href=basename($_SERVER['PHP_SELF']); $Ledger=new Acc_Ledger_Fin($cn,0); //-------------------------------------------------------------------------------- // Encode a new financial operation //-------------------------------------------------------------------------------- if ( $def == 1 ) { $href=basename($_SERVER['PHP_SELF']); if ( isset($_REQUEST['p_jrn'])) $Ledger->id=$_REQUEST['p_jrn']; else { $def_ledger=$Ledger->get_first('fin'); $Ledger->id=$def_ledger['jrn_def_id']; } $jrn_priv=$User->get_ledger_access($Ledger->id); // Check privilege if ( isset($_REQUEST['p_jrn']) && ( $jrn_priv == 'X')) { NoAccess(); exit -1; } //---------------------------------------- // Confirm the operations //---------------------------------------- if ( isset($_POST['save'])) { try { $Ledger->verify($_POST); } catch (Exception $e) { alert($e->getMessage()); $correct=1; } if ( ! isset ($correct )) { echo '