";
$span_mod='
Modifie';
$span_del='
'.
' delete';
$span_id='
'.$l_line['f_id']."";
if ( $i %2 == 0 )
$div='
';
echo $div.$span_del.' '.' '.' '.' '.' '.' '.
$span_mod." "." "." ".$span_id." "." "." ".$l_line['f_label']."
";
}
echo '
';
}
/* function GetNextFiche
* Purpose : Crée le poste suivant pour une fiche en fonction
* de la classe de base (fichedef(fd_class_base))
*
* parm :
* - p_cn connexion
* - p_base
* gen :
* -
* return:
* -
*
*/
function GetNextFiche($p_cn,$p_base) {
$Res=ExecSql($p_cn,"select max(pcm_val) as maxcode from tmp_pcmn where pcm_val_parent = $p_base");
$Max=pg_NumRows($Res);
echo_debug("$Max=pg_NumRows");
$l_line=pg_fetch_array($Res,0);
$ret=$l_line['maxcode'];
if ( $ret == "" ) {
$ret=sprintf("%d%04d",$p_base,0);
return $ret+1;
}
echo_debug("ret $ret");
return $ret+1;
}
/* function
* Purpose :
*
* parm :
* -
* gen :
* -
* return:
* -
*
*/
function GetDataFiche($p_cn,$p_fiche_id) {
}
/* function ViewFicheDetail
* Purpose : Montre le detail d'une fiche
* et ajoute les lignes manquantes
* dans le cas où le modèle à changer
*
* parm :
* - p_cn
* - id de la fiche fiche(f_id)
* gen :
* -
* return:
* -
*
*/
function ViewFicheDetail($p_cn,$p_id) {
$sql="insert into isupp (is_f_id,is_isd_id) select".
" '".$p_id."',isd_id from isupp_def ".
" where isd_id not in ".
"(select is_isd_id from isupp where is_f_id=".$p_id.") ".
" and isd_fd_id=(select distinct f_fd_id from fiche ".
" where f_id=".$p_id.")";
$Res=ExecSql($p_cn,$sql);
EncodeFiche ($p_cn,$p_id,1);
}
/* function UpdateFiche
* Purpose : Met a jour une fiche
* change dans le plan comptable, fiche,et isupp
*
* parm :
* - p_cn
* - p_array
* gen :
* -
* return:
* -
*
*/
function UpdateFiche($p_cn,$p_array) {
foreach ( $p_array as $key=> $element) {
echo_debug("$key => $element");
${"$key"}=$element;
}
$sql=sprintf("update tmp_pcmn set pcm_lib='%s' where pcm_val=%s",
$f_label,
$f_id);
echo_debug($sql);
$Res=ExecSql($p_cn,$sql);
$sql=sprintf("update fiche set f_label='%s' where f_id=%s",
$f_label,
$f_id);
echo_debug($sql);
$Res=ExecSql($p_cn,$sql);
for ( $i =0 ; $i < $max ; $i++) {
$sql=sprintf("update isupp set is_value='%s' where is_id=%d",
${"nom$i"},
${"is_id$i"});
echo_debug($sql);
$Res=ExecSql($p_cn,$sql);
}
}
/* function EncodeModele
* Purpose :
*
* parm :
* -
* gen :
* -
* return:
* -
*
*/
function EncodeModele($p_js)
{
echo '
Ajout d\'un modèle
';
echo '
';
}
/* function
* Purpose :
*
* parm :
* -
* gen :
* -
* return:
* -
*
*/
function DefModele ($p_js,$p_array=null,$p_ligne=1)
{
echo_debug("DefModele ($p_array,$p_ligne=1) ");
for ($i=0; $i < $p_ligne; $i++) {
${"p_LABEL$i"}="";
${"p_inform$i"}="";
${"p_isd_id$i"}="";
}
if ($p_array != null) {
foreach ( $p_array as $key => $element){
${"p_$key"}=$element;
echo_debug ("p_$key $element");
}//foreach
}else {
$p_nom_mod="";
$p_class_base="";
}
echo '