Requerir combos SAT cuando es sucursal
This commit is contained in:
@@ -2924,14 +2924,18 @@ Partial Class Compras_eFacturas
|
||||
|
||||
For Each dRow2 As DataRow In DTDocumentosRelacionados.Rows
|
||||
|
||||
If dRow2("IdDocumento").ToString.ToUpper = drow("IdDocumento").ToString.ToUpper And drow("CveIE").ToString.ToEntero > 0 Then
|
||||
If dRow2("IdDocumento").ToString.ToUpper = drow("IdDocumento").ToString.ToUpper Then
|
||||
|
||||
dRow2("CveCompra") = drow("CveCompra").ToString.ToEntero
|
||||
dRow2("CveFactura") = drow("CveFactura").ToString.ToEntero
|
||||
dRow2("CveMetodoPago") = drow("CveMetodoPago").ToString.ToEntero
|
||||
dRow2("SerieFolioCompra") = drow("SerieFolioCompra").ToString
|
||||
Try
|
||||
dRow2("CvePrePolizaDetalle") = drow("CvePrePolizaDetalle").ToString
|
||||
|
||||
If drow("CveIE").ToString.ToEntero > 0 Then
|
||||
dRow2("CvePrePolizaDetalle") = drow("CvePrePolizaDetalle").ToString
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
dRow2("CvePrePolizaDetalle") = 0
|
||||
End Try
|
||||
|
||||
Reference in New Issue
Block a user