admingit/altocompta
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix bug when deleting a "poste"

Browse source
This commit is contained in:
sparkyx 2005-03-31 20:05:12 +00:00
parent 632ba7e474
commit 968fd858ed
1 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
html/pcmn_update.php
View file

@ -63,21 +63,21 @@ echo '</div>';
echo '<DIV CLASS="u_redcontent">';
/* Analyse ce qui est demandé */
/* Effacement d'une ligne */
if (isset ($action)) {
if ( $action=="del" ) {
if ( isset ($l) ) {
if (isset ($_GET['action'])) {
if ( $_GET['action']=="del" ) {
if ( isset ($_GET['l']) ) {
/* Ligne a enfant*/
$R=ExecSql($cn,"select pcm_val from tmp_pcmn where pcm_val_parent=$l");
$R=ExecSql($cn,"select pcm_val from tmp_pcmn where pcm_val_parent=".$_GET['l']);
if ( pg_NumRows($R) != 0 ) {
echo "<SCRIPT> alert(\"Ne peut pas effacer le poste: d'autres postes en dépendent\");</SCRIPT>";
} else {
/* Vérifier que le poste n'est pas utilisé qq part dans les journaux */
$Res=ExecSql($cn,"select * from jrnx where j_poste=$l");
$Res=ExecSql($cn,"select * from jrnx where j_poste=".$_GET['l']);
if ( pg_NumRows($R) != 0 ) {
echo "<SCRIPT> alert(\"Ne peut pas effacer le poste: il est utilisé dans les journaux\");</SCRIPT>";
}
else {
$Del=ExecSql($cn,"delete from tmp_pcmn where pcm_val=$l");
$Del=ExecSql($cn,"delete from tmp_pcmn where pcm_val=".$_GET['l']);
} // if pg_NumRows
} // if pg_NumRows
} // isset ($l)