From fb2814749e159cb77448cd9aa318e577b363ba38 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Mon, 9 Sep 2024 17:10:30 -0700 Subject: [PATCH] =?UTF-8?q?Promociones=20envio=20de=20correo=20con=20notif?= =?UTF-8?q?ici=C3=B3n=20de=20bloque=20por=20exceder=20el=20limite=20de=20d?= =?UTF-8?q?escuento?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Bin/System.Memory.dll | Bin 141184 -> 142240 bytes Ventas/Promociones.aspx | 2 + Ventas/Promociones.aspx.vb | 83 +++++++++++++++++++++++++------------ 3 files changed, 59 insertions(+), 26 deletions(-) diff --git a/Bin/System.Memory.dll b/Bin/System.Memory.dll index 5d1947056f1c1dd2d48561cf721f615bb8dc0d63..46171997966f26bda11e58586c51b2817bde5cca 100644 GIT binary patch delta 7151 zcmcgxXIK+mx1AY6s7miGN|!cC2oRJG0!lB6fYMQF=qN2A2!aKqXe=mI5ETVMI*1g- zN>NanGzAnH}tvO~Zu8USwcKma8h3rbhnK!GVLOdtT*0{{;b zFTe}(LJC0uprkAhp;;6fK>!_&0swS80R-3)hSe#1CUvZ;EA4nPxKwMv1xmSzaLK9y zv48*ru?#dtFbOzJI}r>jl6_@cfg-?HwjJOFlB5|jX@*St4?~wpGi1^X*}ukK5Pf<@Ci-%VnCP)Iiawb%su4IVFO5Q`p(T<) zA#-HyX!?qh(DW5OMbiaFELRbxouwUUlK;dK4sggxv*JNyI9B=)pIGTR6t*gWB&*L! zzbh0v)=rSXpP+}YEFenf#zlvL7zF7tAT|tiA;{px=;P^&(_?)JI!;K?X9FaM0UkL( zlFnd|_@Er-AF&iYpCZN3Vi2Se!$3tai{=#u8c1=-oz$5^)cS_>EO!RxGjN=aw00zy z51DQsqnm*gI?}enKnXI3T&pF$W1NA26+Je#qW_NG45ToalZ-f@5w|i>-yaJ9P*bSs2*aKWbuovh;un$;8 z@HGI7K)@T|7=rx(iUI)0^8$bXR4Wh*mYQ=fnjE53$d{Yet!Q1lmO*W=ebE6r%Q)k) zcvwpn#sUDP3Z%&5e{mRn!$`lt2*VTF7_UH5q<4f*c!Y|UIu=jBd;5C9j0?#L z^9c4jri}^n3H0#@_ff;CVpS~d?Tl#ApFpev9_Oh}#1ipDUr%o=j^K-j)nPo=3r~RY zTAo-Rth%SV51vTSs_pp%&Oo(wU%**3*=qkcAy4gd%oh9hO_iD54TtJ(Vyb>;jkQXv zE23{S$3v(qm)j{H9(7}Q#NMV$D0L+I*LTH;C*_#8$>k#4|P+ttI>Et(V- z;EJVrE`clj0Fa7&oPS+~^ca)5LlDfVO&F|_mR z;4#pcwzdvRgP2;04Uh?B!vk0V55Ry{t>Pv~0+|BAV%pU$Q1PD~w3l0;1l9`(1V}(6 z;0;6oK0r8vDu5QC&QKGO5xfCkzzZ4Y@1F~NkP@2;V2PNo9bj}p2lBGU1317F(GU?8 z5z!D4jVGeSB0K?!>FZEOUi3A2AxL1vT1XBSnG=ij(bYZ-B>~X7@Ey_waWpIlb+K{( zqhM6yYk45(8<+{RNHGct1OYHr{yds(SBhE6&ut(JluwmUM5uV06biC4DGp@mF4HO> zWsbco^P&9s^yZ>?Tf zBo5Q>F+{6DK{=8*EKG!PSS>t`Ky((`hQlFE?4KqaK?~)89BIwWkUqKRLw82i@^94e zy$@1L(zkDNu`a1+-+Xhc->|5WiaHqjRQ9R%fZAD$eZpOZ^Qo0J@LIbCZ~79Kb!Dn24H@Vg;< z?x9$pdcRsn`In^a@2p0b$y0~biuc7mT`;Dt9{!%&`Y^qn9XgTWIz9Y8uwUSi_)rWk z^}K-nN%ml%wfx3#SBtxGq|8^=5{D;KXYRcuAKM#ddhGeY%S^>0{Etbz)jRlePciioik?#?4`YGlHyAlSiN`|-&T0%%s28*a* z0!#&CXzVPIvM(XanaAMFyMT(?8Y}3lWZYh%6TPqvn#oau2W1YM7Ms9ESVdSKAy6EA z7)w8|Fj6?lHv(fF;uGc(;YSJ%$Jj*rghh}rc79$YtRT!!Pi5xYhQq@!7N?}Hp-CWW z((+lLb+VwjX1%hvg}%p|VSQSKXH%jwc+}m^`SPmiA#6&I;%(vCR6CUji;lwvBa_!m z`yOUKQOsI&6?J2pKYM9^S^=98X!>#g-ECtF%hF@5ItMQndXb(MS`B#HQ?B59)q6{y z&hDm}+ox%n+_bJaHmChd=sGoDBE~jfJu6fEL1qJ)=XBkDc={0LN#Ff7j={U+_9!(~ zi&Vi~d1r-5Sg)c-Evw_T?|Sx$9M!Ffw#@(^ayHykoNyJq(0iEAq8Y;{`To?82Sx2W z{TmyqHanjcojGA#*NmN5)&kYe&v(eFmPhq5yX=4Cv^q6)ZL3s{W3Z&9(X%UfY581l zbd-dg4moec(|~?UpBJ$XO^&^sG^s<6 z5qI!BxzFtVEz0JX5TDD*vn_#Hhr=w-N8_f)wYD=a+~Uy?o8$+1tv@~f-mSXx@!*N( zJ?7KgIMmI4UccI0c8J2lDME#*A_))(!ig7XBo2te|KC2~O}x-y%uMD1*OXrm9dfh< z${of!sj;~t;~G{utf6ehA1Qf&8;!^Z9VDxaJlT;LHSSjh%jGat3@rE@)LvZwN<6Mu z8CVrEp`*vmA%?vt4URg63ti~@o|{s>dgIcbXI(@ifuW2;5y>U7pZ&(W%vL>b$n0l5 zjq64o>HpEpzJQy&#@*1jUf3h5{pQI^a~uyTS<~?n*TvSBM#)0Cy7+!|}&{QTX>PeNDdqH!K6;hX_C*!1) zVzYzK-+yl@t?BDtEg&2wnt=C(7uL?8-*4+)ymX+9*T21|8ufim=&Gz%0~a&=O?C;# zl#mnqeZ-e$q^47&P});Ec;?Zs*JclHx?rue3aCPyFja^Z&8~z7Q6N>5i3!9~1y^CJ z;L^VtvEWC9nxH-8hlE5O(Hws)nvEMoEk8v2X<*X0YZBQm?-M`3iIJ$#Ci#^7L3QK6Esvc@#@YniUNU4 z`H63e6MNyrR}3$<`(L<;94zw>&+?&Z%%ulb%NoNf zO6I5S&8)n+jS>x}@4Vn`9V_v@?A>`W@pVywjAV4bQaUlWK7jYWIe9+q2GfRvghAVj z>$Dt^S8ax^!bQC!n8(Xft*=9`{{ZKQh^Kzf6|E3;PmFEuhzg5WY#<9PytiR?sxu`# zy6hYH(>CBY^-1dKBUj^IZ-(T9S=-&z%z8u5oGEe5FMi}Py>K+?XsneIo;4&zZ!R(D z#!#6i`m;#+ZhOC zQg!fMJ}wI$?$5cJsR1aRjI{C>WX{X?4g9Ybk9OWSx%*St{pD%lO0mKUxi$VI-W0hT zG%UU$I8@n+|KsmUo+g>TX&oP%myX|eP-P?|J1Ehi7n|)hKXW)eCl|9NC>wos2|1@& zUwPm`3&m~F*PT^mZh~j`ff%)mC2i3so;;0R``wAQXlN`GvNb>_8blXc_e94P!)QFQnRs{}0EcO^ZNUWC#STd4FLS2etX*-(dSvT!&~CaZTen4~e88 zC+A*^37_9xq3892blzG<_3Wwd+U92)r7ra4dofY?;HJNqH>O^`wtW<5kvCvt)Gm~J zP5BAAM<&gZvh1vVS;y1TiT6%w^_L9E=2ur^w{E{XLB5idZOC~rz`5|n`<~1jcyc(g zyXNtEV%VDIgw&wf>yRxW+*AgkiFbJ9mfxwl4wlH>vWrOvL`|b2%^ih&6P-F0%OA2V znOWPifMK-dHx%i$4XrMTnNVnAbt}VMrMRQ-`3YeiHs9&{vx*mzmbr2T*9ulHk0j&=FthrGdv~8vv<2P$tOCJ< z)_`N_J4VMghwrAdlt$RREM$(j)vl)!rB`V#^GmG8>9$}w-|o2A#mgw3_bUVBE6rIm zKGJf4fW9zfs8D!@&uX}iXru~lQ#;e4f&D0-FJao@^%&IkL zY6yKgc=2QD5yFqzQ9{Oo0J_}1tE|WEP#=z6=)0kP*$WKVzSpY{w0bj}1^hpw7mW}KM> zXxd`Xb#eNJ9uH%+a5x+Rv1eo-$!Ox~P1-$KD1r8k1KL6UFi~PLQysR0<3!=}w=yT1 zxA#+DZ+y*VVd*Oiw2JI{MmV?vk^}dRPd3-<3c2IAT&O7gS&v~;><7o0; zY0d}d_`0KUt=z)1?(zP1NyfD$>3aiM_!m2)mQ!p-9vOFqy4qqj^Vzk6&&|K(dM9Te zNA!SVI&N)*k^SyT+`hA-(L#{(9=f!@!R%HLnR~~+eJ`lo~k}2(?0$*BjJHV#>g*b$4f!S zc3;`sJYRe_Mp5(5^SLCGnZ3c!aQ&?*u&cH5r04yY^^@nwsUI%h0rxewgq8`p9Cd%c znw2Rjp|gSM4v#muvN!T&hnxB+Z`#1d4NQE(`rvhwv6?Wo;dnPn!|<&HjV~G&D@wsP zd2MGOGBXwRhL>1sM&yXAQ@Iwnf7F@^&zH_#j?=RkzIUW;vHxATj*-}cVUw+d0vBwje|Z7F7v-1fdh5JR2!cM3jiwJ`G=rUOpC(Qnri88U)_DVop zAbH#0`!SG%8DOF!4tdQnetlQ@gtF985G&&{aXoDRdKu}nD}Rlym8tjfN^~|&2aA6| zeA^bPp*Q3m7}pa?3~J=UerU`19oSotBfRtLC*Pym_LifU8fqkuztd37Eu$U)m@1fC z(q{d}8`!?aj`@>X6rTsb(=#JSf`h{EgQ%R#LDCK%j@w7d9IPMBTTIt^ym)NPXQlYS zt)CZa6ddJyWSaH!ABxoQ^70(kkssH;sCDP(nqpdelTd|2vSHOa=k+rpX)_BP{)ugg zB8DP%k*77)oW|Q4%RDaJChoEa-5oXGjR;DVC_)(z`z1L(~ z!h@crvo%+N2hAP42gBczC0&fcbZ3#wfNgoj3L{5F6l5B-_FoD9y~82E--O4s?0fCq zuGzFB*4O%aETSG9bYQFW1C7ZEaRnZM;hXG@UkrS8{5GCHGB8g_$ZmPQy8A<|z{BcS zx;L=4Cz~EZkEn&QLJ|UL=R!7T9`q=Prg3Cw3^iD+UEN~;q`oRcII1+ht#114<$;Nv zpBLl}b!2mC?d@?eOUy{hH8uhgI$ z%-oMc(f-`k5{`JMs)7*T9|csX52ix98Rw$)g8z?wvpg+&C&a_wn($3hF^fqvNqKbF zOD~t9Yxj)FwA`K0CHd(c`QPB3!d!oE?+FB)x~B8r1QBKsG#BKr;Ii~&*}dbtH)$djfG3C)E5*}FfLn|5#V67Lu=UDgv*X-3b<%C%N?WKHADh z>y&uqb7hS9+zT9ge5r;rTzURwbFqq(@`B22sDxzYD{eIY^7x+9&TU2KnLSRj_F<{0 zZOCbXMv{TfaQ){wflU_D$Ha_=(q5E^%xdm!OWkRVy{BiO+duJ9FwCGaIM0^Kn@01K zg(Rg-7sxYg7ohQG;j*Tm74Zwx789-4d2T8Sx!$qV9ZDC26ED&7c0x&H#tHX7PbBb8 z6h@dQc_6arMMK_H-ebqxI*Y9t!GSOKd5Ubb1YbH8iiK@<)LX4(VS;!o zp2t>$7{}TxB*B66STH<6TxK-wuGg!z+jsHlhkddOJqnp!Nwa&;+OCWlpMAgR`Sp5C zQtEo?t^V4*jR$ICwvX$GnNPb%r=@R|_JvXB4XTduzRNC3y^1O&7luYtHPog{J}?v0 zkLK;rZ8je=CBHDFc#!itKcCrbQa$}~w)Ld!fj;+Jmx;?sS4@+IhM^CNZP8`B8}^?w znW|Z@XeTadMb?XAE#8)RQW|^pP4AS3yJD)kRk?ipPAy0%1hivi^Ycv0iOEZ4GCZ;+ z;<&5H7iBXfL=;xV9exUz2dFkR?Du(IGp9qUT+)4d@o9*iTAvV(WbavTvaz5yCn}@I xQ`(?Kp)}(XBl%+e3A76@ItImFb@A0G7p5EapODGwN{H!J`BZET@2BsX{tLC~`^W$Q delta 5883 zcmb`Kc|4Te`^V3H&lpRMWt4px$sX<*#uge|l5E)`Vhl=1Nrhq-*-}p=ZX_v6T2Qtg zA}tD$ioO*U5~UOsNw(iT^YpyF&+q&C{`tM~z|ebyNYmlvS>e6H&rt^{eS_k%WN@z%DWj5CNX?`@+M3t%})n7%ay=$Rrpjptq-> zHQ7Fp2E@+hU_`RZA#dntHUvw`zIY9Q@bB0gA~5(s0H9a`8zh?osaCtf5h*$l1b{mL z5;zhdK_pl+5&)ewYA``ivk?M>y?6i!2{Z_ZzyzV}v9tjQR6j_MONPelt;8VZ09k^X z9ykb=^QpM~=Ic0^7lng)Q8<_vg@b#5zXlF&1luw4V)=I9 z?}jkHlPW(@1Tj7PN^21d5VgIz5Fz@zSINo$ia6DTT&%2o_z7Zs8sN%8Ppqwa3 z+5ww8fj6Th0&hm`1YUrR;3-VGD|i=FYm5o*1+coRkO71ZC&U|KOo-QqEnE#k)#%H4 zPle56{ZJG%12O#7fE-U7lXh@#qRXo36;?kRtDHK&c-HsRJdR zLdI-ob@E@fGOs^dnIB8Wh?+)2T2MO5jE1a~VfDin!&o%kn%66k&tg6Yc|`AGeI>Em zZRET8Wb=qFMMH`#SiQxG=NRM@IP+{tNd^9SOS&SwjsgM0!H%v=9tFZ7AvQ-y7` zb})&t15B=f!9zfofY-MkU7@1=JXvQw)4l{CeNJI!@ zZ-_oskAkwtAd0535kd(y3^k%sX^4qwXlM}CloHG|4yKt$WZUL~D8TeC>x9>UhD5?O>bf@;{faKcsrR`3sPo z*~kn&t7_YKZj>edOkwLEyWd76hIlB)TMCR=BX!0Hbr?+p;hZExpXasvMPv+INXL5( z4^aey+tx>p=ZWOxkUf@(crr7+(>I2X7%c9X`SsLqd~1Y_4fenQFA4HKVeGAdB_wk! zv6)XnV6(feyLpfCov%0O8_N6Hhh?^R`eANhXXa<+7jPgdI^2&!GeUPvK|hFW>{tBz zDnKKrA$jO%efl(%OvplnP|G%L~h5*{;88ZG6(21vo4Xp;a;XI(2x@A*;oW$JTGT4B-c!nql zN@hhlPADuLNb|h%G-#id^SSR^Z+aPf-PxUCv+K5jrj-$)lhlydJ|kYBFGx^08~*G3 zNz`&Ewb!q}h?F^WtiAe7h0x6PNZiIgk#AcjCDm5ONp~tM+b&fV%nxa^UbfzLiJnUE z86nyCp$ReKt{I}oI9Hrz4TG8T6Yo#wUD7_QGU|COJE7gXyY0z01=mXtNg;%a1(>Zj z`Lb;^LdJ@GrbfrG%wb0vCthtS_GFBB^bnq?+}xPOsVGGAdhRh5?vRgWo`yNg=fcoi zzKpPK!#}%T8ym6q^c%bpV-LVMELD_nAuhs&5>XLBc+Jk&OW^KSsfmz6jnEGZ_&j-9 zxLqpZLBM$`O5mLk$5IExo}!EBU;=)bQjf>5YBhBQNpfe~6L2+y-lPTG#9Hm6B**LWS*oY4K5 z#XV<4uOt*l*2fo5j+(Gr!ws#2X~16f!8eZp#KUS zxvn(d;*k=8PrF%pCUe*$<>$QMeS4!s$(6IO>PKrr-{-N077J|W!@t%abFeP^EO2Y3 zaM^I=Daq?+iq4ls-=1r#X2`#8x=?FxdB0%%bX~?Ps*>gCQ?{hvnY?537sZ$PzyBVs zl5%*+vF5m&%Ad)aBVOt1d*wFS#+0)x7gF4OuQ@GBmscP2rfqo(UD1jl)FiC0x9@c# z7`!FyHROJGImfCt+26X~;|wA9t+?6s5VJY%l~J6W_Wjdk&iTaJmdPD5uDPWZ@#_>u z(k@fq^@KtP@DFO_e@v?~J1!lDU*!7?$?&`rb*yJ$eOf=o)OwAbH^$qIt&dg zbUw{Bi?l^9j=W!N7$uUAfh3_fnWLS%>UvwmFFVBPkDWMywhnZkwjg2UR)o9K z8&x8~8Djsrvu}`Ke{v;Cd=fXLcVV}=BF?RK*>L0HG406e3;5_uH|JE~Yb7X6682_Q z=DrYoubtM?Nk|YA8{8wa%^~HtK4GhvHM= zsK`wXukO}`9=BPO_GjS@;y1haXNip+Pm5DLBKlf1*ShLLZ7Zm+6#Y2cEI zKVG~ie_+DwsaXxfIDq`2$b+_YqlMmI-t->0#g4NAUTT?I<+stU#c##Wt$r0ia{nHr z?R1t)8bP?EA%chw0m4IEV;l~ma7j-vt?U0~U{W(CHNX&#B8CtN!htCppb#7$h6J!= z4Y?7P{Z7`x;t;-=3(@gh$Q*N+pyMmxRhy>Aw^(#;er|ecuyXLRoPH{|E|X-)a2je* zQjQYsDA9%q+cu$pY#5f2q#{@nrcz8P#uS<%qGx1k)nd0firLO31#tgNnv zsQ#5#6#ku8tRh3A!xQ(N#HHV_u9)SpP8l_4v?*gl`wtW+rp%rf&v5+UKK-hB=jIH`WG} z*f6w`s$xa*=?9!rpDWDR)9a{vOf=RpF6mkhH7y!~*$S{C-`o3#`5p(AM1y1M1 zUy4n-bEfWYyRRLN`6*-k@mh&$)`_fxPwnJ&^V%QwSAI$q;7BEyPQJL<<~H@kD#3Z` z*>gQ@VtM`KW$#zgN@JjEzHRxY5_>XQv^TB3vWz+zzoL94VgHFccRkPDlnm>u`rKmu zc0!VwZt#w@>GD;%9-%KsY|SQHD!OS#B9}Oe2Ug+O`kNap{QT5j_pCnC;rz^nnelg# zk;j&fG@{5WC8BsK{E8l#RN+MHAM1`uOEs6y$X3;~ZX80Cd2Us_3?ju|@r-HacZ8Dp z-R9t-_42I-JA9KPJ<-o9FnxtbSfqOl!_~$rfQnEMUBp-yp`cc);0^!XBOni(u(1D` z?2PnvZMFL(&s$6#kB+_PFxg2e=(zJD+k0wc`E6uRck-EV2h;IO+qt;-x9Lw*kvPY6 zW7&_44cWJ9OPPA&V;LQtK5wqQ(TK>*%?@=v`B_6oxG#7vNR54g#bzB2`!ThlIbhM% zop>mGrPjgbSTk8+k1pDu3OcaXr6Q8kbfx?k6G)vBe#*Zj&Ejognpsn!cVV-u?g zB6FqNJOyWNjSQ;ld32~BRs7a`dD!gwTgrXCUv11e7I(#V!E4^BM?CUX0$pj& zF->y=c7)o4?Gc~9_J;^Vn4`_x7TABOYa(#I3W6v}6DbH{j8$o@Leprx^Aqi_rXjD1 z`b)tq^tAv?W|b=vZyu01Vn!aHmqe$3vBFM<$9RZ8J1+vb$#b6%?QmQZ(0X@-ac6(M zWvI^9$(8OJc#5)>yj+grBVoxu4lxj)YlyAb*TA&H9yZILJKZo5sCr$7y>`*R9oo)GdMQziqKkp&nL>VQkL|;CNi?&fdg2ar@o{|0fK|U7GjhW>eUW z1C06gw>1=3Zzn~|sT`?v3{H0qy5_%dK-pr_d*79&Bi2rIwChHju5IGP zW5)SSzO}z?kDur&7g|lP3=5MyN z+xl;lDue`F#8x@|y|72Ih5Z(l6@?Z5`;y%#3a>|Bs=)2~oMPVcCPUB?o|A)cP9U7) z1mWK~S`UYCIEV#72x|)n2*QvQ1*HhVvMXF29rS~vn0xhYT;279LqZw*B4W^+Vz8>1 zD~Q65|6$l+JPrf^cl3)GtjQ7_O>-l@y+4?@jufy3!T%H=5B$v<%_?( zBW025JFTJZI|ruUPsTPqxLBk%JbUwVxQDlpjvLpOH20_b(axzr(vkh0bh_24SANn< zezV)8X?d%?9AhS|#oH=xvF@|J87KIzQ}~u2w=ruos5B9ip4N}!guEt@{oerWd@>PC$P&r1Epx{*H&8iN7~`n~C6UmxX%W*%MI z8N_S`dia+*^PUcrw^(`-YqOSXa0+okh?Q8_Cn;-p~6|kd6O3>r|zE@$xSJ3 zDw3zR7*Key)+;fPqeR0E?-;$guHQTqaR z>*KDn#}f%jlS6Cw2oLzje|AAVlkaCzoUbRr`> z>OeW?VVUq1)5h`p4_|O=qPrBQZX`oW>^b>#Z4cAyTl?CGp84^qd)Eq$vhs949vd{! zBWX>y=zD0W%(Pu`?$f++t-L??dYSdP_HJ1#r@@q2?Sc}CP^70ZhUz%LJUE?yL|^`a zN~KS2#VcEL)OFAEvrk(+hr`}@-+uB2X<6tTb($mI@^=|Ktt4xrf3tgwfZhbL*p=2d zA*`YBtU8gVB-GGn)ZY_u{Ed7}ngi)97k-3rVPhDA5YErD|H~??fflI25-U=@7MK+q zOeF1es6A7=DyvSV8`hz>)Zjdgp_%3mWR;BA-$kEFMGR<$zJCjt%oor^by!Y~*BOQY zB7y;iS093*B?Mdgm`$?7L;)}~E4~qJQiq*ctL{wt#@j8QS|4;Y1wYxA({}ktZK%%u zpc71DPsJYFw$&M5AMc4dPqkG+ma*m@+-B(pIE5~BSS*4iG6jKgod~2unue1{!Ekl$`_U2eLX6f zYb=BZky0vNK%&ruVkonvWt?2)c-i?tAc1}Cp2#12giAhl_h_3A-oWAaS}rKZy|cOD z96$9+>dt$8(S0K%eeckh=XU0r=abY_j)~s8vH$U~LXYl2w9!RnN~5^;QF!w}Fv_vq z;bN$iR~M*tJ8yilW8J(0bYzh7Y130}DN(pTnW1ynqA15cdCum?Y)M2aMf-Ef$3iRl PHzpZCVjNf diff --git a/Ventas/Promociones.aspx b/Ventas/Promociones.aspx index c21de802e..9c22f4fb9 100644 --- a/Ventas/Promociones.aspx +++ b/Ventas/Promociones.aspx @@ -282,6 +282,8 @@ + + diff --git a/Ventas/Promociones.aspx.vb b/Ventas/Promociones.aspx.vb index fb16837a2..8145920a7 100644 --- a/Ventas/Promociones.aspx.vb +++ b/Ventas/Promociones.aspx.vb @@ -7,6 +7,7 @@ Imports DocumentFormat.OpenXml.Drawing.Diagrams Imports Extensiones Imports iText.StyledXmlParser.Css.Resolve.Shorthand.Impl Imports Microsoft.Owin.Security.Provider +Imports Telerik.Web.UI Partial Class Ventas_Promociones Inherits ClsPaginas @@ -173,7 +174,6 @@ Partial Class Ventas_Promociones LnkAgrgarPlantillaPS.Visible = False - ValidaPromosiones(False) If EmpresaFnc382 AndAlso ChkEstatus.Checked = False AndAlso BloqueadoPromocionPorcentaje AndAlso Not PermisoAutorizPromocionPorcentaje Then ChkEstatus.Enabled = False @@ -792,6 +792,11 @@ Partial Class Ventas_Promociones End If ObjVentas.Dispose() + + If Not TieneError AndAlso BloqueadoPromocionPorcentaje Then + MandaCorreoNotificacionPromocionBloqueo(CvePromocion, TxtPromocion.Text.Trim) + End If + End Sub @@ -847,24 +852,6 @@ Partial Class Ventas_Promociones If Not TieneError Then - '366 Estatus - - '367 CvePS - '368 PUPromocion - '369 CveTipoPromocion - '370 Cantidad Minima - '371 AplicaRestriccion - '372 HoraInicio - '373 HoraFin - - '374 AplicaLunes - '375 AplicaMartes - '376 AplicaMiercoles - '377 AplicaJueves - '378 AplicaViernes - '379 AplicaSabado - '380 AplicaDomingo - '381 IncluyeImpuestos Dim Dr2 As DataRow = TempDTOrigial.FiltraParametros($"CvePromocionDetalle = {Dr("CvePromocionDetalle").ToString}").Rows(0) @@ -893,12 +880,7 @@ Partial Class Ventas_Promociones End If - 'If Not TieneError And Dr("AplicaRestriccion").ToString <> Dr2("AplicaRestriccion").ToString Then - ' If Not ObjGral.AddHistorialBitacora(371, Nothing, Nothing, Nothing, Nothing, Nothing, Nothing, Nothing, Dr2("AplicaRestriccion").ToString, $"{Dr("CodigoPS").ToString} - {Dr("AplicaRestriccion").ToString}", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, "Se elimino " & Dr("CodigoPS").ToString, "PS", "", CvePromocion:=CvePromocion) Then - ' TieneError = True - ' Exit For - ' End If - 'End If + If Not TieneError And Dr("HoraInicio").ToString <> Dr2("HoraInicio").ToString Then If Not ObjGral.AddHistorialBitacora(372, Nothing, Nothing, Nothing, Nothing, Nothing, Nothing, Nothing, Dr("HoraInicio").ToString, $"{Dr("CodigoPS").ToString} - {Dr2("HoraInicio").ToString}", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, "Se elimino " & Dr("CodigoPS").ToString, "PS", "", CvePromocion:=CvePromocion) Then @@ -1043,7 +1025,7 @@ Partial Class Ventas_Promociones If EmpresaFnc382 AndAlso EstatusOriginal = False AndAlso ChkEstatus.Checked And BloqueadoPromocionPorcentaje Then Dim objGeneral As New ClsGenerales(ObjVentas.IniciaTransacSQL) - If Not objGeneral.AddHistorialBitacora(360, -1, -1, -1, -1, -1, -1, -1, "Si Autoriza con bloqueo", "No", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 0, "", "", "", CvePromocion:=CvePromocion) Then + If Not objGeneral.AddHistorialBitacora(360, -1, -1, -1, -1, -1, -1, -1, "Se Autorizo con bloqueo", "No", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 0, "", "", "", CvePromocion:=CvePromocion) Then TieneError = True End If @@ -1069,6 +1051,51 @@ Partial Class Ventas_Promociones End Sub #End Region +#Region "ENVIAR CORREO PROMOSION BLOQUEADA" + + + Private Sub MandaCorreoNotificacionPromocionBloqueo(CvePromocionNueva As Integer, PromocionNueva As String) + Dim Asunto, Para, ArrayCC, Body, URL As String + Asunto = $"Promoción {PromocionNueva} requiere autorización" + Para = "" + ArrayCC = "" + URL = "" + + If Request.Url.Port = 80 Then + URL = $"{Request.Url.Scheme}://{Request.Url.Host}{Request.Url.AbsolutePath}?CvePromocion={CvePromocionNueva}" + Else + URL = $"{Request.Url.Scheme}://{Request.Url.Host}:{Request.Url.Port}{Request.Url.AbsolutePath}?CvePromocion={CvePromocionNueva}" + End If + + Body = $"Se a registrado promoción que requiere autorización {PromocionNueva}" + + Dim objUsu As New ClsSisUsuarios + Dim ListaCorreos As New List(Of String) + If objUsu.GetPermisosPorUsuarioProcesos(-1, -1, -1, -1, 386, CveEmpresa:=UsuarioActual.CveEmpresa) Then + For Each dRow As DataRow In objUsu.DtResultados.Rows + If dRow("Correo").ToString.Trim.Length > 0 Then + ListaCorreos.Add(dRow("Correo").ToString) + End If + Next + End If + objUsu.Dispose() + + If ListaCorreos.Count > 0 Then + + Para = String.Join(";", ListaCorreos) + + Dim Mail As New ClsSisMail() + Dim LSRutasMail As New List(Of ClsSisMail.ArchivoMail) + Mail.SendMail(ClsPaginas.EmpresaNotificaciones, Para, Asunto, Body, ArrayCC, LSRutasMail) + + End If + + + End Sub + + +#End Region + #Region " ELIMINAR " Protected Sub BtnEliminar_Click(sender As Object, e As EventArgs) @@ -1412,4 +1439,8 @@ Partial Class Ventas_Promociones End Sub + + Protected Sub BtnProvbarEnvio_Click(sender As Object, e As EventArgs) + MandaCorreoNotificacionPromocionBloqueo(CvePromocion, TxtPromocion.Text.Trim) + End Sub End Class \ No newline at end of file