AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Browse Source
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2022-01-27 07:23:07 -07:00
parent d840951922
commit cc3fd4e29d
5 changed files with 485 additions and 418 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Documentacion/TableroMaterialidad.aspx
View File

@@ -167,7 +167,8 @@
<asp:Repeater ID="RptDatos" runat="server" OnItemDataBound="RptDatos_ItemDataBound">
<ItemTemplate>
<tr>
<td><%# DataBinder.Eval(Container.DataItem, "NombreComercial") %></td>
<td><%# string.Format("<a href='/Ventas/Clientes.aspx?CveCliente={0}' target='_blank'>{1}</a>",DataBinder.Eval(Container.DataItem, "CveCliente"),DataBinder.Eval(Container.DataItem, "NombreComercial")) %></td>
<asp:Repeater ID="rptdocumentacion" runat="server">
<ItemTemplate>
<td><%#

8
GPS/PalletEtiqueta.rdlc
View File

@@ -1586,10 +1586,10 @@ KM12 HERMOSILLO, SONORA</Value>
<Page>
<PageHeight>29.7cm</PageHeight>
<PageWidth>21cm</PageWidth>
<LeftMargin>2cm</LeftMargin>
<RightMargin>2cm</RightMargin>
<TopMargin>2cm</TopMargin>
<BottomMargin>2cm</BottomMargin>
<LeftMargin>0cm</LeftMargin>
<RightMargin>0cm</RightMargin>
<TopMargin>0cm</TopMargin>
<BottomMargin>0cm</BottomMargin>
<ColumnSpacing>0.13cm</ColumnSpacing>
<Style />
</Page>

862
RH/Personal.aspx
View File

File diff suppressed because it is too large Load Diff

22
RH/Personal.aspx.vb
View File

@@ -52,6 +52,18 @@ Partial Class RH_Personal
ViewState("DTDocumentacion") = value
End Set
End Property
Private Property DTDocumentacionFiscal As DataTable
Get
If ViewState("DTDocumentacionFiscal") Is Nothing Then
Return New DataTable
Else
Return DirectCast(ViewState("DTDocumentacionFiscal"), DataTable)
End If
End Get
Set(value As DataTable)
ViewState("DTDocumentacionFiscal") = value
End Set
End Property
Property NombreCompleto As String
Get
If ViewState("NombreCompleto") Is Nothing Then
@@ -3749,8 +3761,18 @@ Partial Class RH_Personal
Else
GvDocumentosFirma.DataSource = Nothing
End If
If DTDocumentacion.FiltraParametros(" Modulo = 7 ").Rows.Count > 0 Then
GVMaterialidad.DataSource = DTDocumentacion.FiltraParametros(" Modulo = 7 ")
Else
GVMaterialidad.DataSource = Nothing
End If
GVMaterialidad.DataBind()
GvDocumentosFirma.DataBind()
UpMaterialidad.Update()
UPGvDocumentosFirma.Update()
UpGvDocumentosFirma2.Update()
End If

8
Ventas/Ventas.aspx.vb
View File

@@ -7658,10 +7658,10 @@ Partial Class Ventas
If e.Row.DBCampo("CveTipoInvPS").ToEntero() = 5 And CveVenta <= 0 Then
e.Row.FCTextBox("TxtSerie").Visible = True
e.Row.FCTextBox("TxtSerie").Attributes.Remove("onkeypress")
e.Row.FCTextBox("TxtSerie").Attributes.Add("onkeypress", String.Format("SeriePS(event,{0},this,{1});", e.Row.FCButton("BtnSerie").ClientID, e.Row.FCHiddenField("HdnSerie").ClientID))
e.Row.FCTextBox("TxtSerie").Attributes.Remove("onblur")
e.Row.FCTextBox("TxtSerie").Attributes.Add("onblur", String.Format("SeriePSBlur({0},this,{1});", e.Row.FCButton("BtnSerie").ClientID, e.Row.FCHiddenField("HdnSerie").ClientID))
e.Row.FCTextBox("TxtSerie").Attributes.Remove("onkeypress")
e.Row.FCTextBox("TxtSerie").Attributes.Add("onkeypress", String.Format("SeriePS(event,{0},this,{1});", e.Row.FCButton("BtnSerie").ClientID, e.Row.FCHiddenField("HdnSerie").ClientID))
e.Row.FCTextBox("TxtSerie").Attributes.Remove("onblur")
e.Row.FCTextBox("TxtSerie").Attributes.Add("onblur", String.Format("SeriePSBlur({0},this,{1});", e.Row.FCButton("BtnSerie").ClientID, e.Row.FCHiddenField("HdnSerie").ClientID))
'e.Row.FCTextBox("TxtSerie").Attributes.Add("onkeyup", String.Format("LimpiaAF(1, '{0}'); EnterAFEdit(event,this,{1},{2});", e.Row.FCHiddenField("HdnCveConcepto").Value, e.Row.FCHiddenField("HdnCveAF").ClientID, e.Row.FCHiddenField("HdnCodAF").ClientID))