Carte porte para metros en Prodcutos servicios CCP parametrosd nuevos
This commit is contained in:
rakcsle
@@ -1163,131 +1163,194 @@
|
||||
|
||||
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate">ClaveSector COFEPRIS:</label>
|
||||
<label class="col-md-4 truncate">Clave Sector COFEPRIS:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:DropDownList ID="DdlClaveSectorCOFEPRIS" runat="server" CssStyle="width: 100%;" Width="200px" DataTextField="SectorCOFEPRISClave" DataValueField="CveSectorCOFEPRIS" CssClass="form-control input-sm select2me"></asp:DropDownList>
|
||||
<asp:DropDownList ID="DdlClaveSectorCOFEPRIS" runat="server" CssStyle="width: 100%;" Width="200px" DataTextField="SectorCOFEPRISClave" DataValueField="CveSectorCOFEPRIS"
|
||||
CssClass="form-control input-sm select2me" OnSelectedIndexChanged="DdlClaveSectorCOFEPRIS_SelectedIndexChanged" AutoPostBack="true"></asp:DropDownList>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate">Clave Forma Farmaceutica:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:DropDownList ID="DdlClaveFormaFarmaceutica" runat="server" CssStyle="width: 100%;" Width="200px" DataTextField="FormaFarmaceuticaClave" DataValueField="CveFormaFarmaceutica" CssClass="form-control input-sm select2me"></asp:DropDownList>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVNombreIngredienteActivo" >
|
||||
<label class="col-md-4 truncate">Nombre Ingrediente Activo:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtNombreIngredienteActivo" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtNombreIngredienteActivo" runat="server" ControlToValidate="TxtNombreIngredienteActivo" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nombre Ingrediente Activo''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVNomQuimico" >
|
||||
<label class="col-md-4 truncate">Nom Quimico:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtNomQuimico" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtNomQuimico" runat="server" ControlToValidate="TxtNomQuimico" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nom Quimico''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVDenominacionGenerica" >
|
||||
<label class="col-md-4 truncate">Denominacion Generica:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtDenominacionGenerica" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtDenominacionGenerica" runat="server" ControlToValidate="TxtDenominacionGenerica" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Denominacion Generica''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVDenominacionDistintiva" >
|
||||
<label class="col-md-4 truncate">Denominacion Distintiva:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtDenominacionDistintiva" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtDenominacionDistintiva" runat="server" ControlToValidate="TxtDenominacionDistintiva" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Denominacion Distintiva''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVFabricante" >
|
||||
<label class="col-md-4 truncate">Fabricante:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtFabricante" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtFabricante" runat="server" ControlToValidate="TxtFabricante" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fabricante''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVClaveFormaFarmaceutica" >
|
||||
<label class="col-md-4 truncate">Clave Forma Farmaceutica:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:DropDownList ID="DdlClaveFormaFarmaceutica" runat="server" CssStyle="width: 100%;" Width="200px" DataTextField="FormaFarmaceuticaClave" DataValueField="CveFormaFarmaceutica" CssClass="form-control input-sm select2me"></asp:DropDownList>
|
||||
<asp:RequiredFieldValidator ID="RfvDdlClaveFormaFarmaceutica" runat="server" InitialValue="-1" ControlToValidate="DdlClaveFormaFarmaceutica" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Clave Forma Farmaceutica''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row" runat="server" visible="false" id="DVCondicionesTransporte" >
|
||||
<label class="col-md-4 truncate">Condiciones Transporte:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtCondicionesTransporte" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtCondicionesTransporte" runat="server" ControlToValidate="TxtCondicionesTransporte" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Condiciones Transporte''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVRegistroSanitarioAutorizacion" >
|
||||
<label class="col-md-4 truncate">Registro Sanitario Autorizacion:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtRegistroSanitarioAutorizacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtRegistroSanitarioAutorizacion" runat="server" ControlToValidate="TxtRegistroSanitarioAutorizacion" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Registro Sanitario Autorizacion''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate">Permiso Importacion:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtPermisoImportacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate">Folio Importacion VUCEM:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtFolioImportacionVUCEM" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVNumCAS" >
|
||||
<label class="col-md-4 truncate">Num CAS:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtNumCAS" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtNumCAS" runat="server" ControlToValidate="TxtNumCAS" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Num CAS''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<label class="col-md-4 truncate">Razon Social Emp Importacion:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtRazonSocialEmpImportacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVNumRegistroPlagCOFEPRIS" >
|
||||
<label class="col-md-4 truncate">Num Registro Plag COFEPRIS:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtNumRegistroPlagCOFEPRIS" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtNumRegistroPlagCOFEPRIS" runat="server" ControlToValidate="TxtNumRegistroPlagCOFEPRIS" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Num Registro Plag COFEPRIS''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVDatosFabricante" >
|
||||
<label class="col-md-4 truncate">Datos Fabricante:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtDatosFabricante" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtDatosFabricante" runat="server" ControlToValidate="TxtDatosFabricante" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Datos Fabricante''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVDatosFormulador" >
|
||||
<label class="col-md-4 truncate">Datos Formulador:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtDatosFormulador" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtDatosFormulador" runat="server" ControlToValidate="TxtDatosFormulador" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Datos Formulador''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVDatosMaquilador" >
|
||||
<label class="col-md-4 truncate">Datos Maquilador:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtDatosMaquilador" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtDatosMaquilador" runat="server" ControlToValidate="TxtDatosMaquilador" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Datos Maquilador''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="row" runat="server" visible="false" id="DVUsoAutorizado" >
|
||||
<label class="col-md-4 truncate">Uso Autorizado:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtUsoAutorizado" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtUsoAutorizado" runat="server" ControlToValidate="TxtUsoAutorizado" CssClass="help-block errorimput" Display="Dynamic"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Uso Autorizado''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<div class="row" runat="server" visible="true" id="DVPermisoImportacion" >
|
||||
<label class="col-md-4 truncate">Permiso Importacion:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtPermisoImportacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtPermisoImportacion" runat="server" ControlToValidate="TxtPermisoImportacion" CssClass="help-block errorimput" Display="Dynamic" Visible="false"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Permiso Importacion:''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
<div class="row" runat="server" visible="true" id="DVRazonSocialEmpImportacion" >
|
||||
<label class="col-md-4 truncate">Razon Social Emp Importacion:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtRazonSocialEmpImportacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtRazonSocialEmpImportacion" runat="server" ControlToValidate="TxtRazonSocialEmpImportacion" CssClass="help-block errorimput" Display="Dynamic" Visible="false"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Razon Social Emp Importacion''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
<div class="row" runat="server" visible="true" id="DVFolioImportacionVUCEM" >
|
||||
<label class="col-md-4 truncate">Folio Importacion VUCEM:</label>
|
||||
<div class="col-md-8">
|
||||
<asp:TextBox ID="TxtFolioImportacionVUCEM" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtFolioImportacionVUCEM" runat="server" ControlToValidate="TxtFolioImportacionVUCEM" CssClass="help-block errorimput" Display="Dynamic" Visible="false"
|
||||
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Folio Importacion VUCEM''</b> es necesario, por favor ingréselo."
|
||||
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
|
||||
@@ -1,9 +1,11 @@
|
||||
Option Explicit On
|
||||
Option Strict On
|
||||
|
||||
Imports System.Activities.Expressions
|
||||
Imports System.Data
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports ADSNetLibrary.SIGAPI.Models.RH.Response
|
||||
Imports Extensiones
|
||||
Imports ZXing
|
||||
|
||||
@@ -3314,6 +3316,11 @@ Partial Class ProductosyServicios
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
If ValidaMaterialPeligrosoMensaje Then
|
||||
|
||||
End If
|
||||
|
||||
ObjGrales.Dispose()
|
||||
|
||||
If ValidaMaterialPeligrosoMensaje Then
|
||||
@@ -3345,23 +3352,26 @@ Partial Class ProductosyServicios
|
||||
|
||||
DdlClaveSectorCOFEPRIS.SelectedValueExist(-1)
|
||||
DdlClaveFormaFarmaceutica.SelectedValueExist(-1)
|
||||
TxtDimensiones.Text = ""
|
||||
TxtPesoKg.Text = ""
|
||||
'TxtNombreIngredienteActivo.Text = ""
|
||||
'TxtNomQuimico.Text = ""
|
||||
'TxtDenominacionGenerica.Text = ""
|
||||
'TxtDenominacionDistintiva.Text = ""
|
||||
'TxtFabricante.Text = ""
|
||||
'TxtCondicionesTransporte.Text = ""
|
||||
'TxtRegistroSanitarioAutorizacion.Text = ""
|
||||
'TxtPermisoImportacion.Text = ""
|
||||
'TxtFolioImportacionVUCEM.Text = ""
|
||||
'TxtNumCAS.Text = ""
|
||||
'TxtRazonSocialEmpImportacion.Text = ""
|
||||
'TxtNumRegistroPlagCOFEPRIS.Text = ""
|
||||
'TxtDatosFabricante.Text = ""
|
||||
'TxtDatosFormulador.Text = ""
|
||||
'TxtDatosMaquilador.Text = ""
|
||||
'TxtUsoAutorizado.Text = ""
|
||||
|
||||
TxtNombreIngredienteActivo.Text = ""
|
||||
TxtNomQuimico.Text = ""
|
||||
TxtDenominacionGenerica.Text = ""
|
||||
TxtDenominacionDistintiva.Text = ""
|
||||
TxtFabricante.Text = ""
|
||||
TxtCondicionesTransporte.Text = ""
|
||||
TxtRegistroSanitarioAutorizacion.Text = ""
|
||||
TxtPermisoImportacion.Text = ""
|
||||
TxtFolioImportacionVUCEM.Text = ""
|
||||
TxtNumCAS.Text = ""
|
||||
TxtRazonSocialEmpImportacion.Text = ""
|
||||
TxtNumRegistroPlagCOFEPRIS.Text = ""
|
||||
TxtDatosFabricante.Text = ""
|
||||
TxtDatosFormulador.Text = ""
|
||||
TxtDatosMaquilador.Text = ""
|
||||
TxtUsoAutorizado.Text = ""
|
||||
MostrarOcultarControlesCCP(LimpiarControles:=True)
|
||||
|
||||
UpCartaPorte.Update()
|
||||
|
||||
@@ -3413,43 +3423,147 @@ Partial Class ProductosyServicios
|
||||
TxtDatosMaquilador.Text = ObjPS.DtResultados.Rows(0)("DatosMaquilador").ToString
|
||||
TxtUsoAutorizado.Text = ObjPS.DtResultados.Rows(0)("UsoAutorizado").ToString
|
||||
|
||||
MostrarOcultarControlesCCP(LimpiarControles:=False)
|
||||
|
||||
End If
|
||||
|
||||
UpCartaPorte.Update()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub MostrarOcultarControlesCCP(Optional LimpiarControles As Boolean = False)
|
||||
DVClaveFormaFarmaceutica.Visible = False
|
||||
DVNombreIngredienteActivo.Visible = False
|
||||
DVNomQuimico.Visible = False
|
||||
DVDenominacionGenerica.Visible = False
|
||||
DVDenominacionDistintiva.Visible = False
|
||||
DVFabricante.Visible = False
|
||||
DVCondicionesTransporte.Visible = False
|
||||
DVRegistroSanitarioAutorizacion.Visible = False
|
||||
'DVPermisoImportacion.Visible = False '--------------
|
||||
'DVFolioImportacionVUCEM.Visible = False '-----------
|
||||
DVNumCAS.Visible = False
|
||||
'DVRazonSocialEmpImportacion.Visible = False '---------
|
||||
DVNumRegistroPlagCOFEPRIS.Visible = False
|
||||
DVDatosFabricante.Visible = False
|
||||
DVDatosFormulador.Visible = False
|
||||
DVDatosMaquilador.Visible = False
|
||||
DVUsoAutorizado.Visible = False
|
||||
|
||||
If LimpiarControles Then
|
||||
DdlClaveFormaFarmaceutica.SelectedValueExist(-1)
|
||||
TxtNombreIngredienteActivo.Text = ""
|
||||
TxtNomQuimico.Text = ""
|
||||
TxtDenominacionGenerica.Text = ""
|
||||
TxtDenominacionDistintiva.Text = ""
|
||||
TxtFabricante.Text = ""
|
||||
TxtCondicionesTransporte.Text = ""
|
||||
TxtRegistroSanitarioAutorizacion.Text = ""
|
||||
TxtPermisoImportacion.Text = ""
|
||||
TxtFolioImportacionVUCEM.Text = ""
|
||||
TxtNumCAS.Text = ""
|
||||
TxtRazonSocialEmpImportacion.Text = ""
|
||||
TxtNumRegistroPlagCOFEPRIS.Text = ""
|
||||
TxtDatosFabricante.Text = ""
|
||||
TxtDatosFormulador.Text = ""
|
||||
TxtDatosMaquilador.Text = ""
|
||||
TxtUsoAutorizado.Text = ""
|
||||
End If
|
||||
|
||||
|
||||
If DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 1 Then ' 1 - Medicamento
|
||||
DVDenominacionGenerica.Visible = True
|
||||
DVDenominacionDistintiva.Visible = True
|
||||
DVFabricante.Visible = True
|
||||
DVClaveFormaFarmaceutica.Visible = True
|
||||
DVCondicionesTransporte.Visible = True
|
||||
DVRegistroSanitarioAutorizacion.Visible = True
|
||||
ElseIf DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 2 Then '2 - Precursores y químicos de uso dual
|
||||
DVNombreIngredienteActivo.Visible = True
|
||||
DVNomQuimico.Visible = True
|
||||
DVFabricante.Visible = True
|
||||
DVClaveFormaFarmaceutica.Visible = True
|
||||
DVCondicionesTransporte.Visible = True
|
||||
ElseIf DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 3 Then ' 3 - Psicotrópicos y estupefacientes
|
||||
DVDenominacionGenerica.Visible = True
|
||||
DVDenominacionDistintiva.Visible = True
|
||||
DVFabricante.Visible = True
|
||||
DVClaveFormaFarmaceutica.Visible = True
|
||||
DVCondicionesTransporte.Visible = True
|
||||
DVRegistroSanitarioAutorizacion.Visible = True
|
||||
ElseIf DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 4 Then ' 4 - Sustancias tóxicas
|
||||
DVNomQuimico.Visible = True
|
||||
DVNumCAS.Visible = True
|
||||
ElseIf DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 5 Then ' 5 - Plaguicidas y fertilizantes
|
||||
DVNumRegistroPlagCOFEPRIS.Visible = True
|
||||
DVDatosFabricante.Visible = True
|
||||
DVDatosFormulador.Visible = True
|
||||
DVDatosMaquilador.Visible = True
|
||||
DVUsoAutorizado.Visible = True
|
||||
End If
|
||||
|
||||
|
||||
UpCartaPorte.Update()
|
||||
End Sub
|
||||
|
||||
|
||||
Private Function GuardaDatosCartPorte(ByRef transaccionSQL As SqlTransaction) As Boolean
|
||||
Dim Respuesta As Boolean = True
|
||||
Dim CamposStringCCP As String = ""
|
||||
|
||||
If DdlMaterialPeligroso.SelectedValue.ToEntero > 0 Or DdlEmbalaje.SelectedValue.ToEntero > 0 Or DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero > 0 Or DdlClaveFormaFarmaceutica.SelectedValue.ToEntero > 0 Then
|
||||
CamposStringCCP = CamposStringCCP + TxtNombreIngredienteActivo.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtNomQuimico.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtDenominacionGenerica.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtDenominacionDistintiva.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtFabricante.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtCondicionesTransporte.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtRegistroSanitarioAutorizacion.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtPermisoImportacion.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtFolioImportacionVUCEM.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtNumCAS.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtRazonSocialEmpImportacion.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtNumRegistroPlagCOFEPRIS.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtDatosFabricante.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtDatosFormulador.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtDatosMaquilador.Text.Trim()
|
||||
CamposStringCCP = CamposStringCCP + TxtUsoAutorizado.Text.Trim()
|
||||
|
||||
If CamposStringCCP.Length > 0 And (DdlMaterialPeligroso.SelectedValue.ToEntero <= 0 Or DdlEmbalaje.SelectedValue.ToEntero <= 0 Or TxtDimensiones.Text = "" Or TxtPesoKg.Text = "") Then
|
||||
Alert("Para guardar los datos de carta porte los campos Material Peligroso, Embalaje, Peso en Kg y Dimensiones son requeridos", TipoMensaje.MsgAdvertencia)
|
||||
Respuesta = False
|
||||
Else
|
||||
|
||||
'If DdlMaterialPeligroso.SelectedValue.ToEntero > 0 And DdlEmbalaje.SelectedValue.ToEntero > 0 And DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero > 0 And CamposStringCCP.Length > 0 Then
|
||||
Dim ObjPS As New ClsProductosServicios(transaccionSQL)
|
||||
|
||||
If Not ObjPS.AddUpdateProductosServiciosComplementos(CvePS, TxtPesoKg.Text.ToDecimal, DdlMaterialPeligroso.SelectedValue.ToEntero, DdlEmbalaje.SelectedValue.ToEntero, TxtDimensiones.Text, DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero,
|
||||
TxtNombreIngredienteActivo.Text.Trim, TxtNomQuimico.Text.Trim, TxtDenominacionGenerica.Text.Trim, TxtDenominacionDistintiva.Text.Trim, TxtFabricante.Text.Trim, DdlClaveFormaFarmaceutica.SelectedValue.ToEntero, TxtCondicionesTransporte.Text.Trim,
|
||||
TxtRegistroSanitarioAutorizacion.Text.Trim, TxtPermisoImportacion.Text.Trim, TxtFolioImportacionVUCEM.Text.Trim, TxtNumCAS.Text.Trim, TxtRazonSocialEmpImportacion.Text, TxtNumRegistroPlagCOFEPRIS.Text.Trim, TxtDatosFabricante.Text.Trim,
|
||||
TxtDatosFormulador.Text.Trim, TxtDatosMaquilador.Text.Trim, TxtUsoAutorizado.Text) Then
|
||||
Respuesta = False
|
||||
End If
|
||||
' End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Return Respuesta
|
||||
|
||||
End Function
|
||||
|
||||
' Private Function validaGuardadoCCP()
|
||||
|
||||
|
||||
' TxtPesoKg.Text.Trim, DdlMaterialPeligroso.SelectedValue, DdlEmbalaje.SelectedValue, TxtDimensiones.Text, DdlClaveSectorCOFEPRIS.SelectedValue,
|
||||
'TxtNombreIngredienteActivo.Text.Trim, TxtNomQuimico.Text.Trim, TxtDenominacionGenerica.Text.Trim, TxtDenominacionDistintiva.Text.Trim, TxtFabricante.Text.Trim, DdlClaveFormaFarmaceutica.SelectedValue.ToEntero, TxtCondicionesTransporte.Text.Trim,
|
||||
'TxtRegistroSanitarioAutorizacion.Text.Trim, TxtPermisoImportacion.Text.Trim, TxtFolioImportacionVUCEM.Text.Trim, TxtNumCAS.Text.Trim, TxtRazonSocialEmpImportacion.Text, TxtNumRegistroPlagCOFEPRIS.Text.Trim, TxtDatosFabricante.Text.Trim,
|
||||
'TxtDatosFormulador.Text.Trim, TxtDatosMaquilador.Text.Trim, TxtUsoAutorizado.Text
|
||||
|
||||
Protected Sub DdlClaveSectorCOFEPRIS_SelectedIndexChanged(sender As Object, e As EventArgs)
|
||||
|
||||
MostrarOcultarControlesCCP(LimpiarControles:=True)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
' Return False
|
||||
|
||||
' End Function
|
||||
|
||||
End Class
|
||||
|
||||
Reference in New Issue
Block a user