Contratos, flujo ventas, contratos estado de cuenta
This commit is contained in:
@@ -96,8 +96,8 @@ Partial Class Contratos_ContratoAvance
|
||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
|
||||
If Not IsPostBack Then
|
||||
BtnGuardar.Visible = False
|
||||
btnanexogral.Visible = False
|
||||
BtnGuardar.Visible = False
|
||||
|
||||
CargaContrato()
|
||||
|
||||
|
||||
@@ -146,16 +146,16 @@ Partial Class Contratos_ContratoAvance
|
||||
fecha = ""
|
||||
DtDatos = ObjContratos.DtResultados
|
||||
If ObjContratos.DtResultados.Rows.Count > 0 Then
|
||||
BtnGuardar.Visible = True
|
||||
btnanexogral.Visible = True
|
||||
BtnGuardar.Visible = True
|
||||
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
If ObjContratos.GetContratosAvanceHistoricos(CveContrato, 2, DdlAvances.SelectedValue) Then
|
||||
fecha = DdlAvances.SelectedValue
|
||||
DtDatos = ObjContratos.DtResultados
|
||||
BtnGuardar.Visible = False
|
||||
btnanexogral.Visible = False
|
||||
BtnGuardar.Visible = False
|
||||
|
||||
End If
|
||||
End If
|
||||
ObjContratos.Dispose()
|
||||
@@ -280,7 +280,7 @@ Partial Class Contratos_ContratoAvance
|
||||
Dim TieneError = False
|
||||
Dim CveContratoDetalle As Integer
|
||||
Dim Cantidad As Double
|
||||
Dim filesgral As List(Of Archivo) = AnexoGral.getfiles().Archivos
|
||||
'Dim filesgral As List(Of Archivo) = AnexoGral.getfiles().Archivos
|
||||
Dim guardarArchivos As New List(Of Archivo)
|
||||
|
||||
For Each gvr As GridViewRow In Gv.Rows
|
||||
@@ -328,9 +328,10 @@ Partial Class Contratos_ContratoAvance
|
||||
Alert("No se logro guardar el Presupuesto favor de intentarlo mas tarde o comuniquese con soporte", TipoMensaje.MsgAdvertencia)
|
||||
Else
|
||||
Dim urlsave As String = String.Format("Empresas\{0}\Contrato\{1}\Anexos", UsuarioActual.CveEmpresa, CveContrato)
|
||||
For Each fileItem As Archivo In filesgral
|
||||
fileItem.filename.FilesMove(fileItem.filename, urlsave)
|
||||
Next
|
||||
|
||||
'For Each fileItem As Archivo In filesgral
|
||||
' fileItem.filename.FilesMove(fileItem.filename, urlsave)
|
||||
'Next
|
||||
|
||||
For Each fileItem As Archivo In guardarArchivos
|
||||
fileItem.filename.FilesMove(fileItem.filename.Replace($".{fileItem.Extencion}", ""), urlsave)
|
||||
@@ -338,7 +339,7 @@ Partial Class Contratos_ContratoAvance
|
||||
ObjContratos.Commit()
|
||||
Alert("se guardo Correctamente")
|
||||
End If
|
||||
AnexoGral.Text = "[]"
|
||||
'AnexoGral.Text = "[]"
|
||||
ObjContratos.Dispose()
|
||||
CargaddlAvance()
|
||||
CargaDatosAvance()
|
||||
|
||||
Reference in New Issue
Block a user