';
$id=(isset ($_REQUEST['p_jrn']))?$_REQUEST['p_jrn']:-1;
echo JS_COMPUTE_DIRECT;
echo Acc_Reconciliation::$javascript;
// Show the predef operation
// Don't forget the p_jrn
echo '
';
echo '
';
echo "";
echo "
".JS_CALC_LINE."
";
echo '
';
echo '
Journal : '.$ledger->get_name().'
';
$sa=( isset ($_REQUEST['sa']))?$_REQUEST['sa']:'';
//======================================================================
// See the ledger listing
if ($sa == 'l' && $id != -1) {
// Check privilege
if ( $User->check_jrn($id) == 'X') {
NoAccess();
exit -1;
}
show_qw_menu(1);
echo '
';
$Ledger=new Acc_Ledger($cn,$id);
$href=basename($_SERVER['PHP_SELF']);
echo '';
echo '
';
exit();
exit(0);
}
//======================================================================
// User can write ?
// Write into the ledger
if ( $User->check_jrn($id) == 'X' ) {
echo "
";
exit -1;
}
if ( $User->check_jrn($id)=='W' ) {
if ( isset($_GET['show_form']) || isset($_POST['correct_it']) ) {
$array=$_POST;
$default_periode=$User->get_periode();
/* check if the ledger is closed */
if ( $ledger->is_closed($default_periode)==1) {
echo '
Desole mais cette periode est fermee pour ce journal
';
exit();
}
list($date,$devnull)=get_periode($cn,$default_periode);
$array['date']=$date;
show_qw_menu();
show_direct_form($cn,$ledger,$array);
exit();
}
// reload with a predefined operation
//
if ( isset ($_GET['use_opd'])) {
$op=new Pre_op_advanced($cn);
$p_post=null;
if ( isset($_REQUEST['pre_def']) && $_REQUEST['pre_def'] != ''){
$op->set_od_id($_REQUEST['pre_def']);
//$op->p_jrn=$id;
$p_post=$op->compute_array();
}
show_qw_menu();
show_direct_form($cn,$ledger,$p_post);
exit();
}
if ( isset($_POST['summary'])) {
try {
$ledger->verify($_POST );
} catch (AcException $e) {
echo '";
show_qw_menu();
show_direct_form($cn,$ledger,$_POST);
exit();
}
echo '
';
exit();
}
if ( isset($_POST['save_it' ])) {
$array=$_POST;
try {
$ledger->save($array);
echo '
Opération enregistrée '.$ledger->jr_internal.' Piece '.h($ledger->pj).'
';
if ( strcmp($ledger->pj,$_POST['e_pj']) != 0 ) {
echo '
Attention numéro pièce existante, elle a du être adaptée
';
}
echo widget::button_href('Autre opération dans ce journal',
"?".dossier::get().
'&show_form'.
'&p_action=quick_writing&p_jrn='.
$_REQUEST['p_jrn']);
} catch (AcException $e) {
echo '";
show_qw_menu();
show_direct_form($cn,$ledger,$_POST);
}
exit();
}
} // if check_jrn=='W'
else {
show_qw_menu();
}