Line 66:
Line 67: Dim preuDS As System.Data.DataSet = icnea.hospesXhotelXpreus(Request("h"), entrada, nits, persones, idioma, Funcions.Empresa, Funcions.Password)
Line 68: Dim carrecNeteja As Decimal = preuDS.Tables(0).Rows(0).Item("carrec2")
Line 69: Dim importDiposit As Decimal = CDec(preuDS.Tables(0).Rows(0).Item("diposit"))
Line 70: Dim importDescompte As Decimal = Icn.Fcn.Dec(preuDS.Tables(0).Rows(0).Item("descompte"), idioma)
|