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

Empresas Zona Horaria

Browse Source
This commit is contained in:
rakcsle
2023-10-09 11:54:42 -07:00
parent 2df7c3976c
commit f43b7759a8
649 changed files with 11445 additions and 11105 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Inventarios/CartaPorteManual.aspx.vb
View File

@@ -165,7 +165,7 @@ Partial Class Inventarios_CartaPorteManual
Private Property FechaSalida As Date
Get
If ViewState("FechaEntrega") Is Nothing Then
ViewState("FechaEntrega") = Now
ViewState("FechaEntrega") = NowADS()
End If
Return ViewState("FechaEntrega").ToString.ToDate
End Get
@@ -177,7 +177,7 @@ Partial Class Inventarios_CartaPorteManual
Private Property FechaLlegada As Date
Get
If ViewState("FechaLlegada") Is Nothing Then
ViewState("FechaLlegada") = Now
ViewState("FechaLlegada") = NowADS()
End If
Return ViewState("FechaLlegada").ToString.ToDate
End Get
@@ -192,9 +192,9 @@ Partial Class Inventarios_CartaPorteManual
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
TxtFecha.Text = Now.ToShortDateString
CEFecha.EndDate = Now.AddDays(-1)
RVFecha.MaximumValue = Now.ToShortDateString
TxtFecha.Text = NowADS().ToShortDateString
CEFecha.EndDate = NowADS().AddDays(-1)
RVFecha.MaximumValue = NowADS().ToShortDateString
Folio = 0
@@ -304,8 +304,8 @@ Partial Class Inventarios_CartaPorteManual
DdlChofer.DataBind()
DdlChofer.Items.Insert(0, New ListItem("Seleccione Uno", "-1"))
' TxtFechaEntrega.Text = Now.ToShortDateString
TxtFechaLlegada.Text = Now.ToShortDateString
' TxtFechaEntrega.Text = NowADS().ToShortDateString
TxtFechaLlegada.Text = NowADS().ToShortDateString