From 855f0bfb1383f4fd6b1cfc0b12c3f9523ea1f787 Mon Sep 17 00:00:00 2001
From: janeth arvizu <janeth.arvizu@adssistemas.mx>
Date: Wed, 16 Oct 2019 14:41:59 -0700
Subject: [PATCH] Layout PS cambios BDH

---
 Empresas/Grales/Formatos/FormatoPS.xlsx | Bin 8651 -> 9045 bytes
 General/SaldosIniciales.aspx.vb         |  45 +++++++++++++++++++-----
 2 files changed, 37 insertions(+), 8 deletions(-)

diff --git a/Empresas/Grales/Formatos/FormatoPS.xlsx b/Empresas/Grales/Formatos/FormatoPS.xlsx
index 403afdc6f08c8266ebb65947302cfe08977575e8..4f999e2aaa4f68e943aa6f59baa4c5fae46ab406 100644
GIT binary patch
delta 4152
zcmZ8kWmpqz+a64sA!CG$7#$L$Q&B*2G!7&sMoELD;1n2LW3*!;AxbyWAgv+-(kZEQ
zDDi;s;`4pq@qEvF|GAIjzRzFRd7N>5R2@@?7$AVx=mDevasU9p3D8j{20yHV2oR%n
z^}57pF~^#-oCl1&9%dX7*^fJi=x!R)*eq$;k5!2b)z&sRE!C618VQ?D5a}Zvx3yH=
zf>tQJ5aG<*FQ@Oa<B;&Go9G?X-j@me;Hef_fHxUe6zG8(#Fu=G8-C0NkSzCq5SuPA
zs}<u%mGk~RnODo`$)w<t1AZWPqcI!(yoH_G1GUZeJRctnGE894HKamJEyv#R)Z}_V
zKlOXfW*14x5GGy6#g~RCLcd$Fhzb)LWp>l;5bCA%sZeb{Z0@Yz!Q{uNtI8N+3CO-1
zJ`Sr<NrwTu>piyE+o^3XI-u!^xI~D6*gXTN1z^JsyOw9%yZ!F?)OVlfuV-eg_7Rtm
zEuW2&!wwbNfeuq6GPXt%{!59Uy5qT*-&=JR)xsroyCnPO10*S6+Bx#kp0aMequ`WD
zuxdda$*p5vL|z}>f<d|6XeD5A3$RcZz$($oKgJKJ!2;!h=-x}3LNy=&Fh>ReT)!H9
zpc_2E)5q1$)6-Qn(A}*RX`w$OM*s9>?IrE%?e4|~Fp0D-Fm3Wakv%+(Pu4p|gU+d5
zHSYEAV>ZRsj=PX>wX%x+^<Dg74sLl=*NXW#g6cyy_6IBHD2MK6%IVp}Pw<H>X)zF|
zxA9`EGzx`QqO~OuLe9Nf9M3%lCUb}Y2{*C|Q{CNWxZqj|Jz!TYprTN(tFY|{PxoP;
zFe*bjuFVhrV9IUiXzv!-?gC0(Z$6AK5Z-+>($5}&qeSGwwWnj*%yZgF%X`nuUCZ!e
zB6o#d)K<eur4tmAoEkvOfo9LASop<cSf6s9v!SmgG&fV!6ReP<c*#za1M=K$!cWOF
zHk9IL2$LJ(Y|&4%ZE)Z=Qhc^%=^Kj~=1J)uU@bQwU!FsxEbRvVSiRO}Xi!=|(X^IJ
zw)HV+w*IAe85c539fQF$-cPYZsf#(d`aA%X1Wxd=mDx=ASxJd)<680StbDX*-n<l^
z=t>^QxMuQn`d?2R3aj{efnb)56%7sf=d(l<&*i@?-Reb%_f<<NSSNhaYRLs*-5V@R
zCpJr_rlz)n#mhLc*BIj@6NR`KP2b(j%#@ZY3ck?HJPBev50~;TzhxgT8{GT*M1Kh2
z&Az)Ln=$)rU%2%dt>w2T<m3^plWUvQx6n!_N27z0))HQQCX4!g>9F9p(uuSE2gF0F
zhN+l=z;mk7MO(b&?0^po3L`J^dl6HnA6PTvZ7@5$<aMcE8!9|@IlOiBR1krbZ+?Xm
zq46;=wm(dhA+c~ZW@k^B2tE}OK~ZR{T+r%lPkg3m6?yJTAE^Cn7MZHP2D#~?kLC^U
zGa7{4JmMB@vLoi7V@WVMl|M^ld-JI{^Jc~S%)SjuB_UR}y1BQkrl)w8;!!va+lq>=
z=^;gGYwUMn<qhhoekxAC>j(KA6Z^w*Dyj=A#_-DX&M$SOZR_TcJAOsVQo2Q2xm<-x
zMEjQl5eigGa}8?yqT(47tm^@LYN#fjl5137?t60Wh3d#qkWw5x%X=xGwW_F!;???Y
zp`0D0yi$O3NoMQ6Nme@lAd<9RNw;!~1A^Sx2r8X+Yi@dI`HO0%<F;1&i3IZL0^wpN
zZYqIhBkp)|`g-x$a81Cx;wcD+1=81iAeAJh$yhjQ*dhi1Xs=xE1^~y-2}R?P?w-?P
zv=>S)mz)R3eBK-__acfh)qWNwE)_2mygMFU2`uRCmB4b?=*X4H88DMdcaCRIcS4xw
zcB;QliM@T-Zy#X=lNT<s>pXObe|nKQN1dE6HNeEfARjj@Wc=O#{9?{oXeG{E{56|R
zKQi9LoC&)w*ks3SST68@2CW#A%sgC~iqL0B!D5gfjNp5}2^nBQehO#GgjY1rw^Usc
zD<|Oz-WZhN@M639z6#QfxiwOh`@q3!)&R?JSA1P?q9UDMo;iU%qcIspc;6WC4)LZ2
zw|8xC_r7Cki-X|ueM(-sZQ>f!zh;##zOV#GjO%P4K2!^DCZJe6&~$;hl=EwJG_K`~
zcgKUc%_{gLzoiUk!|i@fEL?inbg!+#tjFf>NU@8^p(gPku);CJY>5QmN`glH)2H6`
zNDW^N+-X3%L^1PZN5A;0JkwGS0H(YG%&!J?X}(!wk+F4w<`;?HKY_X0Gv2EtX0di(
z3AAR$Pi0@+%ppOb`xV9@*o!r)R^qP7ZBkqGvv68u^FsF#_wvWI$n7u5##mxVOHO=O
zPWW9XlvAJkz(}XZ<gsFUM0pycnOeIkoT1aRgnZdroP1X4C@M$kL3=KFvkADjm1~Fn
z^tO}s&^zyAE`;Y0v3(C+Qzu8a?GXMV?DvH=q*ojAa8(ZdlWS8hzK+YM{3ny?z64G?
z)N9zjLMKfmQg9e`E5&ZJ<2I)MO;~1m6nAd88}vsGct)3;K>WjTE2#yPN;}8BGebUm
zPiHzhHzqTkT;RpDc2P{Av+v^<(Pk`Q88B=*+8VN7mGE5_oaEk}8*}nio%%)ekQ0|b
z-B-912fv|fr~*))V)Kx>pR=5ur|q*+#D(Qif}Hv)gY2r;LrR6C5oqTMy|@TT{puuT
zu$+;gZhFoe;kGd0DF_xp5aM^BC|C&iMl(>|IN8XENqbL%rvl~Vo0lzq{MbRZfU(At
zzbe7}@c-2iat`}j2MN?sWN4JZ0GruW>a<V*0HFU#9pA@6ZVtYGGN;94CUI1ZHdJE?
zCfx4iJ5^ANG``osLP0@0B1%``u~f_0cCWr!TR8-<(32$YpCZ$2dBnG$GKp)%XUW?;
z?Kd&7&KbC8rpPA_amBw8M)s`8^t~*Pvx&u4-7|?0(((;K=aRNtw}n)R9d-N|OEik>
zz(~o@o6UUc`jV=6Gg{sll(tuBVopnC(F)Sd7knEpNq0*p&zX+$J<raqPim*M{9)hW
zXM6%_&e0Amy;-*dAKr-Zx$qZC<71&Qn33b<eY6~-XHXKwVf~i{Yo~TueDOB(2?%Lb
zlX5{5!1!6k2u-;4e7z_rwnj|bV|9LmKUiB;*E7=<W-a=Nw@kTk8u4PefJvBXO{j^J
zb(&?_t5JZ#6l(UJj(z~a1Fju?$ANd3@_i%?j)y6DFI{V^Y9-hhIPz0l^^5M^S-z)t
zdg>h_2i(80-gj@vDv#rV=reHoBeM?DUz?k%Ko@NePc+%Y=3IX3*a|KGR2L|IsnkcH
zo@sgM^?Vn3YDos!;=|-V^&gaxp3Y{}N(#e1oi6UL9JAd6cHEJ`p@eEi@+Qms@os56
zvvoF=-<cNc3-AvciGEuy<f&S4H!@)=Jxf@--ZZa)5FKN1Mf4o$`Q@Mh>DjzMr?Xpx
z=ICBm6uNcN!0P1mc(~>9s-)8Pf>(W7n8JHvj*0_AAp~MmpJ(WW7hXSOPN0f{etSRW
zRsB=F$eg;D1pcp1l{*I_xm3S-<`2?7vyZ&8=Ry}N{Or$oeBYr@JoBLZyK|A$8Rh=m
z{^E^w=9%$;n;Yh#aO4G9GMV=gO>*D*&M7H13kW?@Cay37ZiI;R-9h(f-*C*;>HF+)
z6mP-D)|ZlX$3H4-D?#a9=VCYsk4*Kuu3&&sU6Iz&!?Na;^LW^+=Si{SsG;p&`}T?Y
zo5!_wPl#%!T|-f_AA*_WmC6<xf&2uy{@S`-YW&Wg`jbJQ^KGABkLufmQ*5ARua$%K
zYHZNyW#h`})}`Z{c8t8kJ;%eyv-r62OJ>0J<;Na!mVHh7^<-$jl-0o6AB#_*z%B73
zGl`gals7&7x*=-;L<000cPK1SEoY`bGUi}{;@+Bqz*hv~mv<foEY>tSg!%AAS%cW1
zh*w&bzcuK-eTmuoIa7B|0svfI0s&V=8<!2FqEX1FW~U|s0Ipr-5j_BB!@-DtY`Cr6
zEk=6|KcV5gY`qT#yZGXfoiH-8?b{tGTXoOZy4-@l+s7n%!5tGJn4@zBi5kh8uJn%q
zij}w3CFYUm!G>OudO_}%ru*(^K7K>Yyk1b!-O44HW{4mhuASFiJ#N@@mij)Nwjj9n
zE*0#HgX4NWCbhi^LeCZUnjI}Zr94aDlT&HK>hvK=bamF^v%1r~dMTR7ECuV3;%EK(
zuu!v_USlOfiSw;<*auhrx8o60fuSb~O_dtaVCUjVg?!~2>5X%}fnb1yV*aA#I5aO?
z(8RWX8KfR=T%+6VCaL!DrR-oS$pg8N3yT7?I%74O*%y*KbpdzC9E-^F&??vpfp(%l
zMn(D4R<1eyYCf#M8Y(D^2py85tIsV?9l5J{22*d;m(0>8$@5Qs(CvaX$s@0AD7DwN
z;ftZmcy&qmq*1h8JZ<6D{uI@|f3Q~awnm?NSgzU5&ZLrBM9zK7v4=2ze9G{VORxmF
zEnGfH!`=M$sikly!ixw^wl1FBnaP`yKzAP73Jw|wijZ}?kLShcqI*o4plX8DEISM#
zZ$Jmt0*o!nM&{ThHnC#}HbD~v8Szw|14?<7Rw*N}aaoIGBDT&;Q;}^x1#Z;aA=56b
z$C+ie0(u)2&V05r^)>$UN!T@}^VM$?_U(^6+}0U5O46Y`%*9pa2VIh_OGmqk#GoI7
znk3|J`Y{`NX5oJ5g*tsdNAzO3pK{;VK)OP`1aR1XYMWOFfhVQO1j|11vJLvRq51iq
zr|1Cj)9f7@(oW8iFN(4{(FzFb{?5kG)u4+*kI<pwYTAq-P9N`9(RCyG>dea@GV(um
zTbStv<wh@KCK?5Nsvcyh#A1Y*G`er+ZVVZMJuGh=hYM~%;A2J#X&OegY;4y8`20eK
z#$*A1^8|Zg6}NkpA+ba?k*rrdCF|;UiT$DJJWAkLnpqQ)J)*OWu;i1ApUeNc&1J5r
z{r>C46KV*F_lo0L9jv{6Dqa<?m+Zq)x>`MA1PFda>|Yl$cSqEtpufj<IauY*>NPWu
ztyN5r7CmPgz)XzTS0t&hyUu6|X6w~x$86>z2rBo=R#0<ixiyPJ!(0GyO(VgDHp0(9
zQgL#?)vR|)X_qQ22QM!UZ11SaxDCqmDg~OJXg5<S8NRNMjv7{l6RNJ0tN-2+SBxqT
zM<rzED?;<SVi3MRyHC1DJsU)URA?VQ_Rke{ACZL>br;hIR+1a*F-Jfg9L7lU_o9r`
zhM5p$;$FenS^s;VyBf^@o>o#EHwP!K9R?+aQ{rY|!mR&pqyLBdbK6m0b<>-;NDe4*
z#C2RA2QS}$C-y&RDyF};#=r9$=gq;u`fp?T2M7QpL9c9vkM$pA0RZ6t{|^{s!J#<0
YS^uH*sw)2rkj;+E=j0-7=lJvbA4Z0KvH$=8

delta 3786
zcmZ8kXHe7I9{kh0w9rdP6bQXHMFEq5B-Bt8q$vUENR=LqNEIoeh+ybdQHt~~T?E7e
zi1c0zAXP!&aqoL?oO{ogb7p=!=flqK?Eb!J_ruwZ&=iy)fEu6$0008q-gxe0Q^5`+
z$MqX@$g&_0uKk8DNTDVwHEESd_#QTK<11~Qgzi%Nn?z^lQ)2WH%henX7nKUOp^0Gm
z9|KO69_}^xsP0A#W9)<8HZvPO6`8J{@4~HIJW1Y`7Ms~1K213uTiZCt4B)9(Z3jjX
zF{_1o$?L?ydFB56^YI>Y*6Hqg#!|~-oLcX<_89~7DOS~YC7)R4huJ^7IEw|_?95B)
zQpQ4qCpi6W3XC8(OvG+u>b(!s&@Dc&I)yKG_T*Et5ed!bCI_df8(UNa^%Z$5OJa6Q
zExQw3C0awQLV{XhPhxkC4jYs?oNT3T5;Y${@E^wjBiGnBoMrMJL!q4-9C>>EH@4mi
zO&$r)vh#ON^I;o^@d;Q1Zm7HDOhFG3VW_4ejt?v9?W<F5GbGvbhj<hY(=1RTf1ZN&
zSyvl&+OD$nwLva~Mv`WFS1$#B|FC%T;l_{DRh;|@byX6D8b#G*dIfTvH{w!>7C8W9
zQUU<;8T|onGWR^aU2l7Ox=IJQyS+5k_xvWy*vveJWAQaS9?sW&tcuJibbW9O7W1lk
z;cc()OJu6LE|Hz_Xfux#xITi8BtebY_7E*PE?!|UjwAetZk~zY^YF|ZP7y*-+IBqi
zXdcg<!H0vIJaJ+gxw!e|{#sAYxQe4PxnONzyr5~T1%+>mCP&{DExf8PT3;a?U^#9*
zBOaSjPd=O`9@ViW3Da_!I)7nbiCbi-piScZ8e8?ImZbO=s6_(1Nc{%WME#1g@%4*D
zSqCJ`&60c#|Ln{ZX#J$K{jC=;5?qldp)Z8Y8g(m9p<V-0jLT-;Mz$DpBaE}Qy%W)o
z;xCgJOV=opNfI#%RD-V-R^`yYl2Z%Yr<L8Ttw%7!&Wf?~YRst`1$9-D9sDkf;A`Pz
zME;?{r62iw`T5exIxpJi-#HobpV*z+{#q-){s`hXb~)@-0a83BwPq2o%|hokDex2j
z#k?RS#Vudk7Wd_w{wKwF5KY}cLq5G1wy7%ngZrz-IXRD=$3X!l>$VBZxegE^-b16{
zBSTbbY)v^>Sb2l1o|Gg&%pcSvc)Jkh6&hD-van0B$vv|H2Fu4&Oz*5`b>H<lk2N1N
zHn>s+<z}RBpk}&5@KKhpNJ-z!v4d{VzVcd&&t#0XI7*mSOs&bXYTVm^@t~RZ)_W}(
z(QfJ6uZLBeo<{8afLUc3XwQFD7aZs=`r)M15;ICzJ#-0G`?Zf-&rmdskjag!1lGZl
zQI|s{51!iM^MW?na|3iEA!~MZ)xXaH!09Ok@K1Yp5o7OfohdDy3;;m5|4Pos>6W(x
z*2LG_+2fASU%GQk7)DXZu^^|ZP9Y1Ej(b{&N-;mPtsEn#BQm)BB-3|;+aest(i-hx
zpP20OJ+Xy}`h#=!X`7#lr^@f@eO_Bf=5Zt$LNL>7#~Z)a3?yD@l651-)|j!)zG+;k
z_2NI+YJ-ZErulFkVQq8)iSkLXNK=vGZK>v2D;9F*C_ml-{ZA9m=%CJvpAt)VQKZDV
zb=F4P8A+WxFV?Z?S1e4PD~WEy!HJ>KU;D>>oVj+s1{~}KqKui1=(i>+inxV}m8b)k
zZ>x~^z<0N7M|op3d|qzD=5I=}F5k+)vndqG7-o>b3f>f!2TWCA%o#K|8U1iOUJ3v>
zrU3w^|FPm5=;rV@9r<Qxk8iRplUyqTlp7qOZuK<~v8Z`k+7HxZN#v6s*@W3=b%a(w
zdkj<TS~cH@Ovb)o8ZYeAhUzGE94rkOt^Oh^Y$n3=3wn)wIic}U7;{rap2Gm!pFRuD
z50Q`3K^NdSn%v>QlYRZtfd`3=QjqS4psRPBT=g0m$*n!;dJgq!5N&Ce;!l{|%-C1V
zS*@J;IxSctXC-Hz(tmcivAwOPt7^{NI3gqLS&_r{u2`+ks&{^IyMYxm%S2Ip<P?MU
z1P_?1XU^yuo|}DRis>KE)cUA7q9oO4@-o(rb!IymNB6Ns(j=Mk)&%R&CrkRgX3R!-
zUqY9&mJB%jw<P@$oubzB>%=vgsq>C@(MAbH1z1cVbqtf$bEKWY#d!4l6>Z~nb9;lY
zISM@^GrOzDs*hYO?CreN=QBTCY(3$>ml?4Gv)9>YM}rsx>EH6^BFOk&+fIWmv&FJ$
zF4YZg;=ogJZzEv_L~yonUJ7#9>PhS+KOXIDw`P9efLxHTMEq%vmX3tQop&bME)+^8
zZ@!M#CQ7NReB^ejRxg8j<hQ*?$s%?cuH9to-uRvwTB>t7spx2&{gTaHA8Q9%k&ze`
zNwVv$-?#nvdQXe8Y3GiFR$9FhBEO{yc=(6FO>wi`W6zgfO7#4E(`xsIHFHdwT61vG
zTo;a-m*yN*X@6?i<AHep?)0>?DfE~(!um}Hk?ZrFsEwcFfh5skIVz9ybU4<n8?-}%
zn24|tE~OFEhnzi`83GOw^!?H{bq~M|Im`_eN#zjo(kn4P%cg+*@vNZUP^JA;-$}o4
zYBiiVW?n$ypeLT^Vwpxl%!aD3?xr6aT;L@p?`zpwTP8RliLF%GRGN_3+V_ufTv`9J
zHhDYLtn)<OYT$S^{K5&;qU;zORB!n@7Reo%HmyCnCn4>6;QD|VQ-~gzL0!N6Rq*#@
zUuw>9;loXBLA&@0nK_GqL`06Q-rL@+!7b&9tRazT+Y81`ME&d6brT<#i^}}I9Igdo
zYK;s{mSkECH<oi!f+^PEuazG&MB5obRgY_TvIvP39P|M6lZp3PhLNZUL5za9WYfOC
z%+k!YqQTOnlOZL8Cke%^cT>@WtcO5Kl~GZ-sE_{J2Rtrvxuvudu{z1qO%{S#=Cy{E
z7eqg37rW@gWwI&7U&$K_jO;GQPY&SO>@89%FlOb2Lv|~qrQ^mg7OOfYzzsZOip8h5
z;}?H~b}%Ho4=9bGKkZ9NeUF<n28Woq+F1}Tpf%|6=`!iXPW=fhuBxU)hI2Q&;@QN%
zB{{*;yH4~WE}yD&!<e394}aX4zANmSe+?=2-3N|}Ug$e95*zr)wj4%Z^!Q+6;1)uL
zYV=+4M9{V6+PEioY!1=jbmbR%Gn5`A1iYp2-mPu5{1eA7-<Q+wR|Vqs^d!-(aJq@B
z5%R`!BU$2mEBAv#IE3<?fhUPx5(amf9ilr~#eWu+u?iolT1i^*oMM*ud~AJ2d-u%<
z$vkz}7d;cdk~7Tj^$OkT`50!hOv4iScJ3QD*Ze*KJ9JZ)|51BH6U^VQPCOBWiv|UB
zl=Jivp9O5FicYCBrV?;!m0NigsQs>nU1hIv;oD6YFiH4|OS3@%3OpqlrQAmgB`R@q
zzo4DcuN~6;B)Nk*`Ip~uE?LWWO9w6?V^tsDIUOc@R*_C&KTUS-#GfYYh35H#REru5
zXFm}q<@bt8J|j%*qTgGE5hVVfgE<-eRyFPY{^OJqr{VV^??o|t+9OmE6Y;FWEEVpo
zbzjgaeJnq`-pdI<{p}Izh!EcMj_}S7ZaFY?-@fy9l%~pQbHyUnY#w#<rlqlq|9u%f
zFv8&)UEsV>lSD)HjhWdhv+A7`1yrddZ-EBKPYWuL*p^800_y9@Oi0)-BTt*ZC0Oey
z)QLC?G;8vzMLsYYE<DK?-60Elbe3Q6zTk}fM<qEV%^o5@tvP7=s&_3%hT?@`kJG6)
zlP(VU`1<9EO=7Tai+ZuhA^G~6IaibjB{CZ+;o2<m0bTvX(|AFBG)bi_f?S|I$00B@
zg`orCI@?!6{ql7?@<F};d!c6VCR4{)^kvva(#!{~i5hd97ntZD$;1T?p-~maKHvzD
zu3xUB>2`$XvSVWCoUgbm0Qqen?vs-Q3hBBuY?#gKHTb9<mQ1TPo|S(R+sKsaf*EW)
zd?9K->ZhB=BzH9|W?DIZsH4=Y?C2()rh_yUJ7=Azd;MHPgh)>n2G<gCsg*8mYD8!=
zp0JLgdkN7vq^0C}B<uD#%-p6b(yUtB0kxv9=cKn;s%W1qo78;p5Vv<Q+l{{%cbZlg
zWr8V4cHlX``Z$0(S*_(K%c9EPoQjftFGxJ&l#8OOQt*t^r1mpgGe&Gu?4OI+h|BbV
zMQEBE=ks}wl>@rL%h-#<B4~Ukci)ubP$d_idtP)E=`&wn*5O`sZi7b6s})%Xz7XN1
zDhy~vzqoALY|i;;b?G5Y{=w^Zs`wPuTbu`nB))0`$ZcqBy&XfAM1^P!gILv9dxpU7
z$~y&gB~-XMMH1GD*L6$oDLj_A;BGOctIl@FyPgrC49c6&%^Q6-(!Lw=D=;{Q@#Poz
z<3V1bu!57@`t)jwrXlLQz9<7^moJ}UBz83)EnHMG&V9EIYd?9vzj&b_+no0J!-$>9
zNNFB2GUBRu<#C^VBS)7?@7TO)?n7)lyZxTKy*#c{+7T7R(E^utk$k^tJIHTklys!+
zPFti?SP}Yq8BRen8rR(3+woRubtI|dceMpP_w@cy(F{dLRH&A~>&!VO=H=LvN}C8}
zyhg>{Cs%Hsp4aGd51@RTmSe;9#gUoL^(1oV!w^;VT%gEkhUCG_y&J8&za@4hw$wN3
ziPHnHclU%(H}VS?9P;+SX9eZI&5n#*3i#LRM))jbPL@WHfCv&IAiR`K)Br%xr{^WK
zKv?+yy>6WS^S`r6OK^Zd`2W!k|3CZtwq_u_go+SAP+oEzBS97_%>VDo^aoB2B6vZ;
z{C|Q00J#55&t7OQLKq`20SRT{|6^SMVEqSZhlj8MJ<tC~hXBCx4}b?hLFzn|TInx3
Gfd2rx*w4NI

diff --git a/General/SaldosIniciales.aspx.vb b/General/SaldosIniciales.aspx.vb
index eae9c9693..3857a23d5 100644
--- a/General/SaldosIniciales.aspx.vb
+++ b/General/SaldosIniciales.aspx.vb
@@ -271,8 +271,13 @@ Partial Class General_SaldosIniciales
                     Exit Sub
                 End If
 
-                If Not dt.Columns(12).ColumnName = "Litraje" Then
-                    Alert("El nombre de la treceava columna debe ser 'Litraje'. Favor de corregirlo", TipoMensaje.MsgError)
+                If Not dt.Columns(12).ColumnName = "Servicio" Then
+                    Alert("El nombre de la treceava columna debe ser 'Servicio'. Favor de corregirlo", TipoMensaje.MsgError)
+                    Exit Sub
+                End If
+
+                If Not dt.Columns(13).ColumnName = "Conversion Unidad" Then
+                    Alert("El nombre de la catorceava columna debe ser 'Conversion Unidad'. Favor de corregirlo", TipoMensaje.MsgError)
                     Exit Sub
                 End If
 
@@ -563,7 +568,8 @@ Partial Class General_SaldosIniciales
                     Dim IEPS As Decimal = Row("IEPS").ToString.ToDecimal
                     Dim Tamaño As String = Row("Tamaño").ToString.Trim
                     Dim SATClavePS As String = Row("Código SAT").ToString.Trim
-                    Dim Litraje As Double = Row("Litraje").ToString.ToDouble
+                    Dim Clasificacion2 As String = Row("Servicio").ToString.Trim
+                    Dim Litraje As Double = Row("Conversion Unidad").ToString.ToDouble
                     Dim RinTamaño As String = If(Row.Table.Columns.Contains("Tamaño de Rin"), Row("Tamaño de Rin").ToString.Trim, "")
                     Dim Medida As String = If(Row.Table.Columns.Contains("Medida"), Row("Medida").ToString.Trim, "")
                     Dim SATClaveUnidadMedida As String = If(Row.Table.Columns.Contains("Clave Unidad"), Row("Clave Unidad").ToString.Trim, "")
@@ -572,11 +578,12 @@ Partial Class General_SaldosIniciales
 
                     Dim CvePS As Integer = DTPS.FiltroPrimeroValor("CvePS", $"Codigo = '{Codigo}'").ToString.ToEntero
 
-                    Dim CveTipoPS As Integer = If(TipoPS = "PRODUCTO", 2, 1)
+                    Dim CveTipoPS As Integer = If(TipoPS.ToUpper = "PRODUCTO", 2, 1)
                     Dim CveClasificacion As Integer = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveClasificacion", $"Clasificacion = '{Clasificacion}'").ToString.ToEntero
                     Dim CveUnidadMedida As Integer = GlobalDTUnidadesMedida(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveUnidadMedida", $"UnidadMedida = '{UnidadMedida}'").ToString.ToEntero
                     Dim CveSATPS As Integer = GlobalDTPSATPS.FiltroPrimeroValor("CveSATPS", $"SATClavePS = '{SATClavePS}'").ToString.ToEntero
-                    Dim CveTamaño As Integer = GlobalDTAcumTamaños.FiltroPrimeroValor("CveTamaño", $"Tamaño = '{Tamaño}'").ToString.ToEntero
+                    Dim CveTamaño As Integer = GlobalDTAcumTamaños.FiltroPrimeroValor("CveTamaño", $"Tamaño = '{Tamaño}' AND CveEmpresa = {UsuarioActual.CveEmpresa}").ToString.ToEntero
+                    Dim CveClasificacion2 As Integer = GlobalDTClasificaciones2(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveClasificacion", $"Clasificacion = '{Clasificacion2}'").ToString.ToEntero
 
                     If Not CveClasificacion > 0 AndAlso Clasificacion <> "" Then
                         If ObjClas.AddClasificaciones(Clasificacion, "", -1, "-1", -1, "-1", -1, "-1",
@@ -588,7 +595,7 @@ Partial Class General_SaldosIniciales
                     End If
 
                     If Not CveUnidadMedida > 0 AndAlso UnidadMedida <> "" Then
-                        If ObjUM.AddUnidadMedida(UnidadMedida, "", "", "", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).ToEntero > 0 Then
+                        If ObjUM.AddUnidadMedida(UnidadMedida, UnidadMedida, "", "", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).ToEntero > 0 Then
                             If ObjUM.GetUnidadesMedida() Then Application("GlobalDTUnidadesMedida") = ObjUM.DtResultados
                             CveUnidadMedida = GlobalDTUnidadesMedida(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveUnidadMedida", $"UnidadMedida = '{UnidadMedida}'").ToString.ToEntero
                         End If
@@ -646,6 +653,26 @@ Partial Class General_SaldosIniciales
                         End If
                     End If
 
+                    If Not CveClasificacion2 > 0 AndAlso Clasificacion2 <> "" Then
+                        Dim CveCategoria As Integer
+                        If ObjGral.GetCategorias(UsuarioActual.CveEmpresa, 4) Then
+                            CveCategoria = ObjGral.DtResultados.FiltroPrimeroValor("CveCategoria", "").ToEntero
+                        End If
+                        If Not CveCategoria > 0 Then
+                            If ObjGral.AddCategorias(Clasificacion2, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 4) Then
+
+                                If ObjGral.GetCategorias(UsuarioActual.CveEmpresa, 4) Then
+                                    CveCategoria = ObjGral.DtResultados.FiltroPrimeroValor("CveCategoria", "").ToEntero
+                                End If
+                            End If
+                        End If
+                        If ObjClas.AddClasificaciones(Clasificacion2, "", -1, "-1", -1, "-1", -1, "-1", CveCategoria, UsuarioActual.CveUsuario,
+                                                      UsuarioActual.CveEmpresa) Then
+                            If ObjClas.GetClasificaciones(Tipo:=4) Then Application("GlobalDTClasificaciones2") = ObjClas.DtResultados
+                            CveClasificacion2 = GlobalDTClasificaciones2(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveClasificacion", $"Clasificacion = '{Clasificacion2}'").ToString.ToEntero
+                        End If
+                    End If
+
                     If Not CveClasificacion > 0 AndAlso Clasificacion <> "" Then Alert("No se encontró la Clasificación: " + Clasificacion, TipoMensaje.MsgAdvertencia) : ErrorPS = True : Exit For
                     If Not CveUnidadMedida > 0 AndAlso UnidadMedida <> "" Then Alert("No se encontró la Unidad de Medida: " + UnidadMedida, TipoMensaje.MsgAdvertencia) : ErrorPS = True : Exit For
                     If Not CveSATPS > 0 AndAlso SATClavePS <> "" Then Alert("No se encontró la Clve SAT PS: " + SATClavePS, TipoMensaje.MsgAdvertencia) : ErrorPS = True : Exit For
@@ -653,11 +680,12 @@ Partial Class General_SaldosIniciales
                     If Not CveMedida > 0 AndAlso Medida <> "" Then Alert("No se encontró la Media: " + Medida, TipoMensaje.MsgAdvertencia) : ErrorPS = True : Exit For
                     If Not CveRinTamaño > 0 AndAlso RinTamaño <> "" Then Alert("No se encontró el Tamaño: " + RinTamaño, TipoMensaje.MsgAdvertencia) : ErrorPS = True : Exit For
                     If Not CveModelo > 0 AndAlso Modelo <> "" Then Alert("No se encontró el Modelo: " + Modelo, TipoMensaje.MsgAdvertencia) : ErrorPS = True : Exit For
+                    If Not CveClasificacion2 > 0 AndAlso Clasificacion2 <> "" Then Alert("No se encontró la Serie: " + Clasificacion2, TipoMensaje.MsgAdvertencia) : ErrorPS = True : Exit For
 
                     If CvePS > 0 Then
                         If Not ObjPS.UpdatePS(CveClasificacion, 1, CveUnidadMedida, Codigo, "", CodigoBarras, Descripcion, Precio, 1, 1, False, 0, True, True, True, UsuarioActual.CveUsuario, CvePS, -1, -1, CveSATPS,
                                               CveTipoPS:=CveTipoPS, CveMarca:=CveMarca, CveMedida:=CveMedida, CveRinTamaño:=CveRinTamaño,
-                                              CveModelo:=CveModelo, Litraje:=Litraje, IEPSPorcentaje:=IEPS) Then
+                                              CveModelo:=CveModelo, Litraje:=Litraje, IEPSPorcentaje:=IEPS, CveClasificacion2:=CveClasificacion2, CveTamaño:=CveTamaño) Then
                             'If Not ObjPS.UpdatePS(CveClasificacion, 1, CveUnidadMedida, Codigo, "", CodigoBarras, Descripcion, 0, 1, 1, False, 0, True, True, True, UsuarioActual.CveUsuario, CvePS, -1, -1, CveSATPS,
                             '                  CveTipoPS:=CveTipoPS, CveMarca:=CveMarca, CveTamaño:=CveTamaño, CveMedida:=CveMedida) Then
                             ErrorPS = True
@@ -666,10 +694,11 @@ Partial Class General_SaldosIniciales
                         Else
                             Contador += 1
                         End If
+
                     Else
                         If ObjPS.AddPS(CveClasificacion, 1, CveUnidadMedida, Codigo, "", CodigoBarras, Descripcion, Precio, 0, 0, False, 0, False, True, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, 1,
                                    CveTipoPS:=CveTipoPS, CveSATPS:=CveSATPS, CveMarca:=CveMarca, CveTamaño:=CveTamaño, CveMedida:=CveMedida, CveRinTamaño:=CveRinTamaño,
-                                       CveModelo:=CveModelo, Litraje:=Litraje, IEPSPorcentaje:=IEPS) <= 0 Then
+                                       CveModelo:=CveModelo, Litraje:=Litraje, IEPSPorcentaje:=IEPS, CveClasificacion2:=CveClasificacion2) <= 0 Then
                             'If ObjPS.AddPS(CveClasificacion, 1, CveUnidadMedida, Codigo, "", "", Descripcion, 0, 0, 0, False, 0, False, True, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, 1,
                             '           CveTipoPS:=CveTipoPS, CveSATPS:=CveSATPS, CveMarca:=CveMarca, CveTamaño:=CveTamaño, CveMedida:=CveMedida) <= 0 Then
                             ErrorPS = True