1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234
|
<%@ Page Language="c#" %>
<%@ Register TagPrefix="ChampLib" TagName="ChampLib" Src="../controles/SaisieLibel.ascx" %>
<%@ Register TagPrefix="eSNC" Namespace="CommonControls" Assembly="CommonControls" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="Oracle.DataAccess.Client" %>
<%@ import Namespace="eSNCOracle" %>
<script runat="server">
eSNCOracleObj eSNCCon = new eSNCOracleObj();
Boolean Droit;
public String qsFoncCode,qsSfamCode,qsFamiCode;
int qsAttrId;
protected void Page_Init(Object Src, EventArgs e) {
qsFoncCode = Convert.ToString(Request.QueryString["qsFoncCode"]);
qsSfamCode = Convert.ToString(Request.QueryString["qsSfamCode"]);
qsFamiCode = Convert.ToString(Request.QueryString["qsFamiCode"]);
Droit = eSNCCon.GET_DROIT_UTDR("ATTR_TEC",1);
eSNCCon.cmd.CommandType = CommandType.Text;
eSNCCon.cmd.CommandText = "select FONC_FAMI_CODE,mach2.GET_FAMI_LIB(FONC_FAMI_CODE),FONC_SFAM_CODE,mach2.GET_SFAM_LIB(FONC_FAMI_CODE,FONC_SFAM_CODE),FONC_CODE,FONC_LIBELLE"+
" from FONC where FONC_SFAM_CODE = '"+qsSfamCode+"' and FONC_FAMI_CODE = '"+qsFamiCode+"' and FONC_CODE = '"+qsFoncCode+"' ";
OracleDataReader myReader = eSNCCon.cmd.ExecuteReader();
myReader.Read();
FAMI_CODE.Text = myReader.GetString(0);
FAMI_LIBELLE.Text = myReader.GetString(1);
SFAM_CODE.Text = myReader.GetString(0)+myReader.GetString(2);
SFAM_LIBELLE.Text = myReader.GetString(3);
FONC_CODE.Text = myReader.GetString(0)+myReader.GetString(2)+myReader.GetString(4);
FONC_LIBELLE.Text = myReader.GetString(5);
myReader.Close();
InitPage.Titre = "Pose des attributs techniques<br>sur les fonctions MACH2";
}
public void Precedente(Object sender, CommandEventArgs e) {
eSNCCon.cmd.CommandType = CommandType.Text;
eSNCCon.cmd.CommandText ="select max(FONC_FAMI_CODE||FONC_SFAM_CODE||FONC_CODE) "+
" from FONC where FONC_FAMI_CODE||FONC_SFAM_CODE||FONC_CODE < '"+qsFamiCode+qsSfamCode+qsFoncCode+"' and FONC_QUALITE <> 200 ";
OracleDataReader myReader = eSNCCon.cmd.ExecuteReader();
myReader.Read();
if (!(myReader.IsDBNull(0))){
qsFoncCode = myReader.GetString(0).Substring(4,2);
qsSfamCode = myReader.GetString(0).Substring(2,2);
qsFamiCode = myReader.GetString(0).Substring(0,2);
}
myReader.Close();
Response.Redirect("ATFOBrow.aspx?qsFoncCode="+qsFoncCode+"&qsSfamCode="+qsSfamCode+"&qsFamiCode="+qsFamiCode);
}
public void Suivante(Object sender, CommandEventArgs e) {
eSNCCon.cmd.CommandType = CommandType.Text;
eSNCCon.cmd.CommandText ="select min(FONC_FAMI_CODE||FONC_SFAM_CODE||FONC_CODE) "+
" from FONC where FONC_FAMI_CODE||FONC_SFAM_CODE||FONC_CODE > '"+qsFamiCode+qsSfamCode+qsFoncCode+"' and FONC_QUALITE <> 200 ";
OracleDataReader myReader = eSNCCon.cmd.ExecuteReader();
myReader.Read();
if (!(myReader.IsDBNull(0))){
qsFoncCode = myReader.GetString(0).Substring(4,2);
qsSfamCode = myReader.GetString(0).Substring(2,2);
qsFamiCode = myReader.GetString(0).Substring(0,2);
}
myReader.Close();
Response.Redirect("ATFOBrow.aspx?qsFoncCode="+qsFoncCode+"&qsSfamCode="+qsSfamCode+"&qsFamiCode="+qsFamiCode);
}
protected void Page_Load(Object Src, EventArgs e) {
AffichList(Src,new CommandEventArgs("",""));
}
public void AffichList(Object sender, CommandEventArgs e) {
String sQuery = "SELECT ATTR_ID ID,ATTR_LIBC ATTRIBUT,decode(ATTR_TYPE,0,'Liste de valeur',1,ATTRIBUTS.GET_UNIT_LIB(ATTR_ID)) TYP,DECODE(ATFO_DISCRIM,0,'N',1,'O') DISCRIM,DECODE(ATFO_STD,0,'N',1,'O') STD,"+
" ATTRIBUTS.GET_ATFO_SYM(ATFO_FAMI_CODE,ATFO_SFAM_CODE,ATFO_FONC_CODE,ATTR_ID) SYM,ATTRIBUTS.GET_NB_VALG(ATTR_ID,ATFO_FAMI_CODE,ATFO_SFAM_CODE,ATFO_FONC_CODE) NB FROM ATTR,ATFO "+
" WHERE ATFO_FONC_CODE = "+qsFoncCode+" and ATFO_SFAM_CODE = "+qsSfamCode+" and ATFO_FAMI_CODE = "+qsFamiCode+" and ATFO_ATTR_ID = ATTR_ID order by ATTRIBUT";
ATTRIBUT.DataSource = eSNCCon.NoPagingMyList(sQuery);
try {
ATTRIBUT.DataBind();
} catch (Exception ex ) {
Response.Write("erreur");
}
}
protected void Page_Unload(Object Src, EventArgs e) {
eSNCCon.dispose();
}
void ValidSupprimer (object source, ServerValidateEventArgs args) {
int iCompt = 0;
eSNCCon.cmd.CommandType = CommandType.Text;
eSNCCon.cmd.CommandText = "select count(*) as nb from RERA where RERA_ATTR_ID = "+qsAttrId+" and RERA_FONC_CODE = "+qsFoncCode+" and RERA_SFAM_CODE = "+qsSfamCode+" and RERA_FAMI_CODE = "+qsFamiCode;
OracleDataReader myReader = eSNCCon.cmd.ExecuteReader();
myReader.Read();
if (myReader.GetDecimal(0) != 0)
iCompt = Convert.ToInt32(myReader.GetDecimal(0));
myReader.Close();
eSNCCon.cmd.CommandText = "select count(*) as nb from REVA where REVA_ATTR_ID = "+qsAttrId+" and REVA_FONC_CODE = "+qsFoncCode+" and REVA_SFAM_CODE = "+qsSfamCode+" and REVA_FAMI_CODE = "+qsFamiCode;
myReader = eSNCCon.cmd.ExecuteReader();
myReader.Read();
if (myReader.GetDecimal(0) != 0)
iCompt += Convert.ToInt32(myReader.GetDecimal(0));
myReader.Close();
if (iCompt != 0){
ValidatorSupprimer.ErrorMessage = iCompt+" produits ont une valeur pour cet attribut";
args.IsValid = false;
}
else
args.IsValid = true;
}
public void Supprimer(Object sender, CommandEventArgs e) {
qsAttrId = Convert.ToInt32(e.CommandName);
ValidatorSupprimer.Enabled = true;
Page.Validate();
if (Page.IsValid) {
eSNCCon.cmd.CommandText = "ATTRIBUTS.SUPP_ATFO";
eSNCCon.cmd.CommandType = CommandType.StoredProcedure;
eSNCCon.cmd.Parameters.Add("sAttrId", OracleDbType.Int32,ParameterDirection.Input);
eSNCCon.cmd.Parameters.Add("sFamiCode", OracleDbType.Varchar2,ParameterDirection.Input);
eSNCCon.cmd.Parameters.Add("sSfamCode", OracleDbType.Varchar2,ParameterDirection.Input);
eSNCCon.cmd.Parameters.Add("sFoncCode", OracleDbType.Varchar2,ParameterDirection.Input);
eSNCCon.cmd.Parameters["sFamiCode"].Size=2;
eSNCCon.cmd.Parameters["sSfamCode"].Size=2;
eSNCCon.cmd.Parameters["sFoncCode"].Size=2;
eSNCCon.cmd.Parameters["sAttrId"].Value = qsAttrId;
eSNCCon.cmd.Parameters["sFoncCode"].Value = qsFoncCode;
eSNCCon.cmd.Parameters["sSfamCode"].Value = qsSfamCode;
eSNCCon.cmd.Parameters["sFamiCode"].Value = qsFamiCode;
eSNCCon.cmd.ExecuteNonQuery();
eSNCCon.cmd.Parameters.Clear();
Response.Redirect("ATFOBrow.aspx?qsFoncCode="+qsFoncCode+"&qsSfamCode="+qsSfamCode+"&qsFamiCode="+qsFamiCode);
}
}
public string VisuCol(int sId,int sNb) {
string valeur = "";
if(sNb != 0)
valeur = Convert.ToString(sNb);
if (Droit)
return "<td align=\"center\" style=\"{cursor:hand}\" onclick=\"Visu('"+sId+"')\">"+valeur+"</td>";
else
return "<td align=\"center\">"+valeur+"</td>";
}
public string VisuHand(int sId,string sVal,string sAlign) {
string align = "";
if (sAlign != "")
align = "align=\""+sAlign+"\"";
if (Droit)
return "<td "+align+" style=\"{cursor:hand}\" onclick=\"Visu('"+sId+"')\">"+sVal+"</td>";
else
return "<td "+align+">"+sVal+"</td>";
}
</script>
<html>
<head>
<eSNC:InitPage id="InitPage" runat="server">
window.parent.frame2.InitBouton(1,'Retour','attributs/FONCBrow.aspx');
window.parent.frame2.InitBoutonPress(2,'Fonction Préc.','Prec','');
window.parent.frame2.InitBoutonPress(3,'Fonction Suiv.','Suiv','');
</eSNC:InitPage>
<script LANGUAGE='javascript'>
function Ajouter(){
window.parent.frame2.TraitementF4()
window.location = 'ATFOAjout.aspx?qsFoncCode=<%=qsFoncCode%>&qsSfamCode=<%=qsSfamCode%>&qsFamiCode=<%=qsFamiCode%>'
}
function Visu(sId){
window.parent.frame2.TraitementF4()
window.location = 'ATFOModif.aspx?qsFoncCode=<%=qsFoncCode%>&qsSfamCode=<%=qsSfamCode%>&qsFamiCode=<%=qsFamiCode%>&qsAttrId='+sId
}
</script>
</head>
<body>
<form method="post" id="frmId" runat="server">
<table cellpadding="0" cellspacing="2" border="0" runat="server" >
<tr height="20">
<td width="100">Famille</td>
<td width="75"><asp:Label id="FAMI_CODE" runat="server"/></td>
<td><asp:Label id="FAMI_LIBELLE" runat="server"/></td>
</tr>
<tr height="20">
<td>Ss-Famille</td>
<td><asp:Label id="SFAM_CODE" runat="server"/></td>
<td><asp:Label id="SFAM_LIBELLE" runat="server"/></td>
</tr>
<tr height="20">
<td>Fonction</td>
<td><asp:Label id="FONC_CODE" runat="server"/></td>
<td><asp:Label id="FONC_LIBELLE" runat="server"/></td>
</tr>
</table>
<table cellpadding="0" cellspacing="2" border="0" width="400" runat="server">
<tr height="30">
<td>
<eSNC:eSNCButton id="Prec" ButtonId="Prec" OnClick="Precedente" EstVisible="false" runat="server"/>
<eSNC:eSNCButton id="Suiv" ButtonId="Suiv" OnClick="Suivante" EstVisible="false" runat="server"/>
<asp:CustomValidator id="ValidatorSupprimer" CssClass="TexteRouge" OnServerValidate="ValidSupprimer" Enabled="false" Display="None" Text="" EnableClientScript="true" ErrorMessage="" runat="server"/>
<asp:ValidationSummary CssClass="TexteRouge" DisplayMode="BulletList" EnableClientScript="true" ShowMessageBox="false" ShowSummary="true" runat="server"/>
</td>
</tr>
</table>
<table cellpadding="0" cellspacing="2" border="0">
<tr height='30'>
<td width=100 class='Titre1'>Attribut</td>
<td width=75 class='Titre0'>Type</td>
<td width=75 class='Titre1'>Std</td>
<td width=75 class='Titre0'>Dis.</td>
<td width=75 class='Titre1'>Unité</td>
<td width=75 class='Titre0'>Nb Val.</td>
<%if (Droit) {%><td width=30 class='Titre1'><a href="javascript:Ajouter()"><img border="0" onmouseover="javascript:this.src='../images/plus2.gif';" onmouseout="javascript:this.src='../images/plus.gif';" src='../images/plus.gif' WIDTH="14" HEIGHT="14"/></a></td><%}%>
</tr>
<asp:Repeater id="ATTRIBUT" EnableViewState="False" runat="server">
<ItemTemplate>
<tr class="L<%# Container.ItemIndex % 2 %>">
<%# VisuHand(Convert.ToInt32(DataBinder.Eval(Container.DataItem,"ID").ToString()),DataBinder.Eval(Container.DataItem,"ATTRIBUT").ToString(),"") %>
<%# VisuHand(Convert.ToInt32(DataBinder.Eval(Container.DataItem,"ID").ToString()),DataBinder.Eval(Container.DataItem,"TYP").ToString(),"") %>
<%# VisuHand(Convert.ToInt32(DataBinder.Eval(Container.DataItem,"ID").ToString()),DataBinder.Eval(Container.DataItem,"STD").ToString(),"center") %>
<%# VisuHand(Convert.ToInt32(DataBinder.Eval(Container.DataItem,"ID").ToString()),DataBinder.Eval(Container.DataItem,"DISCRIM").ToString(),"center") %>
<%# VisuHand(Convert.ToInt32(DataBinder.Eval(Container.DataItem,"ID").ToString()),DataBinder.Eval(Container.DataItem,"SYM").ToString(),"center") %>
<%# VisuCol(Convert.ToInt32(DataBinder.Eval(Container.DataItem,"ID").ToString()),Convert.ToInt32(DataBinder.Eval(Container.DataItem,"NB").ToString()))%>
<%if (Droit) {%><td align="center"><eSNC:eSNCImgButton id="TrSupp" OnClick="Supprimer" Visible="true" ButtonId="TrSupp" Argument='<%# DataBinder.Eval(Container.DataItem,"ID") %>' Source="moins" runat="server"/></td><%}%>
</tr>
</ItemTemplate>
<FooterTemplate>
<%if (ATTRIBUT.Items.Count == 0) {%>
<tr width=30><td colspan="100%" align=center>Auncun attribut n'est associé à cette fonction</td></tr>
<%}%>
</FooterTemplate>
</asp:Repeater>
</table>
</form>
</body>
</html> |
Partager