From cbc3a6336a4b3c4b7581b6b4179deb9771aafcc0 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Tue, 19 Apr 2022 09:14:06 -0700 Subject: [PATCH] --- App_Code/ClsPaginas.vb | 19 +- App_WebReferences/1WSRDLC.zip | Bin 0 -> 5243 bytes App_WebReferences/WSRDLC/Reference.svcmap | 4 +- App_WebReferences/WSRDLC/WebService.disco | 2 +- App_WebReferences/WSRDLC/WebService.wsdl | 125 +- .../WSRDLC/configuration.svcinfo | 6 +- .../WSRDLC/configuration91.svcinfo | 12 +- Compras/PopUpVerFactura.aspx.vb | 62 +- GPS/PalletEtiqueta2.rdlc | 6200 ++++++++++------- GPS/PalletEtiquetaCaja.rdlc | 23 +- LogIn.aspx | 4 +- LogIn.aspx.vb | 2 +- SiteAngular.aspx | 40 + SiteAngular.aspx.cs | 53 + vwd.webinfo | 4 + 15 files changed, 4092 insertions(+), 2464 deletions(-) create mode 100644 App_WebReferences/1WSRDLC.zip create mode 100644 SiteAngular.aspx create mode 100644 SiteAngular.aspx.cs diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index 875e14c20..d1103d1dc 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -6013,16 +6013,21 @@ Public Class ClsPaginas Dim wsreport As New WSRDLC.WebServiceSoapClient Dim params As New List(Of WSRDLC.ReportParameter) + Dim reportobjects As New List(Of WSRDLC.ReportObjects) + Dim ds As New DataSet For Each rpds As ReportDataSource In DataSource - Dim dt As DataTable = DirectCast(rpds.Value, Data.DataTable) - If dt Is Nothing Then - dt = New DataTable() - Else + If rpds.Value.GetType().ToString() = "System.Data.DataTable" Then + Dim dt As DataTable = DirectCast(rpds.Value, Data.DataTable) dt = dt.Copy() + dt.TableName = rpds.Name + ds.Tables.Add(dt) + Else + Dim ojext As New WSRDLC.ReportObjects + ojext.Name = rpds.Name + ojext.Value = rpds.Value + reportobjects.Add(ojext) End If - dt.TableName = rpds.Name - ds.Tables.Add(dt) Next For Each rpds As ReportParameter In Parametros Dim param As New WSRDLC.ReportParameter @@ -6030,7 +6035,7 @@ Public Class ClsPaginas param.Values = {rpds.Values(0)} params.Add(param) Next - Bytes = wsreport.StreamPDFBytes(RutaReporte, ds, params.ToArray(), NombreArchivo, Formato, CveEmpresa, CveUsuario) + Bytes = wsreport.StreamNEWPDFBytes(RutaReporte, ds, reportobjects.ToArray(), params.ToArray(), NombreArchivo, Formato, CveEmpresa, CveUsuario) wsreport = Nothing params = Nothing ds.Dispose() : ds = Nothing diff --git a/App_WebReferences/1WSRDLC.zip b/App_WebReferences/1WSRDLC.zip new file mode 100644 index 0000000000000000000000000000000000000000..27254a455bfe73b5d85288ec836cfdbee664f757 GIT binary patch literal 5243 zcmZ{o2Q*yU8plT`f>B2=qXf|pbH20B+H3#T`Obfz|6ZSlG8XnVz>ns`YpL_s&3`X=S5aSEOHM_W zU*l>J#Z?y{ph%Uf!{wVNHjV)RnBxEd^#2ZeD6hd>*VoR?hOFNvwIyC;lck%XAkxWVYyJN@a(mCD_G^nC5%XS)oWX1UA_!^@_FCzp-EX1d;bd6! zExwiRechvn^Gh7XHUIX@kU&+6VkTpn$-vEMOvqQigrt(B5&cKIS=-)@39DX(js&F9 zM#`h$@0%s&hvZJ*d$4vnvs6Bc-|g5%j|sc+pPTEfZ#>g4W@;QBYqB`EnQWB$ZnS24 zcs9*BHdfskW)~*L)fLh%W9i!)rjuW>?CF+}a08ih4V+8=u_urwKm)^-$Qze9x^oO7 zP<`gM18`?i)~Z!d1ofUxYC}eK!nAO0ZK{Fk6t6WTGEwb22<$02nBzf&g{u%r4~b0p zYgFZ{?U<&)GC#t&4jz})W8kdWIW%olbnIfG!MShf9G|HYwG^jg9 zYOIFLLdeb?_VQV@XkF6C^FFUaUrVeWKlvW91RIIT$gG3fEteu{= zdbH^+7Oe$T>FMY7e`5um0h#^BGbO*Euq?D#qPm(s3*UBx>CQTwhSYrFw3|AU_S^in zdU9k|rMrEJ4*G-&#*=YA*dafaGWR`q+u{jYNN_wvFZ;ir=rz!5lg$*|i@NP$;H6Ls zqiXsFr1i#A3hS^R^hwj2wd5RL0S&v$91`GW6uZII{Ko^M!lIceFvPj(GJ5r5(idtO z#^RkxrepBO->?& zo%c?a*Bl52j74%tOVO=;C$OY2aq6~y@ksgR*W}TPpPqgVN11td3l{ZTz8)%-7&*v# zMM(e_zq2|&X4Bl@GK2Ok6Pz3Q)SP9hS4HC-Uw~`MF1BR~+_YeOdt%!KAo4DD0m&)* ze}SJb-^-UR6PX0%NU+uyIC&U}zF%#8VqG0AA}TT=0^Pf`7n1h-z|6kcwV%v5S(}O3ZQ0W`VSaO(x6_cHj zi0m2iJn6B3f~sAXXj3gV8M-G8exP9*m&Oe1Ck$*kVF{kE$ClsSZRc9dYO#!(L`$ZG zu*&F|Aol%4-_W^fyT`XzwJR^80X|`1%PHQr0>R8YH(c?h+X?3^pce)&Xm@9_o@d;j zJWFqXj{|+(*_FOto#Xdnl&KXO?(*GAMDMmOzMpk~nwl4+v(C%-vtzi{P;95Z1W$Kjji#Z}18ow!6^rv1@EDZSI-R`YlSGIE6NIS%}wja*iU^CLG4NA={6V zwAm94=zX*=W+0Hg_%64bpa2^_KizlZYw6L*?g2<6@mE;<-K3Hw8QN!q?y&)%?L-O{ zB);e5j+WRz<~w=Bb2xPWEel|T8I*MCF|Ya9cy%wIZF>4?1C0uDgx^J7%y>t#IVv{9 zLvMP_hPNAYPX&|-)CN3{Id0+G#S#T`2a5^oCA1^HBqLRP%WOl{BkI3@fs9n$sTY!o zhSgW523KtnNki-^X7%F}HH3z5qyM97oVh>f&JB$M*Z+J|nYhhR`HdHSkhAl)b09Z{;lEWeJK*A@kVt1|s` zy{H($XZw72@(GYWI)O?$uX26v9$5#`_qoAL4+m#0xUEMF@08jG?Plk=jf}dJqyb0L z3`xjWuA!zITI3Zj_#)#yL&roJ`1&EP5#cItHNbRpC7bf3`;2)71AXNumP+;;ufp`T z{GApLo`2w8{U}I;NY#QU>hP4Ru^V|p5_Jbsv}mW;ODROkolT+Yy1Tj4^n^y9adUdN z6<(+UzF%JmPCjlK7`TIzR?zSEn1Ws@K*l6@;zUYo^(&zQH{aLgik(>Bb(^oL7eN9`qXvjisQJN_@h52w1tlZbN|nfp*$5Qu=+h{R1WRP8ERgG>r=MRwC9l^P z(H}*y;00k2&>CmvC@6^-Dd}e8 zOeGfC^wtU_bSf*2}~jy9-GR7ucS;FrzEb!x^H4+Of5nADp?)a)b>Oy6y%gb z=cTC3-#&|U-M??|Ul4zH-Wx7+C-I9Sq0!PB7k^sb01kEdq+4MLJaZ~-nY_L4G72hy z!%^EQznCrI@bx|cMu|j|b~Vg2Y}H^_8gA!cc2xUtjV|;l;BHQao^==LaKslHU(6a< zdv9s2bEy7Dj-y&dD9dW^y>^d`TGhZvMA_(#&xC5zo8X2qL@v7SVd&Fs6@EfBQ7}{= zs9oNoQ_7)klmC7`S8Mz8UhU$2QXY{{Q+;-ljCdX9@bvE%X*&Ts(RzBM?3>sNmDVm_ zkZk)TE)Tf_IltWY7{u{~7q^OPUp`-&&{*_$Hn~lzu=8q@ZtO`2yFD$dh$1!Q0Y$N= zz&lPzpBn}7lCBuS2My=cdQl4D{~q+4I%B`xW=Ataf`9l zjExvCL7qjfZ#P&~l(98hv*Y15k0P{%{exop%_6pMTca;?zx8SkNdoz@$b+JZFO*QK z)75rVlJ&t2K4-zr(`LUb*&)Cac6_DawktLNqGWw*OKocpZ~H4LTiHV&xxP$&w_%?T5aG_q;@3%=L9y;73sX;`bi1&qe7M@ozRmD13{vbV=)*!0`1lATD+_NWka<(0TS*Jk@wz``$FZ7)0M6a^{rC#4 zYPOG3lHQ^$a;6SLtmrR42)(h-IVFjG9dW`4+&(IN)d(U5m@`=?;kegtnyCFRGPH3 zFZWbhBg;MPh7{-cO|ZFy$$&Sw-e;A*uCZ&9<*vMT>Cy@Tg-$WV+@!!#*8mv5=Irn` z*Qc6u_nhvLz{n4Ls*h4R69dXzmkTK22_m_f{$T0dd3F(gjX(qg*UB>*r=&GtNy905 zQOvv+Rb;8A4To}p-0tC%Xdx=UVgHPpH-KKF2x*D^vga!sL}fn=&u?IhoR-n7)GhN$RW} z^oI4yy~C$|rG#lY06K%@o3#8iCPLy#OzR(e^xosf(l<)KFnetnY6;W(XtQ6sS%aR9m(ety$@1&0618Iy8xxZyN2(fwxy23%l zt}aBgD;D|Gh~4NQbKhpFPGru-R-i-ewz@h|d3n@($=goG8+eSqQL@&Xyrj`)!H=T} zEVs_NJdPHRJs(Qc^?eZ9-q;Vumpj;fBZ9=!UG~qZE9bhiIX!S|q(6T^C4B;FXn`Ut z7s9#-%_`4k+1@- z&etz2Y%Hwxbc(lzCoVvEIUyI|2mH=C%r+Ei1C}XUTqKnlI%6Io%A!yZ~c7?G**ccVwcyg1tKjVI{FuUCWoU898ta0)IqW_?RyHz z77@L*A-&8(2CyK8B1W<*?EzjMP$#1sAWj*EuNuN~^Q8la?gBrEoUe&}a znLN_=KV~4dE?Rv4RMuq{HE@yeF1b&(lzarB8&}9DhfI&3c3oRrdl)MuBN;R!_J~_# zZvABJCHDD-&18a_$M@;`mD2E0P*n%q?|?`{83U6E@TaN|+tttVM+5#He%64l0hs@K zfB~Qel(?943iC~2EGM4I;Al@_P>B59|9j#;Rf>L2{9_*WtMk9brT<$u`jyrsKhQvM zMfn+j(*KwCdnMvmn(&of{y*Bkb%|ejiL8I~e#SrXe&1I9%A3Idhxfmm%wIu5c7uPt z*w6T - + false true @@ -22,8 +22,8 @@ - + diff --git a/App_WebReferences/WSRDLC/WebService.disco b/App_WebReferences/WSRDLC/WebService.disco index 4b396211d..1dd75ae60 100644 --- a/App_WebReferences/WSRDLC/WebService.disco +++ b/App_WebReferences/WSRDLC/WebService.disco @@ -1,5 +1,5 @@ - + diff --git a/App_WebReferences/WSRDLC/WebService.wsdl b/App_WebReferences/WSRDLC/WebService.wsdl index 5d0cd8152..2dc431a14 100644 --- a/App_WebReferences/WSRDLC/WebService.wsdl +++ b/App_WebReferences/WSRDLC/WebService.wsdl @@ -1,5 +1,5 @@ - + @@ -83,6 +83,73 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + @@ -103,6 +170,18 @@ + + + + + + + + + + + + @@ -116,6 +195,14 @@ + + + + + + + + @@ -146,6 +233,24 @@ + + + + + + + + + + + + + + + + + + @@ -176,6 +281,24 @@ + + + + + + + + + + + + + + + + + + diff --git a/App_WebReferences/WSRDLC/configuration.svcinfo b/App_WebReferences/WSRDLC/configuration.svcinfo index 2a3221f28..6e98140ae 100644 --- a/App_WebReferences/WSRDLC/configuration.svcinfo +++ b/App_WebReferences/WSRDLC/configuration.svcinfo @@ -1,10 +1,10 @@  - + - + - + \ No newline at end of file diff --git a/App_WebReferences/WSRDLC/configuration91.svcinfo b/App_WebReferences/WSRDLC/configuration91.svcinfo index b044b1a55..8e2129785 100644 --- a/App_WebReferences/WSRDLC/configuration91.svcinfo +++ b/App_WebReferences/WSRDLC/configuration91.svcinfo @@ -1,10 +1,10 @@ - + - + - WebServiceSoap + WebServiceSoap1 @@ -112,7 +112,7 @@ - + http://localhost:7999/WebService.asmx @@ -124,7 +124,7 @@ basicHttpBinding - WebServiceSoap + WebServiceSoap1 WSRDLC.WebServiceSoap @@ -187,7 +187,7 @@ False - WebServiceSoap + WebServiceSoap1 diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index a9e63b2ef..5abb5359a 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -360,10 +360,37 @@ Partial Class PopUpVerFactura params.Add(New ReportParameter("Cultivo", Cultivo)) params.Add(New ReportParameter("noPallet", noPallet)) params.Add(New ReportParameter("Variedad", Variedad)) - Dim tablaReporte As New DataTable + + Dim lrds As New List(Of ReportDataSource) + + 'img + Dim dtqr As New DataTable + Dim column As DataColumn = New DataColumn("ImagenByte") + column.DataType = System.Type.[GetType]("System.Byte[]") + column.AllowDBNull = True + column.Caption = "ImagenByte" + dtqr.Columns.Add(column) + Dim rowqr As DataRow = dtqr.NewRow() + + + Dim bcode As New BarcodeLib.Barcode() + Dim img = bcode.Encode(BarcodeLib.TYPE.CODE128, String.Format("{0}", noPallet), 500, 100) + Dim barcodebyte As Byte() + Using ms = New MemoryStream() + img.Save(ms, System.Drawing.Imaging.ImageFormat.Png) + barcodebyte = ms.ToArray() + End Using + rowqr("ImagenByte") = barcodebyte + + dtqr.Rows.Add(rowqr) + Dim rds2 As New ReportDataSource With {.Name = "dsImagenes", .Value = dtqr} + rds2.Name = "dsImagenes" + rds2.Value = dtqr + lrds.Add(rds2) + 'endimg '"Empresas/Grales/Formatos/EquiposGPS.rdlc" '"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc" - ImprimirPDF("GPS/PalletEtiqueta2.rdlc", (New List(Of ReportDataSource)), params, "Pallet") + ImprimirPDF("GPS/PalletEtiqueta2.rdlc", lrds, params, "Pallet") End Sub Private Sub imprimirpallet(cvePallet As Integer) Dim Envase As String = "" @@ -377,6 +404,8 @@ Partial Class PopUpVerFactura Dim NoCajas As String = "" Dim NumberOfCode As String = "" Dim CvetypeImpresion As Integer + Dim NumberSmall As String = "" + Dim NumberBig As String = "" 'Envase = "1 1/9" 'Tamano = "Small" 'Cultivo = "Tomate" @@ -394,8 +423,9 @@ Partial Class PopUpVerFactura NoCajas = row("NoCajas").ToString() Fecha = String.Format("{0:MMM dd}", row("Fecha")).Replace(".", "").ToUpper() CvetypeImpresion = row("CvetypeImpresion").ToString().ToEntero() - NumberOfCode = String.Format("(01)00856977005186(13){1:ddMMyy}(10){0}01", Right(String.Format("0{0}", Regex.Match(row("Cuadro").ToString(), "\d+")), 2), row("Fecha")) - + NumberOfCode = String.Format("(00)00000000000000(00){1:ddMMyy}(00){0}00", Right(String.Format("0{0}", Regex.Match(row("Cuadro").ToString(), "\d+")), 2), row("Fecha")) + NumberSmall = String.Format("{0:00}", noPallet.ToEntero()) + NumberBig = String.Format("{0:00}", row("Consecutivo").ToString().ToEntero()) ' String.Format("{0:dd}", row("Fecha")) End If End Using Dim params As New List(Of ReportParameter) @@ -405,11 +435,13 @@ Partial Class PopUpVerFactura params.Add(New ReportParameter("FormatoImpresion", FormatoImpresion)) params.Add(New ReportParameter("Consecutivo", Consecutivo)) params.Add(New ReportParameter("Fecha", Fecha)) - params.Add(New ReportParameter("CveFormato", If(Cultivo.ToLower() = "tomate", "3", CvetypeImpresion.ToString()))) + params.Add(New ReportParameter("CveFormato", If(Cultivo.ToLower().Contains("tomate"), "3", CvetypeImpresion.ToString()))) params.Add(New ReportParameter("NoCajas", NoCajas)) params.Add(New ReportParameter("NumberOfCode", NumberOfCode)) params.Add(New ReportParameter("Cultivo", If(CvetypeImpresion = 2, Cultivoingles, Cultivo))) params.Add(New ReportParameter("Envase", If(CvetypeImpresion = 2, "PLU 4062", Envase))) + params.Add(New ReportParameter("NumberSmall", NumberSmall)) + params.Add(New ReportParameter("NumberBig", NumberBig)) @@ -431,10 +463,10 @@ Partial Class PopUpVerFactura Dim bcode As New BarcodeLib.Barcode() - ' Dim img = bcode.Encode(BarcodeLib.TYPE.CODE128, String.Format("{0}", noPallet), 500, 100) + Dim img = bcode.Encode(BarcodeLib.TYPE.CODE128, String.Format("{0}", noPallet), 500, 100) Dim barcodebyte As Byte() Using ms = New MemoryStream() - ' img.Save(ms, System.Drawing.Imaging.ImageFormat.Png) + img.Save(ms, System.Drawing.Imaging.ImageFormat.Png) barcodebyte = ms.ToArray() End Using rowqr("ImagenByte") = barcodebyte @@ -807,15 +839,15 @@ Partial Class PopUpVerFactura DtCortesVentasResumen = ObjVenta.DtResultados End If - If ObjPuntoVenta.GetCortesDetalleVentas(CveCorte, UsuarioActual.CveEmpresa) Then - DtCortesVentas = ObjPuntoVenta.DtResultados - If DtCortesVentas.Rows.Count > 0 Then - Dim RowInfo As DataRow = DtCortesVentas.FiltroPrimero("CveVenta > 0") + 'If ObjPuntoVenta.GetCortesDetalleVentas(CveCorte, UsuarioActual.CveEmpresa) Then + ' DtCortesVentas = ObjPuntoVenta.DtResultados + ' If DtCortesVentas.Rows.Count > 0 Then + ' Dim RowInfo As DataRow = DtCortesVentas.FiltroPrimero("CveVenta > 0") - Fecha = RowInfo("FechaInicial").ToString - Nombre = RowInfo("Nombre").ToString - End If - End If + ' Fecha = RowInfo("FechaInicial").ToString + ' Nombre = RowInfo("Nombre").ToString + ' End If + 'End If ObjVenta.Dispose() ObjPuntoVenta.Dispose() Dim FechaCorte As String = $" Fecha fin: {Fecha}" diff --git a/GPS/PalletEtiqueta2.rdlc b/GPS/PalletEtiqueta2.rdlc index 109db21a2..07be03233 100644 --- a/GPS/PalletEtiqueta2.rdlc +++ b/GPS/PalletEtiqueta2.rdlc @@ -1,2426 +1,3784 @@ - - - - - - - true - true - - - - - PALLET-TAG - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - 03 - - - - =Parameters!noPallet.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Cultivo.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COMMODITY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Variedad.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - VARIETY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Envase.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - STYLE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Tamano.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - SIZE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Grower - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - LABEL - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!NoCajas.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - PACKS - - - - - - 2pt - 2pt - 2pt - 2pt - - - - Embedded - barcode1 - FitProportional - 3.46683cm - 1.51697cm - 1.5cm - 3.24489cm - 14 - - - - - - - - true - true - - - - - PALLET-TAG - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - 03 - - - - =Parameters!noPallet.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COMMODITY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - VARIETY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COUNTRY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Cultivo.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Variedad.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - MEXICO - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - STYLE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - SIZE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - LABEL - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Envase.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Tamano.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Grower - - - - - - 2pt - 2pt - 2pt - 2pt - - - - Embedded - barcode1 - FitProportional - 0.61954cm - 6.0624cm - 1.5cm - 3.24489cm - 14 - - - - - - true - 5.46072cm - 0.0353cm - 2.59618cm - 9.33165cm - 15 - - - - - - - - true - true - - - - - PALLET-TAG - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - 03 - - - - =Parameters!noPallet.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COMMODITY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - VARIETY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COUNTRY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Cultivo.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Variedad.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - MEXICO - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - STYLE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - SIZE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - LABEL - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Envase.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Tamano.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Grower - - - - - - 2pt - 2pt - 2pt - 2pt - - - - Embedded - barcode1 - FitProportional - 0.61954cm - 6.0624cm - 1.5cm - 3.24489cm - 14 - - - - - - true - 8.19801cm - 0.05708cm - 2.59618cm - 9.33165cm - 16 - - - - - - - - true - true - - - - - PALLET-TAG - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - 03 - - - - =Parameters!noPallet.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COMMODITY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - VARIETY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COUNTRY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Cultivo.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Variedad.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - MEXICO - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - STYLE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - SIZE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - LABEL - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Envase.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Tamano.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Grower - - - - - - 2pt - 2pt - 2pt - 2pt - - - - Embedded - barcode1 - FitProportional - 0.61954cm - 6.0624cm - 1.5cm - 3.24489cm - 14 - - - - - - true - 10.79419cm - 0.05708cm - 2.59618cm - 9.33165cm - 17 - - - - - - - - true - true - - - - - PALLET-TAG - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - 03 - - - - =Parameters!noPallet.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COMMODITY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - VARIETY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COUNTRY - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Cultivo.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Variedad.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - MEXICO - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - STYLE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - SIZE - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - LABEL - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Envase.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Tamano.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Grower - - - - - - 2pt - 2pt - 2pt - 2pt - - - - Embedded - barcode1 - FitProportional - 0.61954cm - 6.0624cm - 1.5cm - 3.24489cm - 14 - - - - - - true - 13.34436cm - 0.05708cm - 2.59618cm - 9.33165cm - 18 - - - - - - true - 0.14291cm - 0.09907cm - 15.94054cm - 9.49453cm - - - - - - 6.97802in - + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.44125cm + + + + + true + true + + + + + COMMODITY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Cultivo.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.38833cm + + + + + true + true + + + + + VARIETY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Variedad.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.44125cm + + + + + true + true + + + + + STYLE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Envase.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.36187cm + + + + + true + true + + + + + LABEL + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Grower + + + + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.36187cm + + + + + true + true + + + + + PACKS + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!NoCajas.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.49417cm + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + Database + =First(Fields!ImagenByte.Value, "dsImagenes") + image/png + FitProportional + 14 + + + + + 2 + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.49417cm + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.41479cm + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.49417cm + + + + + true + true + + + + + PALLET-TAG + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.54708cm + + + + + true + true + + + + + COMMODITY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + VARIETY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + COUNTRY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + Database + =First(Fields!ImagenByte.Value, "dsImagenes") + image/png + FitProportional + 14 + + + + + + + + + + 0.52062cm + + + + + true + true + + + + + =Parameters!Cultivo.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Variedad.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + MEXICO + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.36187cm + + + + + true + true + + + + + STYLE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + SIZE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + LABEL + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.38833cm + + + + + true + true + + + + + =Parameters!Envase.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Tamano.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Grower + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.52062cm + + + + + true + true + + + + + PALLET-TAG + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.44125cm + + + + + true + true + + + + + COMMODITY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + VARIETY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + COUNTRY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + Database + =First(Fields!ImagenByte.Value, "dsImagenes") + image/png + FitProportional + 14 + + + + + + + + + + 0.44125cm + + + + + true + true + + + + + =Parameters!Cultivo.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Variedad.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + MEXICO + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.41479cm + + + + + true + true + + + + + STYLE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + SIZE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + LABEL + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.41479cm + + + + + true + true + + + + + =Parameters!Envase.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Tamano.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Grower + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.41479cm + + + + + true + true + + + + + PALLET-TAG + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.41479cm + + + + + true + true + + + + + COMMODITY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + VARIETY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + COUNTRY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + Database + =First(Fields!ImagenByte.Value, "dsImagenes") + image/png + FitProportional + 14 + + + + + + + + + + 0.52062cm + + + + + true + true + + + + + =Parameters!Cultivo.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Variedad.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + MEXICO + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.44125cm + + + + + true + true + + + + + STYLE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + SIZE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + LABEL + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.38833cm + + + + + true + true + + + + + =Parameters!Envase.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Tamano.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Grower + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.44125cm + + + + + true + true + + + + + PALLET-TAG + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.38833cm + + + + + true + true + + + + + COMMODITY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + VARIETY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + COUNTRY + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + Database + =First(Fields!ImagenByte.Value, "dsImagenes") + image/png + FitProportional + 14 + + + + + + + + + + 0.46771cm + + + + + true + true + + + + + =Parameters!Cultivo.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Variedad.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + MEXICO + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 03 + + + + =Parameters!noPallet.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.36187cm + + + + + true + true + + + + + STYLE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + SIZE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + LABEL + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.36187cm + + + + + true + true + + + + + =Parameters!Envase.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Tamano.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Grower + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 0.0762cm + 0.10266cm + 13.18458cm + 9.64969cm + + + + + + 5.34012in + + true @@ -3921,7 +3922,7 @@ Produce of MX. 0.0801cm 0.05458cm 8.07288cm - 10.64012cm + 10.6401cm @@ -4005,6 +4006,18 @@ Produce of MX. true ReportParameter1 + + String + true + true + ReportParameter1 + + + String + true + true + ReportParameter1 + diff --git a/LogIn.aspx b/LogIn.aspx index f027dda87..e1287e4f0 100644 --- a/LogIn.aspx +++ b/LogIn.aspx @@ -132,13 +132,13 @@ <%----%> + + + + diff --git a/SiteAngular.aspx.cs b/SiteAngular.aspx.cs new file mode 100644 index 000000000..f0fa903ac --- /dev/null +++ b/SiteAngular.aspx.cs @@ -0,0 +1,53 @@ +using System; +using System.Collections.Generic; +using System.Linq; +using System.Text; +using System.Web; +using System.Web.UI; +using System.Web.UI.WebControls; + +public partial class SiteAngular : System.Web.UI.Page +{ + public Usuario UsuarioActual + { + get + { + try + { + // UsuarioActual = DirectCast(Session("UsuarioSIG"), Usuario) + if (Context.Session["UsuarioSIG"] == null) + { + return null; + } + else { + return (Usuario)Context.Session["UsuarioSIG"]; + } + } + catch (Exception ex) + { + return null; + } + } + } + protected void Page_Load(object sender, EventArgs e) + { + + } + public string GetTokenAngular() + { + if (Context.Session["UsuarioSIG"] != null) + { + Usuario usuario = (Usuario)Context.Session["UsuarioSIG"]; + var tokenDescriptor = new Microsoft.IdentityModel.Tokens.SecurityTokenDescriptor() { Subject = new System.Security.Claims.ClaimsIdentity(new System.Security.Claims.Claim[] { new System.Security.Claims.Claim("CvePlataforma", usuario.CvePlataforma.ToString()), new System.Security.Claims.Claim("CveUsuario", usuario.CveUsuario.ToString()), new System.Security.Claims.Claim("CveEmpresa", usuario.CveEmpresa.ToString()), new System.Security.Claims.Claim("CveRol", usuario.CveRol.ToString()), new System.Security.Claims.Claim("Fecha", DateTime.Now.ToLongDateString()) }), Expires = DateTime.UtcNow.AddHours(3), SigningCredentials = new Microsoft.IdentityModel.Tokens.SigningCredentials(new Microsoft.IdentityModel.Tokens.SymmetricSecurityKey(Encoding.ASCII.GetBytes("*_AsistenciaDesarrolloSistemas-SIGAPI_*17-06-2020")), Microsoft.IdentityModel.Tokens.SecurityAlgorithms.HmacSha256Signature) }; + var tokenHandler = new System.IdentityModel.Tokens.Jwt.JwtSecurityTokenHandler(); + var newtoken = tokenHandler.CreateToken(tokenDescriptor); + string stokenn = tokenHandler.WriteToken(newtoken); + return stokenn; + } + else + return ""; + } + + + +} \ No newline at end of file diff --git a/vwd.webinfo b/vwd.webinfo index accb5b476..35cd6ccbe 100644 --- a/vwd.webinfo +++ b/vwd.webinfo @@ -466,6 +466,10 @@ + + + +