if !empty(ed("IES-ANA",6,"5",68)) or !empty(ed("IES-ANA",6,"5",40)) or !empty(ed("IES-ANA",6,"5",50)) or !empty(ed("IES-ANA",6,"5",53)) or !empty(ed("IES-ANA",6,"5",56))
if !empty(ed("IES-ANA",6,"5",69)) or !empty(ed("IES-ANA",6,"5",41)) or !empty(ed("IES-ANA",6,"5",51)) or !empty(ed("IES-ANA",6,"5",54)) or !empty(ed("IES-ANA",6,"5",57))
if !empty(ed("IES-ANA",11,"5",2)) or !empty(ed("IES-ANA",11,"5",3)) or !empty(ed("IES-ANA",11,"5",4)) or !empty(ed("IES-ANA",11,"5",5)) or !empty(ed("IES-ANA",11,"5",6))
if !empty(ed("IES-ANA",11,"5",7)) or !empty(ed("IES-ANA",11,"5",8)) or !empty(ed("IES-ANA",11,"5",9)) or !empty(ed("IES-ANA",11,"5",10)) or !empty(ed("IES-ANA",11,"5",11))
IIF(TAXA_IVA*(DED_IVA/100)!=0,1+(TAXA_IVA*(DED_IVA/100)/100),1.0000) AS _coefiva ,;
IIF(SADA='SA',&SA,IIF(SADA='SM',&SM,IIF(SADA='DM',&DM,IIF(SADA='CM',&CM,IIF(SADA='AD',&AD,IIF(SADA='AC',&AC,0000000000000.00)))))) AS _VALOR ;
FROM PLANO ;
WHERE CDA >= CAMPO_I AND CDA <= CAMPO_S AND (!EMPTY(PLANO.SADA) ) ;
UNION ALL ;
(SELECT PARIVA.CONTA AS _CONTA ,;
TRANSFORM(PARIVA.CAMPO,'999') AS _CAMPO ,;
PARIVA.OPER AS _SINAL ,;
PARIVA.TIPOSALDO AS _SADA ,;
IIF(pariva.TAXAIVA!=0,1+(pariva.TAXAIVA/100),1.0000) AS _coefiva ,;
IIF(PARIVA.TIPOSALDO='SA',&SA,IIF(PARIVA.TIPOSALDO='SM',&SM,IIF(PARIVA.TIPOSALDO='DM',&DM,IIF(PARIVA.TIPOSALDO='CM',&CM,IIF(PARIVA.TIPOSALDO='AD',&AD,IIF(PARIVA.TIPOSALDO='AC',&AC,000000000000.00)))))) AS _VALOR ;
FROM PARIVA, PLANO ;
WHERE PARIVA.CONTA=PLANO.CONTA AND PARIVA.TIPODEC=2 AND CAMPO >= CAMPO_I AND CAMPO <= CAMPO_S AND !EMPTY(PARIVA.TIPOSALDO) AND pariva.base=1) ;
ORDER BY _CAMPO ;
INTO CURSOR DECA1
SELECT _CAMPO ,;
SUM( IIF( _SINAL='+',IIF(_VALOR<0,_VALOR*(-1)/_coefiva,_VALOR/_coefiva),IIF(_VALOR<0,_VALOR/_coefiva,_VALOR*(-1)/_coefiva) )) AS _VAL ;
FROM DECA1 ;
ORDER BY _CAMPO ;
GROUP BY _CAMPO ;
INTO CURSOR DECA2
*---------------------------- Criar Array com os Campos da Declara
if mapas.tipo="5" and !empty(CAMPO[mapas.posicao]) and mapas.quadro="1"
replace mapas.valor with CAMPO[mapas.posicao]
endif
loop
Endscan
thisform.refresh
return
wait clear
ENDPROC
Aguarde processamento Interno
@L 99_
@L 99_
@L 99_
@L 99_
@L 99_
@L 99_
KEY_1
SELECT CONTA AS _CONTA , TRANSFORM(CDA,'999') AS _CAMPO , SDA AS _SINAL , SADA AS _SADA , IIF(TAXA_IVA*(DED_IVA/100)!=0,1+(TAXA_IVA*(DED_IVA/100)/100),1.0000) AS _coefiva , IIF(SADA='SA',&SA,IIF(SADA='SM',&SM,IIF(SADA='DM',&DM,IIF(SADA='CM',&CM,IIF(SADA='AD',&AD,IIF(SADA='AC',&AC,0000000000000.00)))))) AS _VALOR FROM PLANO WHERE CDA >= CAMPO_I AND CDA <= CAMPO_S AND (!EMPTY(PLANO.SADA) ) UNION ALL (SELECT PARIVA.CONTA AS _CONTA , TRANSFORM(PARIVA.CAMPO,'999') AS _CAMPO , PARIVA.OPER AS _SINAL , PARIVA.TIPOSALDO AS _SADA , IIF(pariva.TAXAIVA!=0,1+(pariva.TAXAIVA/100),1.0000) AS _coefiva , IIF(PARIVA.TIPOSALDO='SA',&SA,IIF(PARIVA.TIPOSALDO='SM',&SM,IIF(PARIVA.TIPOSALDO='DM',&DM,IIF(PARIVA.TIPOSALDO='CM',&CM,IIF(PARIVA.TIPOSALDO='AD',&AD,IIF(PARIVA.TIPOSALDO='AC',&AC,000000000000.00)))))) AS _VALOR FROM PARIVA, PLANO WHERE PARIVA.CONTA=PLANO.CONTA AND PARIVA.TIPODEC=2 AND CAMPO >= CAMPO_I AND CAMPO <= CAMPO_S AND !EMPTY(PARIVA.TIPOSALDO) AND pariva.base=1) ORDER BY _CAMPO INTO CURSOR DECA1
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
|1Gm%
86}~l
om<'v.c
Z=nFa
lfhRB
HlxcL
f2@?1
eo1B
Z]Gh#a
`~6x[F
~k}6k
/t}WI
oCh>&
7V6Vz
gu+6I
nbvw@
?)Q.
JIyCu4r
]A(!v
gk[}<Z
p%H<aH`@
ubG@
c!@^Ns@
/>VT$u
q]e`x
E5&4vm
Kw{{}
oK}cA
9$"7^Q>
[w>wi
iYV2U
;K)m53i
ew7(&Y
wpBa{
N=kVO
t@PA*`E1b
+(&}E
gHh5(mc?
HRA#0
Y#7BB
`N0NH
b({yb
|9{mqeqf
>A'vO8
%nD*R&h
[k2jM
]j yy~
_< y<r
Bldp9N
4=jH_Q
0VW9 r
hZ,M$
..RIn
mDdRv
/S{peP
e|[nT
_[_E=
6nu?3:)
_fd_)
xzh/#
wsc3%
{]|ZI}
>cPx[
W1Gy?
5#P9O_
YlO:n
u)in
QEG+m
'L}=5
;xcO1
'r)o%e
<Hg[O
-5l[F
q0YH&(
xq./']
?002*
\[$:t(
Z0HB>
OaRQ@
fapa<.
Cm4|#
Yy8$-G
`]i7O
r7dmk
*998=
>GrTg
*i3xw
Ig+Oop
g/#mP
[EG]*
x3A
]GZ1jId
IV{h"
K=BKI
W@<[g
8;]~8|w
xVX-57
4[-/O
At|'/
#N]?[
~%]S:
&o70C.
%Pl|e
OEp+s
_UWCo
x|}4y
#*A=,
?32za*G\
Guu"]\Ko
jyr)0
Zx'i|
H4G/em
Oqsq8
OrNMj
p}EO+
Sxn=oO
LJH*H
FOJPr+#
ZKcwo
2 |Cam%
u+]2!-
Jw *A
P2@=w
<'b4;i
&H.e2ld
77F-za
e"b@=
tFbrX
B?2-:
M km{-
MoPzP
p09<W
x;[@t
,opx3
@8rE8
=Bamt
$UfuR
ZiWeb
rI'/e
fW<x3
5wI/n^
]Ksk&
R57ec
0[8@;
l^mOI
k2hVosw}
;;}?\
tgp72
C#z;&
@ *9c
M{ko&
2>}/@S
{[]WQ
^]FR8
"Yaq1GYS
rEqy5
|3v.to
{ gUX
]Kum,
$)gk-
\:[G$
-<Ucoi"2"
4m;<`
>2FFx
v5PIc
2G:ZF
m.-CY
{[in#
WJdPylR
Y4=Cl&@
q[]gjj
0~!i`
.~!iG
ecRpH@
31fwfbI$
yV[~|
cYU7aK
ndE1C
{rVT/"
ZDrI'
L^)Mk
u5GY7
s]D_t
}aaa&
I}sEe
6Ko D
2yW09uvQ
ElFW
t|M*I
@%w.T
p>fv%m
YV_"[
+Innn#Hd
n\Msz
T*Jed (W
6Zx7Q
G~/!);L
tS^]5
PF]wq
XL|E}u
#+A
k {ct|Yg8
y1I{t
]~n07
f+=gM
Z|^LR_]4
jTnf<
L6zrk
peC4r
QEQ!E
@ Ebxg
QUcFp
a#8p1
[H/.~
X\\Z0[
WsnQp
VEH$20
A}g8V
xoIeMI
o4:rox
h~1xF]r
WCsMc
cY7C6
f!I^B
>6#lP
4Q~o$
nn~#Y
ycsn=3R
l;OO
Yn0s63
E.g,B
c?\WAGo
Vxla2
]stAe`
o>*_x4
q'99$
bWy&;t9
#6[mt
+k]|,
++$q3
+g*Cxbq
+=/Q[
0RQr2@;
xa<)rZ{)
Do."b
L-4T6
/o?~M
;MLLm.
;-LY\
Id'kc>
]VD9W
ZIs{s
];uoLVO
4kM;O
~Ym.RR
0RB/l
3k.w.
zu=)$8=
0x7N?
lW@x<
"i`XL
in TX
K9^{c
g+Om$
Go U`
&TUT
3yyP@9
Ii, :
:<3yi&
/>7iL{7y{[fA
iW:RF
c\{u?S
1]9 P
*9~ i
)fw8P
IZ}.gS
04)<+'
#jZcX[
;HCFWa
_x~c}q
o> Z)cuutta
47/u t
ZiSk+
i7VZs
x-YcYCH$}
1l<bG
3mg,W^
5}kXk
3(b@$
^=Es?
].mj;
61$w 6
qq#jI
j=(X_
XR9"X
[KrBH
RTqaW
|Mqcoq
|N<Dt
6!9@pFy
djSi7
mgYD3
,uxD7
8<g5n2
gw-!v
>RA<q
~5xF?
$Ouq}qqp
@n2*}
$O%]C
`GLIo">99]
eogss
o+iQ%
;w7%b
Mtp(X
xF=&"
""4RH
[FE}Q
pzWC@
;W@x=?A
}Z]a/V
[]^^i
iqmrc`X
};k3d
!_V?Q
|)*i
F!% T
h#%#E
rNNrz
/.Db=_J
gp#kt5
w^N "8
@<W@x
uX4M<
kw;]k
K;mPX
^\Oq+K=
SG@}@8
&"+;w!
&7 /F
)5+In
Q%kwp\+(f
-9KFiZe
zLE<-
K;]?]h
5{m-t-
,-e>#
OcydX
~3xKH
u)m]R
Mz}! R
<is8>TL
4qIj|
H\gj_
[N%>'
YT;oc
pnGi%!O
QTHQE
~(|p:m
M#30gl
rX!E-Pj?
agyib
%HZ!+
b9CE3
xrMZM
Xj7:d
;}3]:
vMfkaf
DTbSw
9#;TeMl
0dWVt9
Yu;=w
LgEIR
Mq%{A
lm5mTK
%VTRLd
]=E+mq
6q3,k,
vp]C-
!_V?Q
_ x[I
O>?.]
.DQyj
vbMlV
?yt`M
jwC#1
m=Mx/
XCbu+
WM2j77
r'O<[
R_:5C
#G%rX:
"yV-3
Ebq+&
qGqqo5
wv|_%
tW0>&
o,6#-
/4i|3
yWsZ}
?_JI0[
+Q>&x</>,
Xj>|E
4y;$]
yfbO&
;o$]lT>t?1
N#R#Vm
14^QI"ud
?.0=Mx
WVe26
6X}E|=
Ek]Cu
-]$g+
QEQ!E
t><|d
4MJk6
ePX2l
V<JDd
mnuM3U
2_\[\
$1Bgi
@ 0 W
).U#fW
5(t}{R
m<cyu
q}fPs
-zT?pu
EoFC
A=kR3
_*2w>
`[h;A
@.O@95
I#m`H
$FRC+
5{msIi^
go i"
&dbdf|
}:jzn
H-ZId
(,DQFrp
I.%*U
E}!|?qk
]EamB
o$;4HQ$2
Q4]j;
nwiR#)
kO}uu
kwWR.
UTn98P3
'HoaY
5+}8O
$ 0-2
.&gx#h
W`$PU
e%Yz2
YZFT,xR
vR"<q
Bp=}r
(f8PO
N ?)
.aHln
)A+"6
;\+mela
x, a,1
7FVIf
%x=|}
B{1fU
r}NM>
Iekjb
MFk-?
OrF~w
>7m^x
zPHQX
2E4{Y
0;u=+
]Rx\\LQ
dBmZ<
UHZIx
^B]\2
-xe<A
7.$Uc
avYo]v
4g{(V
G<~[F
HZ)Vm
nVI/6
Q\cxGA
dWI B
zO_O7
QT2kW
4r(tpU
O?wn?
+X-!,\
-ZYu_
n=(#
!QUT`
_*5O1
hW7ac
E3[@4+
yw<l$
G}B'Y
n<G"h
-M}-E
/#y7g
Lq4 d
Cu]=s
]<G*}s
uom"J
,-lR+
F[l0x
|~}KV
H4>&{
;IRF@
2011:06:13 14:54:05
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
Bh&ibW
*p~We=}
+g*FHp
L-`-\
sj>='?
~De^N
u$ggc
0G* vL
Oo0VB
HeWPC
.Ru~p
W8K[)
,4={IK
c P7a
tk=gK
_8w=:P
RPH]w
}u,@m@U
ZI1`N
[Z.&y
qXG+J
ElX|c
{=xAc%
Eey<kov~
`d*XD
]xRI<}
"Km?V
Z|WrF
3]Ket
Rm8iz
~ xI$
-<7sqp
->*jW
F J4
+?wqKs
V*@`0H#
T&K5P
lpKwk
^jOvY
ldry/
uK}Tx
,V1C u
I*7YF
5+k(e
^$r iW
on-/l
:lPjo
"2rT<
m>*k~"
x2-f=
j,u+D
|0h-5X
l3sd>i
m|;wk
B9<Mw
yr|A}
)Ctt{yU
rx{WM
mL1Cim
/aguz
CaHr H
mC$|!g>b
%p2}S
}5Exv
Oycrm
W[yn-
-BKgd
m<^<c
A'.UUI
Y%S)y
H]NcQ
$Kj b
o$m$E
VI{y6
"eu+"!
ev5[&
G<w7kk
Oq_P5|
K;{xB(/
memr$
H^;6Uk
/t+M3D
+0*O+
?hIlu?
[\xcY
bDHw8%C2
mv.\+
2Mq*Ao
%WQL~
x&Q$r
#s16<3
YEugq
UT5]R
4H/ui
4;[Dy$
Zo;Lyw
Sx}u{
Mosoj
eWO2E
}>WM_R
*ZJ.&
?xI'<
[+[}O
JV|JL
i*vn>
,[q'9
# bIBJ
J<n$'
$R#ed
'F1&v
fEvEr
7I]3xu
K^ <<
:Iy:}
>$x4|.
/laF0k
>Y{o-
eXgCt
\3yl#q^
2jw+{q
bp0=9
gdh9w=
kaeqr
:w S>
-yvPH
rFORG
GU}*{
:zB2)j)
skkasw
mq#Iu
KRPQE
>o/~7m
+o#h%
|v<d[@
Glu[M_H
O]OK?
MQ#K;k
\Ioe>
QK;mPY
x.i&]wS
Bb?.3
eXp@>
RF@#2
rcn>]
C,1$wBq,q$W
c#j7M
d1Y[_Kk
|Xe7qdp
9$KR]
e`hUb+
hR^+0
r[_\K
#:$EB3
yn3k!
_2}Gls
fk_6P\|
{h$7v
[}6;B
uk-F[
;]OB*
Hu;KMJkf
bVD+&
}Z]cI
aE2,l
pw`yj
O{z<If
}2K{Au!
?.XmP
QJNOo
;Y{mr
jkxOT
#WMEIG3
#WMHH
#WJ:R
#WMHX/S
x|cx$
=1|?*
pFA#p
*"ng$
+so$'
!),2)WC
zSY@4 G
{]=pW
Q(;Uc
nZ00U
[_6@]~e
4y;$]
OoJur
yuKxZ
:xKY?
7xOXU$
Ef nc
''nNO9
yQO8@$tL
MCO"?&
n?t.1
,5yme
/68g*Dn
yQO8@$tL
mTB0dft*
k1s2[
{m, /
VeFUi%
oAmwKS
G_C[V
kRGE>4
Y<W&[
kW:,:
31!U@
MW[y#
}{gk}mq{b
!FOoN
<WD~&
.$H#g
zW1`1
0+I(F
:Ux?k
Ko.&$4o
YKFKC$
gkww3
iugiq
$O=Z1
sm4lm
|sKmf
qsms<:]
m]t]r-:
W/im)
.<Ooe
eue=y^
>!xQ@
z|1O-
`<H|D
+_<xKL
P>"xS?
V<M~!
IG1GH>"xS
>"xSh
H~"xT
<?ayc
i$;c(
.onml
4XnaW
YB8IY
<5}r'{K
yQ1r|
=%SD)
> xB)
;x"-)
%uG6{
[+m38RU
]vQmt
Sm#TmD@m
OoJ}r
h0p@>
j7AV{
CZxF+
'N y!
` #{a
e'k0;GK
R:d(-
M4}SY3-
m|Ieu}
Nzg5"
+Cl3$
)e,@!
YXk1_
Xs0_-ZD
t-`yc
"%Sxl
-uM[K
6@;W8
!2i>M
E2n P
Z-rfP
W)qi&
ZM{isgq%
21e5j
m58<Q?
8DqMqob[dR
bVu&'
8$)_
Asv5f
ZCln,
';rUA&"
VbGEV'
]$?*`
QnTY'
UiUB[
<>dUY
X]^][
]7PWA
faq$S
YI/"P
edr^/0
cqjl-m
]J#I<
2)?O%
?kA3D
L0e@T
xoGw}6
&4p>>
O]SL?]2O
6fkY$G
~c,Gn&m
ijmn/
"M2}D1
#Vv;Q
{ad-~
{")$d
?Hm<@:
Ich]7
a7-9O.K
URpH2
m P *7
1*;) 1
78$#:
<Ae}c~
<dG3(Iv
V/6U1
&Y4$h
k?)cyd
}dtlK
WH}(1ak
(Ia b
&#MI.e
Ua"n>K
)`-k/
oQX?c
|7$N|Q-
lo,lm
)`8o1
9fgf>
_*k9c7
X%D;nn
X\Z]Nn5
=*]<i
=:=9XM
kF{K9
%I=s\?
E-t5D
b'g^H
~.M/H
e_$&b*
xSD?M>
~Z4@J
m>;[sa
{3+e-
Y6(*]
cAM7^
q_^]k
xkRI%
^6Y#p
cBFTW
[_xZ;%
?}y{}uw
->`<G
4!c@[j
`<\|C
P>!xX
si<W6
*QC6_
fuWVx
4[[Mj
\\]E6
.TO)}
+MZO.K
t#"`7a
[: d[
mnt{[=
%kf1Fl
\]kZl
inm"XY
cI'eU
n<I,p3
Y!VYZ6dFo
rm[AmN
V@^KpL,T8
E<Q<Oii
nCybC4@
xRm+R
1V4MG
2<eX0e
zIm-$
m/'H-'
/~!x&
9ffwc
(AR"PA
D..60
E- `:
><j^;k
K[mjU
Mno|}
, H+kn
> j:&
;]OB+
I|Ig}<2O
wq<>'KW[
"&Xdi
"MOI1
g#|Bt
ZD!c`
}E{uy
#WC)!
jcxKU
"f,"r|
!2$_+
sa$,<
@HbC2/
2`clb0K3
s]]G#m`x
_\ZEs
]$g*~
-N .m4
+MHLm.
+;d#t
0r00O9
&4p>>
xkHH/
Oz]/E
x~mrk}:
\Iq}$
c_!I%
.At_b@
%eag.
1d>Yey
mu;{5
+Mk0K
Ooxm"
P<={5
1]<_s
ZdWzm
gqk#Io
4x.l-
4,gP<
*>F<Wy
/|Oek-
Brp"U
O4,R\I;4
fw!;I zM
,%bqu
y5er!
)TRy;@
ZGWDyV8
Gms)s
moou>
N6yA@
F>+|E
hbmnO
+y.LQ
~ x1<
_yK$bV/
sGdnM
gw{|#
"2+$il
BxbQm4rN
fI<Kg
bm^{K
MfeM*
WVMV{M=
(VP9O
^[_kzm
-Mn_x
yae[%2 V
v~s"m
(@9Oh
w+A C"
Gw,b}
pnG\c
W.o/d
@]Jn1
RH$vU
={{W3
&0N2z
om4x-
E*onGA
[Cgck
2011:06:13 14:54:16
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
oyqy/
4tThr
5eE,6
}EnqrnE
M|~>,
<k4~
Bfo01
imgYm$
Wi=Gp{
ImnUH1
9>Yf2
HPNNk
oe1A-
> x?^
san<1:Gk*gd
?1H7u
yFO';r
~m<)p
h6SZi
'spN
bo#p
Qiu{I
1F7<Q[
>>x`s
wH=>"
sH=~"xP
W}cI:o
"xP}6
wn#/ #
pBPI<
z=xCa$0[$
)>5\k
\I{mp
+H|!s
6PUn$
5Y4]j
Vy#UN
v rG~
$dB2O
F8cfXU
KiVXT
68l-`
6kumqmr
x\,#c
2NkWT
"{_0
+uk)t
>/kriz
M~=-
"p_$
%@Cyj
=kW}Z
iT9pcg
Oooqp
"8n#]
,_"1 (
bO;Gz
Q{{@.
mat6`
kAoaog
Q$6[.
Hr!I@
|9|Ie
eYuWV
*Dn 'z
#\|A>9
m"-BO
Kx"Rs
M"-JY%g!7,s(
f2:Emk1I
xsI[3
YZU%2
+8V$,~
]JGuy
A#b G
cq!hb
<{\*U>n
$w2K$
4+wqor
|uKhd
--uk]"v
[x: 5
7Iy,2
ukmCU{
eBG|4jq
9!Zi$#$
KF]G\
Gicw4
3D&>C6
?]$')
hC/*Ix
}cPM:
qK#6xT8
ivSYx
/ YUO
x[FG:
MtS)'
{;}z9-d
UO6gH
Ecaq+
Agfl(P9$g
gu}ug
Yl"gv6q
[g :E f
si<wV
F~fv!T
AYw^*
0~brI'
xddpT}
]Io,n
u,E^ m
vP]C}
/+[,Z
`Kkkt
*zxgF
0%A?'O
Y#;YJ
N7eKIg
@ crH
iqu$Q
Bpx'
..$TE
YTu}Z
> x_T
"I2As
(.Y sq
@`?3\
}iiu}mmuvJ
5[-M/
m)U%@
%`Bgo\
oqwqul
HcF'o
~V*pC0
3("ul
zJiVvZ
BKWY%6V
`{>y9
gh.5_&_
R=+N`l
,5m3S
(uK}=
zM*M4\
A?\K@
\Oj.!x|
ikw_i
w6}+s
HuIm4
mscg=
j7pE;
]F-A*\
ouk{h
`k)ck
gs}+|
9=s@3
nVkkK
X]iW"
yseym
mm{w,
S<nS
M+N&K8
aest
HFy c
o.8 |
Kl'*P
,r3 i]f
$rync
{{YV#$WV
xoP]c
6r<0Ik
RH1*y
+|O<`*
ZCu -
qU,l|G
4vMcHH
M6>),
OMoF#
p_[:Kg
Ml#VS#
oF?]&o
j?gX>
$y 2B
1)(H&
2,?kO
B>ETU
YOis4r
v:D2x_M
2oP:d
Etlg"
8'$pN
r;W@3
.y8_R(
_h7%o&0
ID1fxX"
d]BSc=
Rm"}5
4A!gq
'Y?}$j
]]Ke
]OlWu
F|v:hz
#^;=4M
JO_{S\G
#>;=t=
lU=gB
>4xr?
.o/uY
l1Mko
;+m;]xT
Z[-UgG{
5o [iw
XX&iA
cdNw;
Kz]R2
Zgu2F
=KOkk-v
XZ7I!Y
tZ6.1
C[[\A
ndvE
X}^cS
R8!/g{
f@J0 `
BZ #k`
Z\:+In
WL:W3
/QX^
=x$sM
\ivot
^"-g8
@%A n
]]IG0<W
jx/[U
=SMr#
MAaI4
:ev0R
{YouY.$h
J<WBUe
Z]JHX%t
eco"%
xRyl4
~!i``
,=1zZk
5z$'t`
}-_%x
}b]+R
Hex]X
@PNvG#
,mi,v
R *N3
Hn^Q;~
78?AWc
,c~T
#mRUy
o,o9*9 .zs@
6qy1I#
WL:W3
KH:W)'
5V"g.
x/o&:
#Fd.T
]J]"M
`3]mr
]eIG1
~)hs1
a5W':
QTHQE
nmOOW
a>'x8
rG,Xb
KW2[2
1YuH,u
K-Qo.
weoky
z8eW\
6wci(
5f9wA
M,,q$e
hu+y<Cao
Ws.QJ
zW2~%
~&x9G
=VFf]B
v5U,X
~(k'J
R'o9 rI
m&YT6
N^dVh
c!!ec
-o<Oe
} myot$
e~&-/
P[{$F4-
'st=>
c2Owy"
ss2Ao
to _k
uk-sI
A=kR/
)VXfS
Z Wt~j/
4I#&YU
$xoGR9'
f}:"I
3xCDy<-
WFW].
|L<Bt
NO9=F
u@Zo
6ieck
p@rAV
Le3E6
C][\;Z
UV'h8
%"F`d`
WL:W3
f@|J4
vE`AS
FPA!A
'9t_c[
so'),.
r=}hs
m./.m"
Kqq*[
Cno|Kw
o;v79R
k\<-"
<g*7/,
Ymd#r
E${N8@7
g t'9
y_t>G
oy#I)
#`P>}
p{W@:u$
,mqu{
;hrB$
W>Po6Rw
xoDmcP
Oobg:}
Leee,
E]cQq
gkoj'
]6s1D
][hZw
utS"9_
^7Fr6
nn6 _2W
<E$~M
;dXXN
t=a<.-
`x3A?
"";+,
*),I$
4&`\|
e&Vt
<L|E|t
vQ]es
Orr~w
U<oTn
H"@SpE
rX\@#
]7N>db
d'`N68
wMMVA.
xwMMZA.
sxJKX
u!Qywe
Hft>^
:Krne
QTHQE
zhI%R
a4E@%
"cqmkw5
y#?3.
{x?D1
^]^O-
i7Hw7
dT)oo
2M5<E
G?}{y"
WF.|A
u-ZX5
8X&iA
Mqy{*
-")2C
[+95 /
[Cqp.
\YMl&*
--<;nm
EpZdC
jS4q\
xRO1c
-&IZ5
q]L#
u? X\
# "E9
t:ZA
;mNM9!
w-eop
*xWSQfd
el>\gg$
2f6VY
jP_iV
YM<I+
]j]e~
[R%`'
8yHRB
2x[SU
Jm2}Y.|
M4Q<p)`
)fg[h
Yp[n1
t)qae
]jW+k
+eYr>Z>
^K4VZ
JyXF[p
^6w#O
!qi<Z
c.F#^
]9uH8
'TyI'
SMnt+
/,{QI
]L8e%FU
N|@4}W
D1x[SB
<yf6c_
ok2O`
kjkg6
eq{ex
g##Iou
S29Vl9
1|n>Rd
0D7Dp
]>,Z|
trXri
VB PC08
ZQx[GK
#[-j4A
k,B9J
~$[Ao
W.~!iC
D>!iG
a5W':
/*)^3
1oq+kZl
]r28#
?/`lub3
If3{0
:p0)i
:t6~3
UI'uc
7;3mP
FLa l-c
=CT0x
F?;.{f
j@<Nt
`qKE`x
j6{Q\
u;=69t
v#c>#
]>s&1
nI/$m
y%[Y#
O*4o&
q>&x<
%Z&zg
,>%xH|F
o"($7
{x$H.m
"O=8j
kO1wE
jVV7:
m;YCc*(
kW:,z
DI>Sdp
>!xYF?
rrI9#
_?.@o
Emw=:
fD,H@
]&}SY
*]!y'
6eVrU
_n 2K
i1]X[
ymlfq2
X/%FY
2Gg;*;
buM2;
SXA}s
-VL9}
$R#.#
]"Mh$
>&x_L
xxWK b
6v@VX
}Z-H`
Kk=Y!G
VD&@P
1<3 b
a[{Ko1
{O:Iv
Ff9ws
ilfy|
2011:06:13 14:54:23
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
w1^[$
u;m_H
R+81Hr
Ecgk{m
:{jv7w
xld>(
2Kr{0>%
5m~=c[
F4];wo
\ZAqo
Yt2?e
Oh|;q
J>+NlE
_^]3O
:nA!H
huftp}
oukulu
9\)*F
3<aB9
~2A+^
N#1ZB
.a-i,
o<Ks5
/D$pI
62$dC"N
}R+k{X
<b:iz
x rEp_
MRK?"
X\Z,-
</ewo
:LqJ5-
{aI g5
4[}_M
x|Yj^
+y?hx|
y",$Fia_-
sxoKmA
0RXb8
Hmo,e
u+E<n
xzKGV# (
]*ti#
LM"]Jy
X<7q:
5?+; $
uKc>D
msO]Z
xO69|
2r>V%C`m
^L%XJ
ekv:L
$^#M2
(/dhT
<1GxZ
q o3&68(
d-__D0
,eYXj
P(ew85
FlnPw)
l9*nc
]M#!]
Z? |[
W1As$
A`2G8
x/IMz
3olf%
sV.|K
t8`:k
vVv7:
>lffK
I%Cr<
jS[Z.
>&i>%
U*$c)
>O3jlQ
#La["
dd#*T
;,Jd`
;WUMn
BVPO@x
YxOR?
'-!D,UrB
iH%$x
i5H,|w
#PG{o4
ci>fU
<UX|}
JBIud
uPc!T
Kw>i_
m}symv
ItMGT
euo}u
cv}qQTqN
m=dr
eR&u
q[ap$
f$WoI
>@I`~
|4|16
Cpp22H
]D<F8
8%I*H
?;f_nI
\e~vD,
/ iPg
\De`V0
VFX$!
07.z]
pYjSIyyq
T!#qP
meYc%C
<(-5( MR[
^#k-/
I|See
hay0a
OZ6{P
]KQ>'
EBV33|
]Fkk_6
|+qq/
M6=V .
Q^YHYRxX21W*
&iqx}
+]8ocRQ[S
<>Sa0
veek_
5m*M6-J
YR&d7
T,^X&,
#kr1
"_RcFg
^[x~?
g(61G$
$Bd-r
[y oq
3xkI%
04}c\
8ldpEh~
4>Sap
)GQIJ:
Ci]5s>
io{k&
xN-V
um&M6-J
]9`F3H
M-1Xm
I2o d
Ci]5s>
(%W=]z
6]cFo
I[Qy=
BF}jJ
"9>Jz
JWMRQ
ksw}g)
_ <v*
?4J]Ll
5kbN./
4{=3O
K{xS;c
JWQRQWPi
A^:S'%A+
~%h^*
_Q]\y
LQM8RcGq
*D]cB
ivQxJ;H
XiwWV
yV)*D
+-.k-L
W^tH#
`?.x?
M1u d6
~-jZn
X+)!C
)]=IG1
T:t;C
U"8"X
+mnKu}N
[HnI9
kx4(a
2ZA+:
'{tY'X
>'x<`
3yQM8RcG~
T24r&
XkrZB
*D]cB
%xI>#kr
%xFM.
]O_Hsgi{/
(F?v?
pcS$h
Mzuy^[w}>(-
&{_)#
TR4r&
DV)*D
)^ '9
zW2>&
3#\9e
]~&x9G
}:ig_
5kbms
OgudgY
Ci]5pZW
=%z~&
DleT
*)@,?
?_LW3
P~'x;
xsXY.
/<Ced
mu=}!
]~&x5G
e\n`=
OhJCj
&7sDb
m5}[R
=7CK@
V_56o
"oY$@IQ
]@ tt
Ci]5p
mN7Xn
-2K=2
Uvf]B
7+]Ap
#|fN9
zW0~$x,Je
6h._[
]!TrO
"^;$&l|
y*m$G
\_Zx;]
$r+Ge
|yM)u\K
ez~]?/
:lvBP4
dq!Uc
> xKQ
1K^f5
Gn#la
AgnzA
I VxN
a#*FU
j6-qq
^8$c>
jRjz^
C$>lq
m}oLe
K cTbN>gn+
Nsoma`#
"lZ^C#J
^]\Gq
_]Ogi
$i&c%
lc,H$
2`DPm
iwr\It
e%Te
t-7<q
- M#D
C%d|G
D`AR=
o1B#t|
4meo,|3e
/|3z|O-
D%~RA
b^i/'
&Ki#h
g:lRxSQ
tb/!i
[]\I}q
9V;k:
dy!U1
$(fR_
ilw]}
DcjO-
Udi"Dv
2m@~o
\[j1Z]
5[MKS
>]V7:U
TI\DN
QVPDJ
$RE,h
~U%2<
t;}R_
Gu}u,
Uvl9%I
222=3
l/|Seo
1\i#R
Sd&K$
M3GzM
]Nm4$
yPA%y
w1\xnmnKh
:tpK"
?kMcK
n58m|3
K}ZMJH`
-I>cD
Acpn
+|5t?
&R0O=k
rz P:
Kea#(
<r}j8
WR>e#
r!A*
9&>>N@
I$rI'
ei6:i
2011:06:09 11:17:48
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
<Acpb
.|Uao
|So C
mmgq*k
:*49m
P2Uy"
}EnqrnE
HPNNk
sT,|w
}$gi%I
GvEnnz
Jn#q"
F1ryb?J
w&/+Q
e+"4re
(</{mi
,loQ#
(2$%<
~^ON9
`wZ]_xZ
~ x?L
S*ZLz
ga#49
.l<3yiyk7
t(YbX
QlaE[r
m?dm*
4pHr>PX
-xFmG
)h!tr
\@gT\)
4->MG
[amw}:
"]-dk
-o'/m:(
gp,<I
voeq{
<1c{y
Kxn5Ke
`pb2n
x"Tvo4N
I#$@z
uV( &8YT
A^72+
u{K}z
>fN%#9
,&y'T
-v9f]
>)j~):
!Fo.t
;UDly
Z D}a-
3NH57
bBn,o
~=Yn5-6
5i<]c
=U<g'
o"N@#oL
+xZ;
5;=_@
,by$egyX
^Im|L|a#x
MzXWO
M;O<PF#
.|wis=
l/uxV
,S^]
NVFR$
@LJ \
$Mb=M
ceyyg3B
kzzCc<W
3yLWz
J:qA"
x[Ewm*
8i7yci
!9R$'
,b4d{
O;]OB*
Ww9$
2Km;P
e0[u7
H$wiTH
u=:!rK
a!H$P
UmYoCO7
hPKBY
c*}+wQ
cE%pY
^\ov+u<R*3!
+8V$,~
bdRYn
};M?gt
@nCFp
?>K$GV
9X"hh
[[Q0U
6s /XV
;WM;[O
2jFQf
xvM14
*9898
H~'x=
9|%kou
?u$#3
">xPwF
K,Rms
]r9VSm
Q4qa-
Dnmnb
qxKT(?
q\jwZ
]WWMF8_
Xne%H 0$0
fH.U|
l|)wq
6(v%H
A9 zP
FyjP28j
:UMM.d
Ba1lV
-#j~0
>eE;S
W1A+@
j>0#?
-RT)m$
YEsk2\[L
-tS0R2 =
_!%Ex
-hj~%
$FRC+
~.x7O
ikep<-
o/3^d
fKyLr&
A#~Hb
s3<Mh
:4!F28
F0pr;
(P*.Nx
khV3q9US,
`KxWDbNw
\M#I,
~]+II6O{s
fff,f
hZOn%0
H/|b:hz
`KmsEI-
<C{jm
$ecY $
) 8;w+{
?w$Wa5+
}KEmF
J/|`?
o/lo4
Inn7^
l.">'
F]"-D\
$vOhd
xBMr_
|Jumhk
,mt#o(LHB
Wkm#C/
!*v(,
6>P =
q}kki)
e%H'C^
ueFzP
dWBBl`
#||@<=
Okg}skkp
%K#:2
E9PA$
Q]\Eim,
t7Vr,
F@#5x
Z{O1B
Z{O1B
uK}cKw(
;;]OR
ekyp@h
g26~a
Oo*Oo*,
=1RP3<
@:H5?
-<?a
F&5!K<
Bn~XLv
b[2.u
km2o
;V<;u
G#mWm
~p3^c
~p3^w
F.5l6
zQb.`P
w*HTn
;J/|F|
ddx3\#
cih#
9bd/+
j#N0h
5PIwl
wv7Q^ZK
wqX]k6mk
}R]SO
Qj+g{&
.@,EwU
@21!Dq
aI$TB
^aq}2u
p^F,D
tpAR?
hz|:e
5kwSu
}bMZx
$v;G3
Ang[u
M}K^A
dMd2;
3TPrH
yuv5)
/JZha
"{-?KK
*$ d(j
?xa'a
UTHK9
<K"lfF`T6
Adu!P
rx`21
L6z}s\
heTu*
&4}|:PH
IrR{i
C)\1R
[O|5g
3no/v
F^ LN
"9_pz
[}:9R&
eUUe,
kq$ki-
R{}E\
yowpXG
5Im/|C M6
_i&I-,
W4X/c
|Yi9>
0,0x+\
E|L}G[
]P~.3
-}.Mt
lU[RI)
uF`r2
]k7$Y
VEFbS
rO?OJ
#Qp9O
7fiZ$
asi+H
asg+H
#QrN+
'2$+4
!!U2m]
o22YG
use;Au
i$;$,&e
&]<h>
?$Qdos
m"-7J
dv79v
W^61y
QNNr@;
i"@py`q
&UT'kEgt
|p?}^
I%fKu
A;Fq@
W+$6 (
++K}8^K2
Cu]$G*zg<
.wivS
8I(A9
)_2&
.7iVS
utQ6T
y?@N;
g/q$N
+h^fX
&%[8,
o:+N3
Ykqzt#<
4+;{;
\$>|{
?EMKW
e3G${
OHMu#
1]9 P
:_{]o>
t}Z-[R1}
&w[{o
<d~u_@
S+!o-J
VIp'[KG
uD9>4
RpK1/
AbJtB
$C<B?/
E`A`Aw-
-6_ M
5P0<e
O>+@"rf
.H'ss
,s]\\
]+NTk
KXcgL
{`..-
3]402
xR1x5]:
eO*py
U`\k_
Fy$vb
+E&~a
*mCL[
m$>c<{Do$e
` ,=?
PmlZ]e[
7HQpJ
}Z}KT
DkuT&E3
\\kph
1e<f"
y7W>d
V36ZF
D%u{G
+fH6HB
YT1F
]yb?9
kam<C
I,7qyD
7 _(
umCN{;Kimn%
?xo&1m
mb};X
u+{ms]
7PyD\D
e8HbE,
hz #m
zd{7j
5ht-*
cMfKY
i /|y
!.DM+y
-nM<3
m>%|>
2Isq P
"""(P
wj,VIZ
RDd(d(d
241gh
2Ns)f
:U}En
3OpLx
Z.6q>
<3{ca~.bi%
3OpLx
$q Y[a
\8C6H
6H#dx
P~%x9
>&x8.?
jQI$v
%VhfI
'&@dM
]~&x9G
l>)Y|:
n0[<t
x~&xES
4<v'Q
b9Ny
i~%x>GQ
gv-!v
j7pXXZB
Aoik}o
jiis-
}/R_"h
Afff,@=
62})1
6Mg}uo43
4,{jP
VyX$h
,2NU}
,{\F#X
Kfm6}
#tT^K
A*FdUv
Yxamn
.Qm_j
-BxX1
!P$pQ
QP\9S
&VdI
Odi.'
[=kQ~
vfAn\&
KEf'w
KdhdP
E{ed!J
LpX_J
f me#
8h6z&
]k6Mk
lH9#op
Iimq
-#SS$
"F>uYv
As,wQ$~l
%Qp>~
,pC};
%Qp>[
}osuk
Jcw"=
nuYn4
HZMmt
kmgi%
~2x?I
g$$l7d;
R{y%I%
g+!ur
ciWV?
?41#cr@>
IKK)<
G<BxZ
isw;2
N;a r
nm/|J|Esg>
Oeskcgok
m#&pR7
0I;hV
xA ,r]
[*A,2y
WQEIG/
h?tdu+YZ
K[Qb|
-Q|A}
M:xCUTv
5[-#OG
I!h!U0
Mk2\jS
moGM"]J
q"mFA
8>-x7P
\K}s:
KuUs$#h
h~>|9
n5}.[D
k[x|[
v76I-
ou[_=
TY%O2%
HRF@8
XYivsY,
DEdVe,
(xzM[
_,Gqq$
jw0uR3
DfAz%W
PD~WS
u{Km>ksu
<o$f7u
ar R
woc<:
_1KYR
>)xOE
:xvMN/
Fko!Ube
-<9 :\Z
}%<Sc
u"D1G"H1
s(m8+
dY[{1E5
]gN1h
<vsx~
b.XA{
_8oPmL
`8u/ kz=
;W{mv
'a$1C
TvPe]
{DkW!
$XnbI
^ko2Z
C,X2 a
nR-GM
[yo6?
fPFY]
EdxKN
^0 >{
4[MUu
K=0K1
j)ogb
!6mvj
,fO2E
Um*Yt
M>+-:
2011:06:13 14:54:30
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
`=HRx
Dyf7,"-
,VBF
iv9H82>
+obm$
Eeaqyi
9gTie
uURrI$
72Cq,P
Xi,u-f
2 G`FA
i}tahc
`I%\D
n.|G$
izRyv6
l`W!@8=
Qp8X<m
6*tM0
8-,~Y
T9`FT
-f'hL
7^hBgT:
>!xz[h
]STmV
-:=SW:
+U+op
m7HI~#
6]&=N
'$rEK
eW&mG
l*yw08x
]ZZXJ
T|3*;
xa($'
BX o-
vs#Eg
x^}+U6
$*VFT
\[Y\K
WW:s_(%ge
QM6XM
I<Kio{e!
{kkm~
Q\Emik
ZiwWSDm
lK{X$7
p.-f[(-
/?j=&
wiko"
X 5]?L
m<zdP+
6w1 !
[ ,VHd
hb#q'
;K[hN
@t]M<K
I0%/'
_4E4fU
$$>T(
m=nRholf
NTek+R
w)uom
&v?;5
^Gyu2$(
]y^vq
"kX/<
I7P]c
8FegUj
].kk-B
j[k> kMR
5]{IH
}JwAi$-
"6 `O
!bXV/
W3Kwc
h2xw^
\1R>y
JH_?a
^]xkA
M^f0JbxK/
Uou=gP
xeIb`>
drFuh
;{1qeurn
\4e@'q
y.<?i
r Pfv^
dW;C|
si, A(
<iqq6
w;@9X
=N]WN
HQq+[
%fhXlh
]Gmw5
[yuEVB
&4ci_
,isi%
0[\G,eJ
(iv&<
SOwx$
l`.FI
xG]>(
E&Nw>x
e78*A
)^ J2y
I9'?i
c$c|:
UY~0|
Go,SE
57-ms-
v6pwF8g
" L^r
+n8^G
i+jr\
E5[p>
Ai]5y
o3E I
bek-6
t,$O$9
u1f//
kmm{7
R9uQu
0 X.<
=*m#E
|-s~.
f[MG/
km}xX
7)%N8
o|M{nc
m?i+9
nQ >Y
!ks$e
r@bUN
uM^M1
gF`wn(;/
-lYA`v
/>!hV~
itKTo)ew_
DQYMu
3lH\G
yjLpF
'i`rn
&>LnY
"ttY-P
:?$Pa
^aGWO
AEp>g
cJTm\
H~!xW#
P>"xYXc
++HaX#
Ci]-y
~=Ed}
Pn|BG
;L?]B_
*]-Af
$BD";y
QA!Eg
}CRPQE
x<xSD
Iomik
x_aO?
[hZY&`2Y
kxHZA|<A
-t[}A
<8!I6
D$3y{
m29rF1
[{q{r
7H7eFA
/tk]6
A2n.Y
E`NSx
L>Q*@*r
{MjKIV
[G<og
-|Em6
|A{cx
x}5+v
C]4_s
-\(,>l
>k{=-nm5M3
&x%xV0
x^]SCf
wcauz
A2fa*
h#fY&
|7 Mw
Uc1 L
bg\DL
,l8'#
#r#c*
r#8,H
?0G#F
B+}[Y
[F$2Z
g#){[
XGgak
p2I<w&
MBMJk
R^,3Y
],#l`rq
:@wgq
?${X1`
f3*G9
EuvRp
MKC}j
m?h}vG
[^]iVwGE
,/u{{[
f9V9#WP
r;WD@
&4ci_
J~'x8
xWMk=7
#j6ESpn
I (fW
txG!v
YEigo
pN0H<
}8u{u
[ie{s
R(hfS
?sp;Y
4&|I7
jv?hyn
%id>m
),Y@=z
[yaO+
EJ<QXD
o{g{r
t[}B(
bVRe}
q-guwo
"]]$O
IV-:`U
dWi%i
\7sMoe
cF{xb
$FI6(
yyZ-F
5K=?K
}b=7[i
;F#0i
B`kir
}'Y:}
}smfo
B Brrzg
<nWUe?
a$Q],
:M% {o
<Oeep4
dWxS|
*eRr8
?*GhB
]FD
4GqU22
[xMS?
|<}>O
@O=N7~Y
!M-&H
no5%"
3Bnml
xY~)k1/
ZWM^y
Febwm
+}6]Y3
"V#-#e
KVmoU
cvK1<
I}.KK
MF[}2
$Egok
o+kZu
\K12H
%h|9#E
P8?Ryi
kiR;{
mdO,18
[$k-U
m$jA$c=
Go2De
tg=r{
?0BUH
x%I*H
G41HQ%W
iph7W
I$2KybUB30C
}b*fAcm}
$QjBK
WF*pA^
[_Ok%
#"D]JF
&;Y [f
}/Jwkk4
9//on
RDgcD
G!z*;
"(t E
n;Kas
A^ghs
2011:06:13 14:54:43
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
w1^[$
u;m_H
R+81Hr
Ecgk{m
:{jv7w
xld>(
2Kr{0>%
|V<-8
{<<-"
]_i3h
{q$rl
4m[JK
<t 4VO
l.a0Mo=
F9#`7+
D1Kce
0jR23
rX,z^
P{I3%
xj}3R
In.RQch7Cx
}Nk[=&
x,i)q
j[.2YG8
bxv{/
]C&_.w
XNrzt
n2@$f
nrRE8
<r9D)$
Ck0 `a
BkA49
tJ%@J
84]?R
S{oom
2hVIe
"L$lW-
M||S.
$VTem
x.m.CfX
,t-?V
f&62N
yRhmlf
xNK-GSI
hE3Z]-
9/l<+
w3Z, m(
wsasn
>[y"m
H<Ueh
+bQ$Q *1
QEG+`
eV&5RpY
;I#v(
wvq_k6
"\C+;
[HO8kD
M,"I,>
j+*[[@"+`
I,zh%
k=/M{
"<^dy
\0&rO
_iqGa
\j7+k
!.<Mw=
8Qtd/
/-ci-
[k7:o
,@8M_
1g@2\1
']v)"
dXw+L@#O
Mtnbg
c$O!%
<5iam
m:;u`
Kkq,o"
hDyQL
c\6!39
Y u-%
;^#$P<slYb(
^h5=>If
(bqio
[%@#<d
:|gr",
f{}>
$WC^?
\<24r
iZ4y\
GeQ$fHd\
1P2dBz
rdyH@
kaqyguci
Z_#fR5
X1xoO
m.o.g
aku<z
Ci]5s>
7_-|p
|uky%
Bm9S1*
a^I#j
Y3\A"En
#DUnC|
mD,V3
NFI5x
k{sg!
<lm V)#
=Rm@xg
r9'3i
/-|a?
FGmja
#TR"L"
"Go<R
!w>Z)$*
#'p;H$
29\0p>
duI {
24(xV
A$f$R
A9BKW
\21u2m
.$.>e&=
|iammci5
][CM#E
@Z&G_
t=FK&1]
M8@$p
]}<5`<N
b:hZ'
qmgi$
#2j7N
,)u|n
]LI4.
2Ab7s^
xu}'D
|KmY4
)Ri!f9,
-2kag
nFwWt2
EG)*r;c
*)FO|px
ofXbW
WEpOB
L>e8'
>&j~$
fPI!s
e]5s:
8u[)u
,Wi)"
WJzW5
t{m/I
4I&{u
{IeKt
7#(e<
HKg8;
K++g&p
;kKm;U
Ic,~m
$*7(n
o|Sll
"8F*X
&1$[\L
8?6zq
K{yyfc
*eFO'
uiyk-
Md]Ogs
49u}M
TufwU
RHeM7
BxcGY`YeMV6
O4mml
a&FV*HD
M^]GQm.
zkSBg
7WPA-
(y-RE
Iqmwm
V7i3ZN
5[-"%
Auo2\A:,
,- hb
)-&XD
-7#nV
Y@>bo
J(I^X
Ivt(|
utW.~
YKnR3^
uG^8+
uK+}KN
VA U;
3YOwn
=D$SB
d),3 du
8./5+S
xrKx`
=E%[x
^-4I+
7Og"i
Uo ky
4|Q{q
$dH.$
ZDUfb
4|Q{q
WHmmQu
OF$u=:
e]RDVda
YR6*H
amy:]]
mgn`Y
`C(`
ltmBk
R]5.u
kew$P
<(#i'
_ 3&$y
M"=NYg
@6d&[VRN
H&{o9
Ff9ws
c,[dj
MoS}_S
ZWJX`
kK)V5
[h'8
P_K4H
<wR]H
hEu4p
e;bwUW
.Rkx#D
ybEYK
_g}J{
r(Yn<
0 #ks
uM5~}v
W]?}^
],\&8
Mtk s
Ykv)y
A{i!;'
Cum*Oo2,
ZE&i%E
jQNO%
.%WGE
@..e-
a4=CMm.
kM!f
=l{y6'
?_LW7
nPYy)
K!KvY
Ci_>|d
<5aaqw,
W,>"i
W,>"i
Ci]5s>
umlP0S
Y[$Zm
!@G?"
T)3jw
Eeeu<
xY<5a
[ywvW6
fqcs$v
u` >'
WK(kyD
LQGme*
$M,aaf
<um)] Y
.FN=+
'(T$,
t=BMGT
G-zRp
KH:VO
&4wtQT
->+)u-WLX
,PAm
|3kk7
8/u]9^
vF-w>[
4Okwy
:Ohmm
sZ,wz|
4oh$U
$mh I
FNpE$
r!W_U`{
Kyu I
v5Hne
(txRy
7GIon/
JGmN7
f?uA5
^Im,6hl
A#K X
LkK{)
TV#$o\
Co*]C;\
$[k@|
1]9 P
WN:PH
1]9 P
KTHQE
1]0`iA
1]E! P
X0W_#
<\-u{
^[Db,
jkx[TS
//<Xt
-5=K[
54x_T'
Z4/n-
K5~=a
[_Cle0
BC&G~
w~"]1-
.ont7
;M Ao
u-[Dx
Q`Ucb-
4Rj-my
Ccm,w
A,6(XF
1RPx[
'/$AGN2F{f
P~!iC
P~!iC
t[m+X
W.~!iC
p2OJh
v{WH69 m
_xST:]
{k`p9
Bg@:R
r,7wQ
e?Q[g
\n#w t
^$.T7
{rnqp
(UP t
e4kXm"]9
h:|*4
22&}X
HfVGVVV
ZI#y#
61<Qk
7>Z\I4p
&K`g8
IEr~
L|G~t
nnVim
C]_jWF
:`0)i
^r$^1
JZ[^/
{t9"i
XRK-Nk
<E>VV
6\I|u
I4}DM
uKmoJ
1ynDs<M
;fF?a
lb_&&T
<j@$e
!XS{F
Q}/T7
330TEE
0gnrq
,nn ivm
%1B^O
5I>9x0Kj
|'eqokr5{k
495ME
E-IG.~!
yfwf'
...t]Bi
Ayz/n
fdxD.
-Sdo#
u]r]-c
-hUx n
c J0APC
UkyFwK
KTHQE
D8=y'
Ci]5p:_
..4St
_4aAm
+mFC|t
ca4[Q
7OKWD
~+x7R
;[X^y_
&z,^lm
J <Cao
>-x!G
so{js
UQ'GEs
(umR9
xPhZG
n..5+U
Fw.zg
eiXwl7'
~+h#X
RIei-ZK9o
kew$C
<9}ky
..b}>
p#R9Q^
(%yda
vq,^ts
HHg@$
2|Jwx
@=FG\
'$}Ex
m5i<Y
Rj#L}O
2m8'pb
v~jMo
r0GNs_e&v
8ee8<
[E{gs
p9'nx
GAKH:R
U&H`hW
ffff7?
F;UFK
{ysa<
u[hm/.
rxWSQ
[ZAm5
<8<5d
Kx5H4
0Pq|'
m.#d{o,1
dVW8,I`
!`70r/>R
(@yLQHJ
%#V n
p\xsX
Ks{ww
wZKk7
<nB~b
j 7'G}V
/9L%d
5v1Cs
Y7H>B2
shoq5
20Xm$
&z>GP
x<L,'
-~#k^
LX4=B
|3}yu%
dVdYI%
Ik<7q]A.
;09<v
^Ca<V
KsffY
)@^?1@
h6]Y=
_xwPS;
~BLcfX
/4-'H
A4Jb]
mo-v:8iVM
"I_OE
m!K-%
XxWT#
O}onIg
N?gFky
>k iNKr
"I43L
CiT~0x
uHuMU
XBBZ/
m&mGT
#WMHh
/ jVH
<cg`5Y
xxlp?
u8oo4k
ms&vD?
NFG=k
CZkeX
hKgwvuKamiv4
9a{uui
[8t$>
*@0c"
?vERG=q
S>'x9~"|>
};Z66
1@StO
x1t}N[i
;mv]Z[
g%3|-
Oqqe22
t@Fd`
m.ZK-"D
f_-mc
;V2rA
r)hdFe*
3l~ x7Ok3
7x3G{
QgbV0,
w;UT*
XAsw:N
I%4~6|O
E!ItS
{- R=6
WS,~T
n|3c$0
^EtQ>
X|?H5'
mf].;
pX]DAm
Gs*H`X
XxgK6Zu
hW aj
{w,PI
)j6;Ny
K=mV.
Np|M'
><_Y\Eygq
2011:06:13 14:54:48
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
w1^[$
u;m_H
R+81Hr
Ecgk{m
:{jv7w
xld>(
2Kr{0>%
F22Nz
\m=&{
oukulu
9\)*F
3<aB9
~2A+^
N#1ZB
.a-i,
d4M<5
[B>iC,
r?JhL
l,<8m
sap3I
H2+n]
}6;;=
4YH2ynP]
RuIw!
s"xnw,dkyt
;Z]oB
Kuc4V
q Y$d(U
=&91<
Dkc4;
%IZ)^
siwmm
3LcE@
8aKv{
,C#;1Rw
mFmGE6
f5vFi
fD09M
o5;]Ua
#bFNO
DYc_'
j7ZJ<
#j1i~N
)1o/j
<?gcuyo
5}Bk+
SiWmq&
g]R4Yn
d0^A8
5MZ}'V6
l+mgo
").<I
-|Obo
m]f M
tXpe`
(an2A1
r.LZe
[}cS:
m<L-u
VKYfw
i?|#X
icix${i
q9v&TFd
n_JS}{q2Es
qww<r
P UP$
]>[EG!
WG[l2
/q$DJb
vKwEo.)
O.7J~
t++ m
bi4yn-
yt-7D
whX($
jD{6(
k"a2JE
YLgL4jJ_
@O}"Y
k+{+v
Il/`I
y_LY|
Uth/$[
bKekeW
@nVm.
AU,%G
+}R[A
PX36O
S}<"}
RHT2(o7r
,^I[{&
{Kk{;
jD[HS
o.-5{Im-4k
qySO<
MepY7
^3"jQ
Ae$s"
Okok.
7H|Yd
lFmF+9
C,O"Y
I1yf=
c8$r;
}n|SbO
u;GRs
d%@=+U
Hld.Z
-K<j6
K$^SM%
P{WoE
#MN}@xg
F9f Z
qo*2I
<\>"kG
?nlcY
GYWO@
qzl>$
aqu$Z
x_SMs
RdV (Fy
]C+nI
\Gil0
`;WA^e
$~aY66
x"hSl
58|/}i
^l1>G
imx|G`
D6\~V
`Eq>V
[_ me
Ci]5s>
@!H'>
aw"Mqig
]xgTk
c*]VM
9%u(c*
^hWZ}
-Zfi%
h$"Hq
akq<R
2OA=??
R( rrzg
;fF?a
k.[Up3
^F4mn?
9%@\F
-aM"x|Ax
) YR8
}>9n&
6Y\Mg
mF7]N4
`dDuI
vCt S
vVcwuj
AE=Eyv
}7I7mm5
p:WO^
(f9gf
YWI1l
$&IZV
Aw]Er
{"G2<0#
X gr|
R Q^;t
[KfHkQ#
i:t:>
u+M8Bn
5;=cK
_]Ccek
osw<6
T6vPi
'76SK
0pzqZew
:E}ggs
y#!O'
j}5'Qp
IdHb@Y
hfA$rG
Y|@,b
{yRx$
iqysi
iZtZF
U~/iW:
KA~&M(
]]JtI<
Om?y8/
z| x`
u=8i-
#,zdz
eoum4w
ehZm>
FG=x4
o<k,R
as}y2Aik
> xWD
%[<p;
[iVPCmW
JhLA>
Imh%v
rK18P
PmanZ
yXI#H
Cgekfg
<=do,
$v$eI
yoPk^
[{MwD
N>!x['
CcqFd
w7pH29
F_RcFg
Aw]Er>:
ZKxWU
k>+}I
NT<r/
"U.Qb
M`r>R
[P]'J
aUy$V}
p09<rh
LxwS (
.lu)5/
}N-oH
2ppGsW
xwTmo
o|=u,
\ Y^<
*no'i
GS]D#
?uK7O
-xi.u{{
`>WR2
ky"Gu
eRFXU
(.!V-0
^6CrC+
AR0sR
5[++u
v us-
6DRHVaq
bk{iT+E
+os{o'
7?g@c*ai
Zzj~.u
"r6@2
YHef26w|
M#@s"
\I#n*
',{}rrkw
yp3bI
|5u{}
tx.|3
bk-E.w\
yDVI*D
^x<es
iQXwM
4W=qq
s ]jL
WA?NA#
kIz~&
|?{o"
dSW%a
5k4uS
C\:l}
Kb`Kh
fV`[n3
nr767
/Ein5
Sk=xgN0
aF9=+
3;DB.
K=jLp
yd|(t
0F@=a
nQFNy
Ci]5s>
om5=N
Tbw&2L
WSHzP
"k@kz*
~)2kz)O
,WqxkC
;fF?a
im}l.~
~Qmfq
Y"Y%,
rnn\=
K?5ZVh
R8"))
\*HWr
H}Bc0
YZWXP.
<7adm
f]j2i
{UdUl
0`=x6
`;`PpF
1Dnnb
P7;`nc
)S(V1
vMV;Xn
+yz~_
ol'yR
3`1#?
+l>rs
i'El5
-bXLD4fW
^;j2:
">88a
H^Ie`
!KvYU
EW`Nr=
v0]C}
Aw]Es
_x^m'
cDUEUUTE
K{hTG
_hCt-
iu;+}N
olcdg
Au}qr
P7,E7*
*iV"!u
5 ./f
Y.$gi
2n@c*
}KO{h
%Wut[b
F_RcF_
K+k34
D[}[-
42b7V
u~&x<
CcyFd'
]_Q60
JLaO1X
Aw]Eq
L6l1|
"$s -
F>c_E
wP}'I
[hF^R
&?B+B
)ooik
\xFKEk
[|bY>>M
4y;$\
KrqpX
b+<sN
/d1[+6
AiW|]
Il..
_4|sm
G8i>n6
2yi _
=Am.t
+Yd`C+
Ci]5p:]
7zt3j6
:Jn"ge]
Ly-]<
_)0 f,x
mE2lL
rxoD7
Aw],`
r@9;p
9N8'
0VF2mkY
RO4E0
;FVhR?
E#0O5
'*:[/
;fF?a
Hm+~|
{k<N]f
KK=_K
!Y@S$h
K)g^J
=:}WSy
\@%Nv!
c[}]$
eva<;
y$RgE
_.4!Ar
\?X,p9
[^zyVG
]%4&v
u&3.|
wsYV?
|-km-
Mn[KK_
l>$j/s{o
i\cn1
#o.7?9\
cv{o.
i+ai|~,
<?}am$
[b`RwCe
x#1De
kxu+P
qIw><
.UdT-
2x[Lv
Vj%-sm,#
QZC!H
iW\<68?
l.l..4i
V/6?$[
?f-?G
[5Aqs
5'1g>X'
iGNwXM
^X3M4
VSIii:NM
@YQA`
)4r @FR
*8T"`
`'$.N
}>=#K
ZqTayk-
fek=:
6FkyZ'
G`?}O
~-jW?
u=uf[
#mq[V
<HBG!
~85X'MI
q(,y<
1Fdyfp
)tMkO
9VXfB8du$0=
GYWC#mo
VW1^[;0Y
2)&2p
gw}ug
L49<R
kR|Gm
TpW:M
9c9WR
]%4&v
U 3coA
`~%h_
;ppG'
@>Di$i$#
f-#n;
la]~K
kiZ|:F
CN0K$0
.Aev}
^Wk7q
C2.Cnf,
.|O I
b[6U^v
XVMcXH
t{ 4K
)cg$v
lt{YeKx
7#(e<
>%xOQ
@?SJ
WHh%{
Ewyo"+
m>&x<.?
n5=[P
ZGso2\[
gfb}X
D8d%I
y.&!Te
G_ILp
ee t*GQZ
hXA:<
.~#x.
>Kv=+
gGf&h
T8%s|S
\y>L*|
oiqb!kdE
uX4{o
Io&KX
c1O$.
5_ Go|
qQxK^
ci$I$.
^9oLWA
mGTR3
5Y5K2
9TPI ($
u{:\<v
-oi:]
ue*k)
II#Uto
;kkX4
y`xuo.Dh
Fpp0A
GeD#,5
|rt};H
vV%*#P
llUZ{
gYo3T
yV!#*
.zn</$
GYWC3
4w2@-
UO@T1
O(e $o
%?60O
##88$d
&c$1`
QqnYCyr
.5fU.
hmS>E
S,B$2HG
C,0|q
J~hJHX6;q
BK9$3
tx]\(eC
z<Ol-
noL~d
75&I<
nlnj75W
V( 75
.mL+u
nj75`x
c;`@LM
,LQU27
6~Yq:F
?_4i>#
[jheU;
4^#> :
;(<uk
5+tH$
Ez-#}
CZ^2p
w}gLe]*
r>X^>H
OQ_)|
0G=q{
;3<%|
g$D,A
[{};Y
w8q!,00Tc
wm1ygiLg<
yj ~q
Inbye
>cI&v
/[=0<
]$,]3
k}~H<;+X5
3ybB1'
YK)R{?
hae27
,vjp>
G`[${
wm1ygiLg<
gPrT6
ICx"{{
Np|M'
><_Y\Eygq
2011:06:13 14:54:53
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
U6r;s
SP:t'
xa..PI
n"_6"
eeU!Q
@nm,E
Mog#FT
ZZo7J
u[&vAse
uxuX'
5Wd]2]
XHt%]>k
ymk$v
9UstH
cu<rk
/|FO=
n,o7k
(-<S5
jUZ?&{
I!>A+$e
~%_xOL
,>,{H
ll;xoP
Rm:mN_
^Kq<@
9dYKKr
V4@2L
y<O<>1
|bW#J
xbkti!
Owq"]z
YJmrv
og3u*vH
5[}it
# p2
sz|Qg
?1Rr3
F3sm
`u=pk
R],1jV
u<%dQq
#/pG
l4}!`
{Erz/
++}3L
2%P0z
NqUt]
i?)`x
)K*8vR
=r2H_j
t4S"m
&[kh#[$_
\]$lU
wRAous5
\ZMk
"H]Qs
$nx\tc
r^<1Kq
19vby
m!UpN
RK,gR
>"0p1
YGwgq
~)xGG}1n|Aa
MY>)xF
M/P] #_
mbv2m|4
&yKaco
B9[>5
F`A9'
>%jZ6
_Kvmm
!bX36
$ckqlQ
x;cs)
TAo`,
;dyVm
d3Ge)o
]p>Y%$1*
2y6>,
YNe;I
m<@o-
)BGv H
!aIe#
5wsii
kmeoc{%
-oUM5
,oR)C4
r@,N:
WN:W1
u]!-f}Bk
dDS$6
WSHzP
^[| 2
<DOamj
o;Oo
m,&=(
zr+[L
I++>]P
23Kg-
1n?j-F
'1.6`
ycyV3
]]Gf.g!#
yEdk~!
V76qD
\b2v7
E!8=h
M=&44
Qeo6+
{mZ9.
by7Cs
ABR4i7
RA66F
_c[7@
"0f%}
vWP\j
|Qqe%
pXkvr
gaafc
5H%Sa
gyo{ x$Y
$zI]fO'L
9`"?2p
-Z2|D
&6WI(
u+=[O
o{mNY
IbO@+
p3O=k
wy~b2
[yaS`
d_.@<
0YCup
l`eH4
D8d%I
~ xcR
~#[Zx
"En]d*1
e]Yx*G
i"9R}M8
y,QZ]
][^]D$7
$D&GV
d3G$Y
In0Yd
kimmRh
^Vf'i
?k(<w
GJhLZ(
OZ(=h
`XnnzcC
kgRs*
}GN7[m.n^D
]:fBF
jilgh
Yd;\0
4}CU[[
F2-?e
Fv;W,NwbY~
HP)*V
`xdiH
dH.&E
I%Q^FU
+yz~_
%#tY#
WInCD
St$+
OZ(=h
C9!O9
<H4Yf
;uAkv
M:}Bk
K=J}J
$s"F"
{#!*XnV
qt)-t
p~W1
2g1G{%
ULJ[2e
)kos:
`7rO+
I@mcF+
u+i-.
:<W7 i
JeTevB
HV#+,Q
k#D|C|Y
^=y|F
8o'nc6`
[}_R}F
Ko"_5'
b(Dn.E
X=:kw
#WCEQ'=
6QImk
.ybOV=
5'\lr
DOyeu
d&&0C0
J-^M@O
SLm^{
- :I:
Dkt$E
B?]jo
2go=i
B?]jo
EC?.:
!+ey}
j^tx+p
{SBaE
-WSR`
_j7)oo
7|I(/
ZkWWs
k l ?$i
[K,lb
#R iyw6
Mp#Q!@
;hZi]#R
~9_|,
e$>lq
=E44^
BgAE`
ZIgos$
rx5%r
En&f_"6
4Cw`$#
ibVo)
te[)A
#gI6Gl
B/)'P
732I3#J<
Im%1J
QTHQE
ask#4q
zL kv,.
N>=|y1i
Hfv;U@
e13/,
{(b2Y
WS8mB
,sG,'3
:dPi7
Em`-c
;9#nI
WQF-dY%
0p_q@K>'
2Y[kr
E%`pLI
>"xV?
TG$q^
syb+B
5+8%Cv
xj9<I
7psM
3lFp
9@dEn
\0DV}
qpl^[{uo9er
3[^\[j
MnRqN
VS^X<
v}#'
4R tq
>(xcA
#88=4
y.&9,
R4jO+
Mz]4iH
de\ bY
OZ(=h
TW:<-
<Wxe}GB
{S3 ]
kM^[C%
x;T:}
Cy^S V@c
j7PMo
Ml5Km9e
?jmb-
"_lwHLhY
RJQCy
=z}ju@
@D?)~
~YYZh
\z,7:^
k1:Rj0
-${yP
M/PQ>
|&t.J
}OQKsr
[We!eL
-"y$@
-QQLI8
haW8*
WgPPQEC9
g0 wX
cwiuo
`iRWY%
0n @O W
-^&.\
z|zt!
wpUZ5b
p`BR7$
}eei%
1eTn'M
ke wR
~$kRi
$:,7:.
M$/m$
$wmfM
i~ YF
x&Q$r
*kyRx
$l7\`g'
<\cTw
q4jITy
QEQ!E
+#ck)S
->%xZ=oOh%
^K{{-
N#UP0
#/hd1;#
k(H7%
C(3DJ
gUoX
B+IzP
M=&44
WAEQ,
SHh&k
rj6{-
R9#Kc
kK[x]
[GotL
-FC38
Hm I7
w9p%mL~
/tK=7M
DrrGl{
uUfTf
QTHQE
rFw$cx
U_43m
2}>h.o$T
W"fIe
f-)V*
2X$XKK7
:kjaQ
[yXN4
$C"Z4
%WOHFE
VE]I_*)
FbZL<q
HKnR
9_@;c
K$^dg
oB+gK
QEQ!E
Ie;@l
R{yUd
/ol5{]#R}v
B^8Q\
X,Q!w
hz|1\x
;*,qH
QTHQE
x&A$r
R]3CMK
xcpp"@@
Ff@$
TY#pU
NS)ti>
;T1!v
d$nYik
-fH^X
0LX(&?*
D$B!$a
tK(4I
KeY%P
ZO3i^
jpX^kW
8G*xb
QTHQE
QTHV:x
IaIfH
2nRFGB;P
OHH^M
3<1xSW
]1!y4
\Z<f#
jI&bH
E*UA@dQ
l<@&+"
P9%Ai$
o2Cqs
igbNLAW
QTHQE
O?5uT
ocaqt
_>{_:6
sZ4Q@
x/&2ny
HRY%s
~hf#{
NpNqY>+
hn4MWF
utS"9S
zzS'l7S
.?iMC
=E44g|1
][Si'
<0|2,
>(x[W
C$)eU.@
dQ,R4r
slwwV&O
|Gay`
{;}Iot
~iD<:
!_1"_0
iwT@B
FA^:v
auc{o
RdTS#
5K+}GO
87* ?
4H*H8
EUPI%
Q][C{k-
QMm24r
|1qav
2011:06:13 14:55:09
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
%$1*J
<Gumc
?R9;?
d|KON|?
~ x;R
m<~u%
irHAX
mBw]aA
{=:g0
aO<P6t_
tk}Tx
RwVu*
h^|q};
eX5Sg!
|q}kC
nnGBk
rdh8-
,O'5^
2Z;M;
c`a{;c
1x/g A
Goeks
jw0+^X
1f,z]
2I?14
VSJYl.
fO8O#
722,vv
lNF8q
D{A-2
7:ElK
4M:3jm
K{=Fk
KkZY?
|-mb/~
V4g;S
.{=(E%
luM'L@n
`{9aq
SP[#q
Tb`N)Z@
j:\:9
`[Pfh
MM<Qs&
:zk8SN
K-N?"
6mjEX<5
|CPt+\
).<=k
MJK&f
_fD+p7
{YxkI
#0Q_5j
a$34d
m5k]N
l/<_4
a*Os&
k[KK;
^-hn<DV85
pj@1@
y}ei$m"
1i7auyK
?l-#U
RHdI`
YQcP7(
lu=95{
6V1E-
L:TW
IvV{t
&g~VX
%IR-6
r]$h3
]Emka5
|#`,-l
M;]XR
dc,lB
=SM%`
)g I.
2X^_xV
C*[x:x
8g1FX
,V-:C
1H~!id
wKbJH
-n,--
dT,W?
wwr}X
DYl@U
~%[xKV
8nQn<
7,~:x
F"HKq
Z^Iks
Eo4+#JgWD
4Yd}*
sm2Mo2,
QUo/`
uV$)#
LaYZIp
E5&4z
~`-Tom
oT,1D
UYa/:
GIR7?
N2FMb}
k ZH#
$aA-
V%f9!w1
ZF}Jf1
Eyo$Q
"{=CZ
8gWhX
MgMi5]9
#/8g,C
9aff%R
&IncF
|DMtx{Q
utS"`
70yD\D
MJRwh
Bi7o&C
XZ[pm
Y~!iH0-u
VXzy\
JC<k",
R{+=@j:
mp#.2
$6"P1
o3K#F
CeHl2
[{h_U
ur\pa
js]A$W
=;};R7L~
r{~=q
#WO^O
KtFKP
<lI\np
h2)ib`Tr
#%d9%A
52O j
s<.X|
hWV0I
Ux$>f|
[\][$
S\YG#
2xoI7
{igeiqogkb
Lr0|/
ppr288
e]=y&
OJ_ _
\yW_
\zlw:
Gduel2
g4p_[
Q\m$|
]{MI4
]GS_(_~
]J}2/
"2 T$
}?Z}:
d-3lE
GM?MX
*9-Bj
Qr}K0
5k={J
XX<lZ
R=#IGX
N`>&k
AQ]YA
8<dV'
[[D_s*(
)nmwy
u'=G__
i'wny
mT^[\
fXtmN
9`@==X0
n|;{m
Iz"i"
VV*FN@=
Fbt;IY]^E
*eM4&q^
g+vwN6!6
v+yLT
0* F;
O-@(e\
\XI$e
ZVV*Y
B'bIS
M:v{K
ky{ce
9x1w7
2Z]FH
= ] c*w
>%xI~#ko
[$m*Y
"iWh`
9pc>wBA
=V-Lh
3kvkz,^_4
88,8
H~&x8
UQ'A\
4iqun
mi;]y
l>7|L_
[Gt^q,w
aB#vZ
]JM=.
znGRA
Jd,Y9
(#PK;
1F!]C.T
{]=pW
,N7qWm
$G*N1
K$^dg
+Mo j
<!eq-
r0*FT
f_H?yi
Xemo[
-n.w<
cD"(<
,>G#`m
V~QKWw
2~uZt
OBKSe
#T}jE
bBA*(
l~/_j
1p#2\
>Quyt
!+ey{
: sKU4
[[i<Cn5
_[x/T
Ap 2;
1^0?lM
SY,wM
#uey}
1;w:ad
;]cc%
<Aoy-
_\ZA,
N$d#y
h E=K
]N_t`
[ K$;N
u=zO6
M.UY|
V`}Sp
ifgv;#E
aYx[L
Dgya`
}1X^2
"3!BT
x\`;.
Kkc,kq#
IoeKH
H%Ue*JI
x$sAU
O$k!V
prkwP
;9;F6
Giwsk
~C;yQ
s,y1>
jo$)qo
RA`r
K{(|-
[Ew}.
ItkIlm
1^Zxr
;r~g8
]<|/Rq
IY"EE.
4&}/Es
}z$kkYeU
OAYz/
:(HR(
.</ak
"{-E.w\
DVI2D
IR6di
<`u= ?
8`q+6
0D#>z
X&Q$n
Dr]"/
Okt"x
*/"Y~
prz{v
x5+y<Cao
q[5OL
&I~g$
'LF36A
t=?G[
E{y4W
]xJAy
8WVc#
>MJRA
0pO?1
[gRs*
dW;C|
s]lg#
UpOr+
zR]Ev
la]T5
n"vFh
m4(5O
qq*Ao
CX]'\
uYn[ mR
9<s]B
+n.^8
s]LX
}0H?Q@
'~L6_
4u4W1
\xSU$
o~$h~o
j>\ig
/|?k|
,a7LYL
R`|<r7C
Igcmh
3T{KT
H^%!/0U
WriZu
5W#$#
{![{E
fEVRHl
1ysK /+
MFeiN?xF
l62A#
w2,qA
y.m4[
;tieeH
Cgc4S6
[Gikk
==kH
b RA#
hfIvB
]Fdt"2
__h6Z
ra;Idp
T.HO00
i)zmPAr
1Am!V"=
HMOEe
/~8x/M
72E&
Vv`#L
Sx[LH
K)|'-
6 $qnP
}&mAU'M<
i,v77
9R#wO
_W]|M
j&]Nyt
Av!Cb=K
u+{mf
"}#U]gL
Yir@t
%VR@>
8<q]M
A{sae
Gk;nx
E5&4z
WJ,<b
G9goV'
ckm~O
aFrrH
6mV7xZ
=+[]J;
GfI_
|7e4q
k0hv:
C<P]Kl
A*!*J0
?>?.]
Mt1d)
QTHQEb
<'w4V
;kiZz
Al{SY
pg'#-
QGs2!
,R)GS
nu/>+r
eb@C
|9go
3,LS~
mqwujnQ
Ut$X|E
Hx!FF
)4LDg
e~Ycr
$e#O/pf
S_Yi2Ioomk%
47K;h
Et|pH*H<
]\Moe
2011:06:13 14:55:14
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
$,Ypy
tSW zS
%TTQ`
%TTQ`
%TTQ`
K? Yj:>
f8-"m
a,gWd`
mgoqx
%P>(\
&KKQ<
U^WiZ=
om,,A
QK67\]J
4{wp/nl
[/&Cm\h
!unns
%TTQ`
%TTQ`
K0##r
Ilq+A:M
>!mOX
hK R9$
7:BZ%
>#jz}
M}cod
%j1\x\[
[-m<9p
fSw|`
_yL+m'
:l3\O,R4r
'9Pnp
*Dmpt
\\[|>
=KF.pI
i+)(c
t}]<;
Cyoii
Cig yQ
6RhZU
n%Cm=O
n..'kG
FH4X-$
TLgw+
98Q$>ra
Zho5+kg
s1$%O
x` eP
I]NN@
-J=>6
~#2<D
~PE}Y
GreNC
B:yR[+
mm<BT
D~nLE
/"8IYaF#nC
mmckr
k)Cmt
o*Ai$0
#M7Y[
)oc,FK
# +nb
6q_4|w
/,<K&
T[Tl3H
ic!gq
)q{cos"
S\<-ms+,+,
\][]5
e./,`
k2Oec=
[4Si>L
-Zm+"
0T.6.
s_2BlG
?1b@:
t=?T]F
[i#5s
Aok4B8
8>4|1
k.Sad
]Kc,2
.$*:
PI$q^;
y2Cw7
NrG*q@
eKo J
EXcFr
OAUm<#
hWr_i
jVZt1\
30U_,;
Y\A2N
F~!i@
eEbNs^
off!'{
IT,kG
3|H#8
]*j>/
6PK$7
Hu=1XM
E@K1bA
p9</N
[JWpF
*/ x^
U0$^\
D~kiJ
h:&pp
6:d" $
+mKXyb
5yVYbB
r9'2i
O3Kws
!rI75
M+\/c
aG@u(F
Sj1_7
{neE=U[v@>
q>&x</
qY4Q`
Sj1_7
{neE=U[v@>
q>&x</
#hwm}k
*4rC%
>~!xX
/"v$^
|vr~#
]'Sx%
jn*=c
ub4}
:Hed!6
B"gsm
f"es7
Zx|Ee1
9hX$Q
n-\<E
$Gu!R
x<Gi}
q#!uB
6f*cs
_s*7I
)gj/gH
[Ck b
}j++;{
=>/"I|
$P T\
M4L--
7:Imo
(dI#;PoIU
NpR /$P
|*zxgH
+D|[g
_ Ii+
|\E8?
Io|V~%
:x?@S
cDU9~A
OP~%k
*23Gsf
(TEQs
}E~&i
.kh(4
/>EA$
c8lt8
+d.N:w
.5;(5(lZ
/>EA$
c8lt8
eue$0
[(u(l
iue<WV
FPA!A#4
imwom5
Mgk~!
{%Ya%M
iap0~Q6
.umgE
Qwj"m
$Cjc9
ni61i
G"?FR
ggl}Y
7n}ks
^Ku;C$M
Z]xz+su5
#)#o.
ibS.#R
d1Kio
.4k9n
5Nd2(
p0e89
# &@7
l"FFD
]Tc!\
A/9,wn'sU
VpIq<
#fF$d
-y30U
j&03Le
5k={I
ghZr4v
+]5s?
@eeTp
~#kHn5
~ i^#
<Kih'i
?(*N^
\!Z00U
..5{4
A|p4Q
|&ilar
i.6Ik
`u?,L3
H'${b
Ug]oK8
E78 y
Kq4W1
I4qE+d
[ZAau
?hFh]
{]\#a
--~n.
.kh(4
jePGJ
jEPGJ
O D@:
jPu=@
ommnom
|xr~#
"-bMUt
[K}6Ib
[*GNk
uxR!qq
#fF$d
<|J>6
.%Ki|
}k|r3
SBf~0O
Ug]gL
MpQm
E]EgvK
Xp_bn
|9y,L
/"#af
Xz^2m
ZM<Q=
kokwvT
1]\G)
<;y"$
ilw!>
3$g9Es
~sY~!
UWmoK
$DyEwnU&<1
`[]9d
5h-p?w
k61_Y
lU@S /
W"IAv
ihw_f
XK}&w\
uU8>4
#WU^C
nrp;.
I#Im5
Vu%PJ
#R<^#
k>!].
0Yr=8
r>Skc
h5e;m
' ;FO[
e8%4K
1]EC3
t(5M&g
UY#u*
Z;%gD
bQk3%
@o"bI
=tMDv?
Iusa<
!d,?vX
5wy,W
DB>y}
]i.mu
!Gh:W1
{"z{[P
Q^@/<E
amff2
{!q<66
PC{mf
eUJK&
^EzdR
^Aiyy$
$,H%F
P> i@
XZy~w
;aF9"
e%W*~V
~NrF?J
t[]k/
0A=,x
Kt{[ycUlN
=F?JxP
Qd[9e
KSgq5
C#_\n
.|C,Z
]On5Sh
D~O_q
zS!9L
BDSmr
eulcP
`0jZ5
2H$ul
K3c<,
p>i-x
]C+p$?
(|_M;
,W>Y>[4Y
5MnMSW
D0*4k#D
|Uuac
q"h:\Vv
hpXDmm
`U{f-
l']2}f
}s0}CM
QO;~l
[3b#k3
4N}ti
<mFw#
.4H//'
2011:06:13 14:55:31
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
lQX>v
%TTQ`
%TTQ`
:,JFd
LZ+c"B
tzx;^
vyH7(
[kvK[yZ
YTO;k
}p>(\
W{bO-
%TTQ`
%TTQ`
1Y%$F
@>i!c
$*-Ief
i$1Oko
;&v>V
ZybPHR20F
b?s&1
Hn|@:
9{D2N$
q{g+Aq
3!eRC
|Yyk(%.-
+^x?X
|Kz4o
2.P6wd
m]~!|
:FdR ,U
m{y#=
.#v21
.bs$6ar
5[}wV"
G?7Vm-
~_R8'
?z33?
.M!#T
},Omi$%
<w%RH
,Z][Gd|ey
]Y[F<E
$``>>bz
cR/}$Z
mn'KkI[
*]`>K
m@;T!
ht]/S
G\}9n5+
hu[EM
kO&lBm
\g#n(
Gmen%7
b+Ku,Y"T+
Vx^6(FQ
,rr
YY%hcd1
4M.xt
x}<9yn
-LP^@
F|Skqk
#SjXmP
c|)S$%
(nu]gX
5h4M1/
osks
RQaym
{ju(%
WwztP
buxZ6
yXG.U
orHPK6I8
P6r>"
\kQI4
]4W"Vm
5}-_4
uqbeM
Z2]kZ|
oB%G`
fVed^
!yb;3
9n. 6sy:E
exfu|
,u+(-
/nl-5;t
]EE?+
#V(]Q
lT9k{
1,j?
GXZxgK
o6(`yc `
+m.]En
0xJ]N
vR^ VK
$dddoh
xw]66
%WQE 9
1xGBH,
!RNcm
Yt{u3
MkQUY
nH<zWI
!G?*q(
(RI:!
s#<1<^]
jqY4kr
n|gwf
aFkwY
31.YS2)Y<
6Iwaw
7PKwk
Mm:4R
3Gckwu
.3W>
}e0h!3
h)uknU
iWq_B
zps^g
]Ok$Ip
EC}yo
YOwu
;{];T
wossik
H~/8?
VhBg?7
Icass
/u41<
EW@Ca
)GJJQ
nj75W
(I`KK
UQ~,h
IRO;@
z=Fms
si;E,R>
dhZ2p0T"
plu<g
>#x\j
<+w#;
<f[kki
0hF+;
xcUM'G
`0@+^
maI-
i\q]_
k[}b(.n-
YV&U;
, pNY>e=x
]$vQ"
) 09
5eu.?
Ci]-s^
lyQVU;r
5)Zy,f
Ci]-s^
qnYPgn
cgndi<
[W`"Wl
Q\ivv
YH!e%
?iMkQ
V]Q$H|
f"YZE
}c|cY
na:{O
][Ewuooe-
rbp!%
Iwn4+
>(Fm;
Ec,-;
tVy,Lz
C;&Z%
LWq\1
m$(?jx
)*@b1
U>,xt
n/|+<
ZuqP|U
|2)G]
m/.4i
Di(WGPFc
c}I./
pDqaQ
ZrNu(
:cfI`
]BmB=,
K.I Z^
Arpy~
NXDcU
mHZ268M
_@QG0
a$>SY[
[F0K8v$m
NKi/lm
Cv&Y<
o>(|L
}>;o"M
XCGml
SIgq*
c)!?O
i~dWD
8Zpm,
y)X^+B
N3_!/
Q#Ub|
\qU<9
sjO$2
mt=Vyu
KY.-<
siysapuy
=OOON
FyP(u
#WSLi
lfo6(v
p{r+?
uAeF/
qk4sD
yk1Q$N
,R:8uua(
dg(;{g4
X.u-N
6#B#@
\uf Wb
h\|O$
J3.J2
2011:06:13 14:55:45
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
<?xpacket end='w'?>
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
tKvdb
:(7cy
$kp$w
[,X1%
~"\K4
xn]7Z
$~~HF
>6xW[
++d3Oq>
o`ApF
]&eKks
BG5[F
]]-fh
_3pnHR
"}.=C
K/3GC<NU
B<!~_
W=G_Z
_4LT~
MF]Rhe}b
e2Daq
N]:m(
3#DdP
#tV*
1V5+i4
pH?(]
]?t$m
}c^9i
+f[fG
-cckux
BI*@+
|9wi&<
ZQ,An
=f]F;V
S3<`(
4>^['
Eft];
?l]e|!
0<+$o"
gu:C{oz
a#r1R
I,6Ww
"Utw_
E4>}t
]$#l`s
,V&keb
u5=WO
|J}_Z
lKey{
,!+"g
}}WD.l
B{MZ}
0H^LD
FS K]=
e[Xm|7
+2i~1
Mu+4a
]&EiJ
LFUVD
V2@=@|=
"tp&2[
W_ v>
j[_[_4
#;$z>
P^[A{
h)v&1\
Cyeoyo,
LuW9&
T:t;C
]j:|7
$r4jYZ=
<Mt-<`
0>*i`
udk^$
jBw)9''<
tM;Ek
surm`X
hRk>%
mysyb
AM@Z5
C4Q<a
>S&x*9
|Eju(o
kSjzN
7VP$q"
YdWuVV
Fv[MV
9`qvc,
3JSd
/qe<1
Rkb)~
|*zxkH?M>
$Mutp
7V3K$
[Gwgq
E{cem
q<Hdm
Um.&I
Kk;H^
dj3i7
vzZN,
@>`pN;
4 .9.
D'nXnr6
TLX(C
YMo#ye
T:t;A3^
f:|=|
%j=IA
SBgMEr
yffb{
mDD.!
g?NEs
<Clot
]BF}
+y.n%
ZWM^k
]~&x=G
(~&x8F?
u]Q<?
5+}CG
ZFP:c
bEy~
a:;hZ
eV$+m
vl01us
MY%[m
Ce@=@
_OI<=
gqrV+S
2I ue
OmgsxDk
?R};P
762@6
H%ufH
P~'x8
UqtQ`;3
"Iyu&
>&x9P
UqtQ`;A
y^lW(
7)iiou
i7wO7
7\xoG
4O"0;
39,I$
NONqX
5+M;Y
,crd)*r
]xnK+
NS8*O$
~*x/@
|p,> i^
}^(u?
{WWa.H
#nII>\
$U%K)
KH.u;
^V>!x\
Y>'x9G>,
t9BWw8<
>~!x\
6K{p[
U2;aN
Q[$oo
a42Em
w1jIz
19&!%
3Ml`U[
]&MsR
i6sKf
Ai]5y
9a{o{<
Q'AEs
[C4rGq$
I[;P{
Q{MII
6jvmq
YrIhL
NY|Ai
xNK1o
O~=;P
~~Ey`
-PGocc
)%RO+{
\kSO7
>j-;\
RNrOC
O,eIc
&j;m~
xWV`4
<b[Ycf
2;y%}
=]:~'
2HTVf8
1]H<f
,~ i$
rrq@9
uSy4Zv
k^-vmX u8
iayeT
m6]i"
\XCwg
cygq6
YZ5Ha
]XkZu
j77q>
kY`-7
p7H~P
KK c:&
QE2"Y2F
$rz9b
D%N>q
8=E4&\
cuegd
PVIH9s
&,6pD
C9@dDn
$`[rv
Ai]5y
Hf*cDU9|
70_xi
)Y$uB"
[-o(!
jRhoq
444zY
r}JMr
Ammoogen
mF{Uq
-/4kM&
nQXc^
Ai]5y
,q\<D
l5a0Skiqk
2\yWO
Tfyep
/~%xz
K>7)b
WBC`M
0Ms}uyv
0][^]
}1RTp
j2^x9
D~$}OC
7](xrM22/
2mv;\
4H iB
7SGom
t{mWK
aD7R8b
m^xc 1
b0@Vo`
A\nVQ
h^KID
/|R>'
}T^[j
(RX/uK
@~VF?w
E#o(Y
[xz-?Y
-JmALaB
Hvl*V@d=
>*ix9_
QxJ;IR
OP\0B 8>
1% hp
gq$t=
8$dd)
=\0rO
DQqo4
,3 W,
[{yf1
Yg}Zsok%
Y@f!w0f
u1M^H
b[m:I4
,?f8,
fYn.e
^Z_G9
FV&/4
Oq{;Ae
xrrH
QEC?$q
WATHQE
EbxkJ
#ivGU
H'5OL
x2=ZH
Wf4km2
z`^^<
w{;bKy
>\D`++
w4aN\
8Rx>I
q#3 c=
RI?~C9
{->9J
M]V{F
}$^Sx#
#:N5K
&FU"%
Y^5`d\
lCbGO
}VE]6
Kaqat"h
`26j1
}2u@m
su+\O%
~Q]Dg+
Ai]5y
|h"]b
V0^I<V
:H#l)
FO'>a
H-|'z
%3x?A
eUu9V
)Um?h)u/
2H9VPG
c?a7J
o;rFF
%~UY@=
rKm>T
9'%F9
GnHVP
Ue!A@
XIusm
xcP]:[
;;k+xf
s@K=gO
Y5=J[
Y?x@=k
v+yM1
9g:\ q<r
))XDaeT
m;^L;
5T*QB
$O9VP
,/-#H-
:33u4
9qkan
4&H|'
Clg%z
T&oQX>x
2011:06:13 14:55:56
http://ns.adobe.com/xap/1.0/
<?xpacket begin='
' id='W5M0MpCehiHzreSzNTczkc9d'?>
<x:xmpmeta xmlns:x="adobe:ns:meta/"><rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"><rdf:Description rdf:about="uuid:faf5bdd5-ba3d-11da-ad31-d33d75182f1b" xmlns:xmp="http://ns.adobe.com/xap/1.0/"><xmp:CreatorTool>Microsoft Windows Live Photo Gallery 15.4.3508.1109</xmp:CreatorTool></rdf:Description></rdf:RDF></x:xmpmeta>
initialresize Is this the first time the controls are being adjusted?
initialformheight
initialformwidth
repositionlist
resizelist
lnheightdiff
lnwidthdiff
*adjustcontrols call from resize event of a form to adjust the placement and size of contained objects.
*addtoarray
*setsize
*loopthroughcontrols
*reset Resets the Timer control so that it starts counting from 0.
^acontrolstats[1,5]
*setposition
INITIALIZE_AND_ADJUST
ADJUST
INITIALRESIZE
LOOPTHROUGHCONTROLS
oControl.Topb
oControl.Leftb
oControl.Heightb
oControl.Widthb
oControl.FontSizeb
OCONTROL
ACONTROLSTATS
INITIALFORMHEIGHT
INITIALFORMWIDTH
HEIGHT
WIDTH
FONTSIZE
oControl.Widthb
Textbox Spinner
oControl.Heightb
OCONTROL
WIDTH
THISFORM
ACONTROLSTATS
LNWIDTHDIFF
BASECLASS
HEIGHT
LNHEIGHTDIFFa
DECIMALv
INITIALIZE_AND_ADJUST
Pageframe
INITIALIZE_AND_ADJUST
INITIALIZE_AND_ADJUST
Container
INITIALIZE_AND_ADJUST
CTASK
NOLDDECIMAL
PARENT
LOCKSCREEN
CONTROLCOUNT
OCONTROL
CONTROLS
ADDTOARRAY
BASECLASS
RESIZELIST
SETSIZE
REPOSITIONLIST
SETPOSITION
PAGECOUNT
PAGES
COLUMNCOUNT
COLUMNSM
INITIALRESIZE
ACONTROLSTATS
INITIALFORMHEIGHT
THISFORM
HEIGHT
INITIALFORMWIDTH
WIDTH
oControl.Topb
oControl.Leftb
OCONTROL
THISFORM
HEIGHT
ACONTROLSTATS
LNHEIGHTDIFF
WIDTH
LNWIDTHDIFF
LNHEIGHT
LNWIDTH
LNSCREENWIDTH
LNSCREENHEIGHT
LNHEIGHTDIFF
LNWIDTHDIFF
INITIALFORMHEIGHT
THISFORM
HEIGHT
INITIALFORMWIDTH
WIDTH
adjustcontrols,
addtoarray
setsize
loopthroughcontrols
reset>
setposition
PLATFORM
UNIQUEID
TIMESTAMP
CLASS
CLASSLOC
BASECLASS
OBJNAME
PARENT
PROPERTIES
PROTECTED
METHODS
OBJCODE
RESERVED1
RESERVED2
RESERVED3
RESERVED4
RESERVED5
RESERVED6
RESERVED7
RESERVED8
COMMENT Screen
WINDOWS _23Z0JILNU 919554600
WINDOWS _23Z0JILNV1053657263
WINDOWS _23Z0JILNU 919559783
WINDOWS _23Z0JILNU 919565564
WINDOWS _23Z0JILNU 919559783A%
WINDOWS _23Z0JILNU 919559783
WINDOWS _23Z0JILNU 919559783
WINDOWS _23Z0JWMAE 919559783K'
WINDOWS _23Z0JILNU 919559783
WINDOWS _23Z0JWMAF 919559783v
WINDOWS _23Z0JWMAG 919559783;
WINDOWS _23Z0JWMAH 919566908
COMMENT RESERVED
VERSION = 3.00
dataenvironment
dataenvironment
Dataenvironment
YTop = 0
Left = 0
Width = 0
Height = 0
DataSource = .NULL.
Name = "Dataenvironment"
Form1
Height = 213
Width = 372
ShowWindow = 1
DoCreate = .T.
AutoCenter = .T.
Caption = "Importa
o parcial do cen
rio padr
Icon = ..\shared\icons\qpicon.ico
WindowType = 1
Name = "Form1"
PROCEDURE abreficheiros
WAIT WINDOW "Importando informa
o do cen
rio padr
o ..." nowait
*SELECT mapas
select 0
use (p_path+'\contab\'+'M'+p_codemp+RIGHT(ALLTRIM(STR(p_anoproc)),2)+'.DBF') alias mapas1 exclu
select mapas1
pack
use
select 0
use (p_path+'\contab\'+'M'+p_codemp+RIGHT(ALLTRIM(STR(p_anoproc)),2)+'.DBF') alias mapas
select mapas
set order to key_1
ENDPROC
PROCEDURE actualizamodelo
* Verifica se existem ficheiro base de modelos
_FPDBF1=p_path+'\contab\'+'Z00000.DBF'
_FPFPT1=p_path+'\contab\'+'Z00000.FPT'
IF !FILE('&_FPDBF1') or !FILE('&_FPfpt1')
=Messagebox("N
poss
vel actualizar modelos, falta ficheiro base de modelos",0+64,"")
thisform.release
return
ENDIF
* Verifica se existe ficheiro de cen
rios padr
_FPDBF=p_path+'\contab\'+'M00000.DBF'
_FPFPT=p_path+'\contab\'+'M00000.FPT'
IF !FILE('&_FPDBF') or !FILE('&_FPfpt')
=Messagebox("N
poss
vel actualizar modelos, falta ficheiro de cen
rios padr
o ",0+64,"")
THISFORM.RELEASE
return
ENDIF
IF USED("mapas1")
SELECT mapas1
ENDIF
select 0
use (_fpdbf) alias mapas1 exclu
* Abertura do ficheiro de cen
rios padr
o e importa
o do modelo a partir do ficheiro base
DO case
CASE EMPTY(thisform.t_modelo.value) && N
o importa nada
=Messagebox("Nenhum modelo Indicado - Importa
o efectuada",0+64,"")
Return
CASE EMPTY(THISFORM.T_POS.value) AND EMPTY(THISFORM.T_quadro.value) AND EMPTY(thisform.T_PAGINA.value) && Importa todo o modelo
IF messagebox("Tem a certeza que pretende importar O Modelo todo",4+32,"")=7
RETURN
ELSE
delete for mapas1.modelo=ALLTRIM(thisform.t_modelo.Value)
append from (_fpdbf1) for modelo=ALLTRIM(thisform.t_modelo.Value)
ENDIF
CASE EMPTY(THISFORM.T_POS.value) AND EMPTY(THISFORM.T_quadro.value) AND !EMPTY(thisform.T_PAGINA.value) && Importa toda a pagina
IF messagebox("Tem a certeza que pretende importar a p
gina toda",4+32,"")=7
RETURN
ELSE
delete for mapas1.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas1.pagina=Thisform.t_pagina.Value
append from (_fpdbf1) for modelo=ALLTRIM(thisform.t_modelo.Value) AND pagina=Thisform.t_pagina.Value
ENDIF
CASE EMPTY(THISFORM.T_POS.value) AND !EMPTY(THISFORM.T_quadro.value) AND !EMPTY(thisform.T_PAGINA.value)
IF messagebox("Tem a certeza que pretende importar todos os campos do quadro mencionado",4+32,"")=7
RETURN
ELSE
delete for modelo=ALLTRIM(thisform.t_modelo.Value) AND pagina=thisform.t_pagina.Value AND quadro=ALLTRIM(thisform.t_quadro.Value)
append from (_fpdbf1) FOR modelo=ALLTRIM(thisform.t_modelo.Value) AND pagina=thisform.t_pagina.Value AND quadro=ALLTRIM(thisform.t_quadro.Value)
ENDIF
CASE !EMPTY(THISFORM.T_POS.value) AND !EMPTY(THISFORM.T_quadro.value) AND !EMPTY(thisform.T_PAGINA.value)
IF messagebox("Tem a certeza que pretende importar apenas a posi
o do quadro mencionado",4+32,"")=7
RETURN
ELSE
delete for mapas1.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas1.pagina=thisform.t_pagina.Value AND mapas1.quadro=ALLTRIM(thisform.t_quadro.Value) AND mapas1.posicao=thisform.t_pos.value
append from (_fpdbf1) FOR mapas1.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas1.pagina=thisform.t_pagina.Value AND mapas1.quadro=ALLTRIM(thisform.t_quadro.Value) AND mapas1.posicao=thisform.t_pos.value
ENDIF
OTHERWISE
=Messagebox("Prenchimento incoerente dos parametros",0+64,"")
RETURN
ENDCASE
SELECT mapas1
=Messagebox("Actualiza
o concluida",0+64,"")
RETURN
*-----------------------------------
select 0
use (_fpdbf) alias mapas1 exclu
select mapas1
delete for mapas1.modelo=_modelo
pack
append from (_fpdbf1) for modelo=_modelo
return
Wait clear
ENDPROC
PROCEDURE Init
LPARAMETERS _MODELOACTIVO, _FIXAMODELO
PUBLIC p_modeloactivo, P_FIXAMODELO
p_modeloactivo=_modeloactivo
IF PCOUNT()=2
P_FIXAMODELO=.t.
p_fixamodelo=.f.
ENDIF
ENDPROC
PROCEDURE Load
ENDPROC
PROCEDURE Unload
RELEASE p_modeloactivo, p_fixamodelo
ENDPROC
\contab\
M00000.DBF
\contab\
M00000.FPT
IF !FILE('&_FPDBF') or !FILE('&_FPfpt')
poss
vel importar cen
rio padr
o, faltam ficheiros
Nenhum modelo Indicado - Importa
o efectuada
Tem a certeza que pretende importar O Modelo todo
Tem a certeza que pretende importar a p
gina toda
Tem a certeza que pretende importar todos os campos do quadro mencionado
Tem a certeza que pretende importar apenas a posi
o do quadro mencionado
Prenchimento incoerente dos parametros
Importa
o concluida
P_FIXAMODELO
THISFORM
ACTUALIZAMODELO
_FPDBF
P_PATH
_FPFPT
T_MODELO
VALUE
T_POS
T_QUADRO
T_PAGINA
MAPAS
MODELO
ABREFICHEIROS
PAGINA
QUADRO
POSICAO
REFRESH
Click,
VALUE
P_MODELOACTIVO
P_FIXAMODELO
READONLY
Init,
When3
THISFORM
RELEASE
Click,
BArial, 0, 9, 5, 15, 12, 32, 3, 0
Arial, 0, 8, 5, 14, 11, 29, 3, 0
Top = 180
Left = 187
Height = 27
Width = 84
FontSize = 8
Cancel = .F.
Caption = "\<Importar"
TabIndex = 9
Name = "Command2"
Form1
Command2
commandbutton
commandbutton
Form1
t_pos
textbox
textbox
Form1
t_quadro
textbox
textbox
Form1
$*abreficheiros
*actualizamodelo
commandbutton
commandbutton
Command1
Form1
Top = 180
Left = 276
Height = 27
Width = 84
FontSize = 8
Cancel = .T.
Caption = "\<Sair"
TabIndex = 10
Name = "Command1"
.PROCEDURE Click
thisform.Release
ENDPROC
FontSize = 8
Alignment = 3
Value = 0
Format = "r"
Height = 23
InputMask = "9999"
Left = 96
MaxLength = 0
SelectOnEntry = .T.
SpecialEffect = 1
TabIndex = 7
Top = 120
Width = 60
Name = "t_pos"
textbox
textbox
t_modelo
Form1
FontSize = 8
Height = 23
Left = 96
MaxLength = 10
SelectOnEntry = .T.
SpecialEffect = 1
TabIndex = 2
Top = 12
Width = 132
Name = "t_modelo"
PROCEDURE Init
ENDPROC
PROCEDURE When
THIs.Value=p_modeloactivo
IF p_fixamodelo
this.ReadOnly=.t.
ENDIF
ENDPROC
FontSize = 8
Height = 23
Left = 96
MaxLength = 8
SelectOnEntry = .T.
SpecialEffect = 1
TabIndex = 5
Top = 84
Width = 132
Name = "t_quadro"
t_pagina
textbox
textbox
sFontSize = 8
Caption = "Posi
Height = 17
Left = 12
Top = 125
Width = 40
TabIndex = 8
Name = "Label4"
label
label
Label1
Form1
qFontSize = 8
Caption = "Modelo :"
Height = 17
Left = 12
Top = 12
Width = 40
TabIndex = 1
Name = "Label1"
label
label
Label2
Form1
qFontSize = 8
Caption = "P
gina :"
Height = 17
Left = 12
Top = 48
Width = 40
TabIndex = 3
Name = "Label2"
label
label
Label3
Form1
qFontSize = 8
Caption = "Quadro :"
Height = 17
Left = 12
Top = 86
Width = 40
TabIndex = 6
Name = "Label3"
label
label
Label4
Form1
FontSize = 8
Alignment = 3
Value = 0
Format = "r"
Height = 23
InputMask = "99"
Left = 96
MaxLength = 0
SelectOnEntry = .T.
SpecialEffect = 1
TabIndex = 4
Top = 48
Width = 36
Name = "t_pagina"
dPROCEDURE Click
IF p_fixamodelo
thisform.actualizamodelo
RETURN
ENDIF
_FPDBF=p_path+'\contab\'+'M00000.DBF'
_FPFPT=p_path+'\contab\'+'M00000.FPT'
IF !FILE('&_FPDBF') or !FILE('&_FPfpt')
=Messagebox("N
poss
vel importar cen
rio padr
o, faltam ficheiros",0+64,"")
return
ENDIF
DO case
CASE EMPTY(thisform.t_modelo.value) && N
o importa nada
=Messagebox("Nenhum modelo Indicado - Importa
o efectuada",0+64,"")
Return
CASE EMPTY(THISFORM.T_POS.value) AND EMPTY(THISFORM.T_quadro.value) AND EMPTY(thisform.T_PAGINA.value) && Importa todo o modelo
IF messagebox("Tem a certeza que pretende importar O Modelo todo",4+32,"")=7
RETURN
ELSE
delete for mapas.modelo=ALLTRIM(thisform.t_modelo.Value)
use
=abreficheiros()
append from (_fpdbf) for mapas.modelo=ALLTRIM(thisform.t_modelo.Value)
ENDIF
CASE EMPTY(THISFORM.T_POS.value) AND EMPTY(THISFORM.T_quadro.value) AND !EMPTY(thisform.T_PAGINA.value) && Importa toda a pagina
IF messagebox("Tem a certeza que pretende importar a p
gina toda",4+32,"")=7
RETURN
ELSE
delete for mapas.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas.pagina=Thisform.t_pagina.Value
use
thisform.abreficheiros
append from (_fpdbf) for mapas.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas.pagina=Thisform.t_pagina.Value
ENDIF
CASE EMPTY(THISFORM.T_POS.value) AND !EMPTY(THISFORM.T_quadro.value) AND !EMPTY(thisform.T_PAGINA.value)
IF messagebox("Tem a certeza que pretende importar todos os campos do quadro mencionado",4+32,"")=7
RETURN
ELSE
delete for mapas.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas.pagina=thisform.t_pagina.Value AND mapas.quadro=ALLTRIM(thisform.t_quadro.Value)
use
thisform.abreficheiros
append from (_fpdbf) FOR mapas.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas.pagina=thisform.t_pagina.Value AND mapas.quadro=ALLTRIM(thisform.t_quadro.Value)
ENDIF
CASE !EMPTY(THISFORM.T_POS.value) AND !EMPTY(THISFORM.T_quadro.value) AND !EMPTY(thisform.T_PAGINA.value)
IF messagebox("Tem a certeza que pretende importar apenas a posi
o do quadro mencionado",4+32,"")=7
RETURN
ELSE
delete for mapas.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas.pagina=thisform.t_pagina.Value AND mapas.quadro=ALLTRIM(thisform.t_quadro.Value) AND mapas.posicao=thisform.t_pos.value
use
thisform.abreficheiros
append from (_fpdbf) FOR mapas.modelo=ALLTRIM(thisform.t_modelo.Value) AND mapas.pagina=thisform.t_pagina.Value AND mapas.quadro=ALLTRIM(thisform.t_quadro.Value) AND mapas.posicao=thisform.t_pos.value
ENDIF
OTHERWISE
=Messagebox("Prenchimento incoerente dos parametros",0+64,"")
RETURN
ENDCASE
thisform.refresh
wait clear
=Messagebox("Importa
o concluida",0+64,"")
return
ENDPROC
Importando informa
o do cen
rio padr
o ...
\contab\
\contab\
key_1
P_PATH
P_CODEMP
P_ANOPROC
MAPAS1
MAPAS
KEY_1w
\contab\
Z00000.DBF
\contab\
Z00000.FPT
IF !FILE('&_FPDBF1') or !FILE('&_FPfpt1')
poss
vel actualizar modelos, falta ficheiro base de modelos
\contab\
M00000.DBF
\contab\
M00000.FPT
IF !FILE('&_FPDBF') or !FILE('&_FPfpt')
poss
vel actualizar modelos, falta ficheiro de cen
rios padr
mapas1
Nenhum modelo Indicado - Importa
o efectuada
Tem a certeza que pretende importar O Modelo todo
Tem a certeza que pretende importar a p
gina toda
Tem a certeza que pretende importar todos os campos do quadro mencionado
This menu can only be called from a Top-Level form. Ensure that your form's ShowWindow property is set to 2. Read the header section of the menu's MPR file for more details.
m.getMenuNameb
m.lUniquePopupsb
anexos
Rosto
ALT+R
Anexos
ALT+A
Ficheiro XML
ALT+F
Captura Imagem
ALT+C
DO _3ay0l2zeh IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
DO _3ay0l2zei IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
do prtscreen
A - Elementos contabilisticos e Fiscais (IRC)
I - Elementos Contabilisticos e Fiscais (IRS)
L - Elementos Contabilisticos e Fiscais (IVA)
O - Recapitulativo de Clientes
P - Recapitulativo de Fornecedores
Q - Imposto de Selo
R - IE Estabelecimentos
DO _3ay0l2zej IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
DO _3ay0l2zek IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
DO _3ay0l2zel IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
DO _3ay0l2zem IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
DO _3ay0l2zen IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
DO _3ay0l2zeo IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
DO _3ay0l2zep IN LOCFILE("CONTABILIDADE_8.0\IESMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is IESMENU?")
where l_mes <> 0 and (between(l_contad, lccontaini, lccontafim) or between(l_contac, lccontaini, lccontafim)) order by 15, 1, 2 into cursor csint_mov
do INCLUDE_YEARS_aux_err with error(), lcfile, lcalias
\contab\L
qpfileC
do errodesc in \projectos\gdg2000\shared\prg\erros with error(), message( ), message(1), program( ), lineno( )
qpfileC
union all
&sqlselect
qpfileC
select l_mes as l_mes, l_dia as l_dia, l_diario as l_diario, l_docu as l_docu, l_linha as l_linha, l_contad as l_conta, l_desc as l_desc, l_valor as l_valor, "D" as l_dc, l_mapar as l_mapar, l_tmapar as l_tmapar, l_nif as l_nif, l_ano as l_ano from csint_mov where include_years_aux(l_dia, l_mes, l_ano, lddataini, lddatafim) and between(l_contad, lccontaini, lccontafim) union all select l_mes as l_mes, l_dia as l_dia, l_diario as l_diario, l_docu as l_docu, l_linha as l_linha, l_contac as l_conta, l_desc as l_desc, l_valor as l_valor, "C" as l_dc, l_mapar as l_mapar, l_tmapar as l_tmapar, l_nif as l_nif, l_ano as l_ano from csint_mov where include_years_aux(l_dia, l_mes, l_ano, lddataini, lddatafim) and between(l_contac, lccontaini, lccontafim) order by 6, 12, 1, 2 into cursor &lccursor_final
_DATAINI
_DATAFIM
_CONTAINI
_CONTAFIM
_CURSOR
PRVUSE
LDDATAINI
LDDATAFIM
LBRETORNO
LAANOS
LNTOTANOS
LNIND
LNCONT
LCCONTAINI
LCCONTAFIM
LCFILE
LCALIAS
LCCURSOR_FINAL
SQLWHERE
SQLFIXO1
SQLFIXO2
SQLFIXO3
SQLSELECT
P_PATH
P_CODEMP
CSINT_MOVy
_DATAINI
_DATAFIM
LBRETORNO9
_ERRO
_FILE
_ALIAS
_DESC
LCDOC4
_DESC
_ANOREF
LCPRAZO
LNPRAZO
LDVENCIMENTO
LCDATADOC
LDDOC2
FUNCAO
FUNCAO_1
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
funci
movim
estab
proce
comuns\sconce.dbf
clfuncionarios
clmovimentos
clestabelecimentos
clprocessamentos
clconcelhos
Obtendo informa
o de Gest
o de Pessoal...
clfuncionariosQ
clmovimentosQ
clestabelecimentosQ
clprocessamentosQ
clconcelhosQ
LCPATH
LCFILE_FUNC
LCFILE_MOVI
LCFILE_CONCE
LCFILE_ESTA
LCFILE_PROC
LCCURSOR
LCOUTCURSOR
MENSAGEM
PATHDADOS
ENTIDADE
LCFILE_CONC
CLFUNCIONARIOS
CLMOVIMENTOS
CLESTABELECIMENTOS
CLPROCESSAMENTOS
CLCONCELHOS
XDISTR
XCONCE
C_CONCELHO
VALOR
XFUNC
XESTAB
XPROC
XABONO
DATA
EXERCICIO
COD_DGCI
OBJ_CODIGO
OBJ_CONCELHO
OBJ_VALOR
NRLINHAS
NCURSOR
ESTADOD
FUNCAO
ESTADO
NCURSOR
_VALTOTRANSF
_SIGN
TEMPFIELD
DEFFIELD
_VALTOTRANSF
_SIGN
TEMPFIELD
DEFFIELD
key_1
CONTAD
CONTAC
LANCANIF
_VELHOAL
PLANO
KEY_1
_LINHA^
plano
key_1
pariva
key_1
plano
key_1
plano
key_1
pariva
key_1
_CONTA
W_CONTA
WCONTA
PLANO
PARIVA
CAMPO
CONTA_IVA
CONTA
@R 9999999999.99_6
@R 9999999999.99_6
_MODELO
_QUADRO
LCMODELO
LCQUADRO
LNRET
LCTRAB
MAPAS
MODELO
QUADRO
LCVALOR
CARACTER
NUMERO
TEXTO
LARG_TEXTO
VALOR
DATA
_INDEX
paises
key_3
_PREFIXO
AREA_ACTUAL
PDESC
PAISES
Temmov,
SALDO
ACDEB
ACCRDI
vchaver
repartD
D_ACUZ
C_ACU
exercicio
cmesw
ulmes
uldiar
CHK_VAL4
calcform
abre_n1_n2
SOMARb&
SOMA_AUX\'
transporte{)
inisaldo
ctexist
CONTADESCz,
EDDATA
EXISTE_ANO_MEMO{3
INCLUDE_YEARS
INCLUDE_YEARS_aux4>
INCLUDE_YEARS_aux_err
READ_DOC5?
READ_DATA
EXECUTAR
FUNCAO_1
DESTROY
transval
transval1
plano_nif
resetlinha<L
vecampodecXL
VERIF_QUADRO
atindex{R
encontrapais
ENTIDADE
EXERCICIO
NCURSOR
PATHDADOS
FUNCAO
NRLINHAS
ESTADO
MENSAGEM
GETSAL_O
CUSTOMnV
PRINTER
O, Rever fun
o IMPRESSORAC
Esta fun
o deveria estar desactivada
Anotar as circunst
ncias que fizeram aparecer esta mensagem
_OLDPRINTER
CONFIG
APPEND FROM &_FILE TYPE SDF
ERROR
_ERRMSG=MESSAGE()
&_COMANDO
Erro carregando
Linha:
Mensagem:
ON ERROR &OLD_ERROR
_FILE
_DESC
_COMANDO
OLD_ERROR
_ERRLIN
_ERRMSG
CONFIG
DESCO
__MODEb
Tabela em uso. <ENTER> para tentar de novo ou <ESC> para desistir.
__MODE
MEMOWIDTHv
MEMOWIDTHv
_MEMO
_LINHA
_WIDTH
_OFFSET
_PARAMETERS
OLD_WIDTH
_CONTEUDO
ESCAPEv
SET ESCAPE &SET_ESCAPE
TECLA
SET_ESCAPE.
Error number: CC
Error message:
Line of code with error:
Line number of error: CC
Program with error:
MERROR
MESS1
MPROG
MLINENO
ERRON
_JANELA
PROCS & FUNCS EXECUTADOS ATE AO MOMENTO
_NIVEL
SHOW_PATH
SRC;PRG
Selecione o ficheiro a analizar:
Abrir
PRINT
AGUARDE UM MOMENTO...
APPEND FROM &_FILE TYPE SDF
PROCS.TXT
Analizando o ficheiro:
FUNCTION
PROCEDURE
STATIC FUNCTION
STATIC PROCEDURE
Foi criado/actualizado o ficheiro PROCS.TXT
Ficheiro nao encontrado:
_FILE
_VERBOSE
_STAT
OLD_PRINT
PROCS
EOF()
Deseja deseja interromper a operacao ?
Prima ESC para interromperC
(CCCN
SHOW_IT
STOP_IT
L_ON_G
SIM_NAOZ
_VALUE
_MASK
Inicializando o atalho...
&PROC
Finalizando o atalho...
_NFICS
PUSH_ALL
POP_ALLF
_TIMESr
NOTIFYv
_MODE
PSHALL_PTRb
RELATIONv
SKIPv
NFICS
CUR_AREA
PSHALL_AREA
PSHALL_REG
PSHALL_ORD
PSHALL_FIL
PSHALL_REL
PSHALL_SKP
PSHALL_TAR
PSHALL_PTR
SET FILTER TO &pshall_fil[pshall_ptr-n]
SET RELATION TO &pshall_rel[pshall_ptr-n]
SET SKIP TO &pshall_skp[pshall_ptr-n]
NFICS
PSHALL_PTR
PSHALL_AREA
PSHALL_ORD
PSHALL_FIL
PSHALL_REL
PSHALL_SKP
PSHALL_REG
Editando
Visualizando6
<F2> imprime
<F9> grava e sai
<ESC> sai
DEFINE WINDOW &WIN_NAME1 FROM INT((SROW()-_HEIGHT)/2),INT((SCOL()-_WIDTH)/2) TO INT((SROW()-_HEIGHT)/2)+(_HEIGHT-1),INT((SCOL()-_WIDTH)/2)+(_WIDTH-1) TITLE _TITLE FOOTER _FOOTER FLOAT DOUBLE SHADOW GROW ZOOM COLOR SCHEME 5
ESCAPE
ESCAPE
KEYBOARD "{CTRL+Q}Y"
KEYBOARD "{CTRL+W}"
KEYBOARD "{CTRL+W}P"
MODI COMM &_FILE WINDOW &WIN_NAME1
MODI COMM &_FILE NOEDIT WINDOW &WIN_NAME1
ON KEY LABEL F2 &OLD_F2
ON KEY LABEL F9 &OLD_F9
ON KEY LABEL ESCAPE &OLD_ESC
RELEASE WINDOW &WIN_NAME1
_FILE
_EDIT
_PRINT
_HEIGHT
_WIDTH
_TITLE
_PARAMETERS
WIN_NAME1
ON_ESC
ON_F2
ON_F9
_TECLA
_FOOTER
OLD_F9
OLD_ESC
ESCAPE
OLD_F2
PRINT_ASCII
CONSOLEv
TYPE &_FILE TO PRINTER
SET CONSOLE &OLD_CONSOLE
Ficheiro nao encontrado [
_FILE
IMPRESSORA
OLD_CONSOLE
_MODU
_PROGJ
COMANDO
INDIQUE O COMANDO
&_COMMAND
_COMMAND
COMANDO
_____TECLA
_TIPO
_NULLVAR
\<Sim;\!\<Nao
Continuar ?
<ESC> - cancela
@*HT
_OPCAO
_TITLE
_OPCOES
W_WIN
W_TIT
W_MSG
W_BUT
N_OPCOES
W_MAX
_QQI0KPZKH
<ESC> - cancela
_TITLE
_WIDTH
_PICT
WIN_WIDTH
_QQI0NIYTE
Anula o registo
@*HT \!\<Nao;\<Sim
Confirma a anulacao ?
_OPCDEL
_WIDTH
_QQI0KPZKH
PASSNUM
A_LEN
B_LEN
JPNUM
A_LEND
_EXPR
_ALIAS
_ORDER
_STAT
OLD_ORDER#
_DATA
FDOM!
_DATA
_DATA!
_DATA
_FILE
_HANDLER
_SIZE
_STRING
_FILE
_STRING
_STAT
_HANDLER
_SIZE
DELETEv
SET DELETE &OLD_DELET
DEL_TAG
OLD_ORDER
OLD_DELET
TMP_ARRAY0
1234567890.,+-:X
STR_VAL
_ALLOWED
_STAT
_BITMAP
ORIENTATION=1
ORIENTATION=1
round((
999.9999999999_
replace picture with '"'+&_expmasc+'"'
REPORT_NAME
_FONT
_SIZE
_USED
_TMPFILE
_PARAMETERS
EJECTAFTER
FONTFACE
P_FONT
FONTSIZE
P_SIZE
_OLDPMOEDA
P_MOEDA
COMMENT
P_MOEDAOUT
_EXPMASC
_TMPFILE
STATk
MEMOWIDTHv
_WIDTH
OLD_WIDTH
CREATE CURSOR &_ALIAS (TIPO C(1), NOME C(64))
_PATH
EXTENSOES
_ALIAS
ACTUAL
EXTENSAO
DATEv
BRITISH
CENTURYv
STR_DATA
OLD_DATE
BRITISHp
STRING
SPACES
Ficheiro Inv
lido.
FICHEIRO
HANDLER
PRIMA <ESC> PARA RECOME
SYSMENUv
SET SYSMENU &MENU_STAT
MENU_STAT
MENSAGEM
TMP_WIN
_EXPR
_ALIAS
_EXPR
_ALIAS
_TYPE=TYPE("&FIELD")
CCC$*>
FIELD
_TYPE
IF TYPE("&CONDITION")<>"L"
FILTERv
SET FILTER TO &CONDITION
<ENTER> para escolher
<ESC> para sair
DESCRI
O A PROCURAR
enter
DO aux_tab
enter
SET FILTER TO &old_filt
_AREA
TAG_1
TAG_2
FIELD_1
FIELD_2
__MODE
CONDITION
_VARREAD
_CAMPO
_WIDTH
WIDTH_1
WIDTH_2
OLD_FILT
F_SIZE
GET_TAB1
IS_TAG
GET_TAB2
ENTER
CODIGO
DESCRICAO8
&_varread=EVALUATE(field_1)
{CTRL+Q}
STR_1
STR_2
PERCENT
CONT_1
CONT_2
WORD_1
WORD_2
Aguarde um momento...
DO aux_calc
DEFINE WINDOW calculadora FROM INT((srow()-20)/2),INT((scol()-53)/2) TO INT((srow()-20)/2)+19,INT((scol()-53)/2)+52 FOOTER "<ESC> para sair"+IIF(TYPE("&_VARREAD")="N"," <F10> retornar valor","") TITLE "CALCULADORA" FLOAT CLOSE GROW SHADOW COLOR SCHEME 1
IF TYPE("&_VALUE")="N" .OR. LASTKEY()=27
Express
o invalida!
_CALCVALUE=&_value
_VARREAD
CALCULADORA
_VALUE
IF TYPE("&_VARREAD")="N"
&_varread=_CALCVALUE
{ESC}
KEYBOARDb
IF TYPE('&C') <> 'C'
Erro na linha C
. Express
o inv
lida
Erro na linha C
. Delimitadores trocados
Erro na linha C
. Delimitador direito n
o encontrado
Erro na linha C
. Delimitador esquerdo n
o encontrado
{CTRL+HOME}C
{DNARROW}
{RIGHTARROW}
KEYBOARD
LINHA
N_LINHAS
@L 99_
@L 9999_
MTOEc
OLD_ALIASI
_ARRAY
_ITEM
Quatro
Cinco
Treze
Quatorze
Quinze
Dezasseis
Dezassete
Dezoito
Dezanove
Vinte
Trinta
Quarenta
Cinquenta
Sessenta
Setenta
Oitenta
Noventa
Cento
Duzentos
Trezentos
Quatrocentos
Quinhentos
Seiscentos
Setecentos
Oitocentos
Novecentos
Euros
Centimo
Centimos
_VALOR
_NUMERO
_TEXT
_VALOR1
NTOE_AUX
_NUMERO
_TEXT
STACK_PTRb
RELATIONv
SKIPv
stack esgotado em FUNCS.PRG
_TARGET
_PARAMETERS
STACK_AREA
STACK_REG
STACK_ORD
STACK_FIL
STACK_REL
STACK_SKP
STACK_TAR
STACK_PTR
STACK_T1
STACK_T2
STACK_T
SET FILTER TO &stack_fil[stack_ptr]
SET RELATION TO &stack_rel[stack_ptr]
SET SKIP TO &stack_skp[stack_ptr]
AREA
STACK_PTR
STACK_AREA
STACK_REG
STACK_FIL
STACK_REL
STACK_SKP
STACK_ORD
STACK_TAR
STACK_T
STACK_T2
STACK_T1
Janeiro
Fevereiro
o
Abril
Maio
Junho
Julho
Agosto
Setembro
Outubro
Novembro
Dezembro
Regulariza
Apuramento
Encerramento
Abertura
INVALIDO6
_INIMES
T_MES2
ROMANO_0b
NUMERO
ROMANO_0
ROMANO_1
ROMANO_2&
VALUE
MASKo
Verifique a impressora e prima ENTER para imprimir ou ESC para desistir
Verifique a impressora e prima ENTER para imprimir ou ESC para desistir
Impress
o em curso...
Impress
o cancelada.
SWITCH_ON
SUCESSO/
_LASTERRORb
Acesso a ficheiro negado [C
proc [
line [CC
_ERROR
_PROC
_LINE
_PARAMETERS
_LASTERROR
_LASTERRORb
MODEb
ALIASb
Ficheiro em uso [
] <ENTER> - tenta de novo <ESC> - desiste.
o foi possivel abrir o ficheiro [
ALIAS
_LASTERROR(
__MODEb
*Registo em uso. <ENTER> para tentar de novo ou <ESC> para desistir.
__MODE
STAT6
_mensagemb
_mensagemb
_mensagemb
..\shared\forms\frmlock
_MENSAGEM
_CMDTENTAR
_CMDDESISTIR
LBSTAT
LBQUIET
LCMENSAGEM
LCCMDTENTAR
LCCMDDESISTIR
LNPARAMETERS
PRT_RESULTl
STRING
Prima
ENTER
para anular este registo ou
para desistir.
DEL_MSG
mvarb
mvarb
ERROR in data type. Cannot be encrypted.
WIDTH
DECIMALS
OUTVAR
CHCOUNT
MTYPE
OUTVAR
CHCOUNT
WIDTH
DECIMALS|
DECODE_STR\
PROG_ID
DEMO_MODE
ID_SERIAL
ID_VERSAO
ID_AGENTE
VERSAO97
SERIAL97
AGENTE97
BASES_ABERTAS
_NAME
_ALIAS
CUR_ALIAS
_CAMPOS
N_CAMPOS
_ROWS
_RESULTADO3
CREATE DBF &_TEMP FROM ARRAY _CAMPOS
_NAME
_TYPE
_ALIAS
CUR_ALIAS
_CAMPOS
N_CAMPOS
_TEMP
OLD_PATH
NEW_PATH
_ROWS
_COLS
COPYINDEX
_FIELD
_ALIAS
_CAMPOS
N_CAMPOS
_RESULTADO
CUR_ALIAS
_NAME
_TYPE
_ALIAS
CUR_ALIAS
_CAMPOS
N_CAMPOS
_TEMP
OLD_PATH
NEW_PATH
_ROWS
_COLS
TEMP
COPYINDEX
INDEX ON &_KEY TAG &_TAG
_SOURCE
_DEST
SOURCE
KEY_1
RESTRI
KEY_1
_OPCMENU
_IDUTIL
OLD_ALIAS
RESTRI
KEY_1
Contribuinte
Numero de C
errado! Aceita?
CHECK_DIGIT
LCDESC
LCMENS
LNIND
_OPCAO
CHECK_DIGIT
FIELD_1
THISFORMSET
RELEASE
DO errostab in \PROJECTOS\gdg2000\SHARED\PRG\ERROS WITH ERROR( ), MESSAGE( ), _modulo, _tabnome, _tabalias, _tabdesc, _ID
\PROJECTOS\GDG2000\SHARED\PRG\ARRAYSP
MOD_C
\PROJECTOS\GDG2000\SHARED\PRG\ARRAYSP
C_TABELAS
MOD_U
\PROJECTOS\GDG2000\SHARED\PRG\ARRAYSP
U_TABELAS
MOD_E
\PROJECTOS\GDG2000\SHARED\PRG\ARRAYSP
E_TABELAS
MOD_I
\PROJECTOS\GDG2000\SHARED\PRG\ARRAYSP
I_TABELAS
MOD_S
\PROJECTOS\GDG2000\SHARED\PRG\ARRAYSP
S_TABELAS
\Comuns\sabono.dbf
\pessoa\funci
\pessoa\indep
\pessoa\local
\pessoa\proce
\pessoa\movim
\pessoa\estab
\pessoa\segur
\pessoa\feria
\pessoa\recol
\pessoa\cadas
\pessoa\autom
\pessoa\custo
\pessoa\infop
MOD_A
\PROJECTOS\GDG2000\SHARED\PRG\ARRAYSP
A_TABELAS
FOR _ID=1 TO ALEN(&_TABARRAY)
_TABDESC=TABELAS(&_TABARRAY(_ID),1)
_TABNOME=TABELAS(&_TABARRAY(_ID),2)
_TABALIAS=TABELAS(&_TABARRAY(_ID),3)
_TABINDEX=TABELAS(&_TABARRAY(_ID),4)
do form \projectos\gdg2000\shared\forms\frmrec with _tabnome, _tabdesc, _tabalias, &_TABARRAY(_ID)
select idutil from restri where imo = 1 and opcmenu = lcemp into cursor cs_contagem_autorizacoes
&lccommand
cs_contagem_autorizacoesN
key_1
select idutil from restri where cnt = 1 and opcmenu = lcemp into cursor cs_contagem_autorizacoes
&lccommand
cs_contagem_autorizacoesN
key_1
select idutil from restri where sal = 1 and opcmenu = lcemp into cursor cs_contagem_autorizacoes
&lccommand
cs_contagem_autorizacoesN
key_1
_IDUTIL
_LOGIN
_MODULO
LCIDUTIL
LCLOGIN
LCMODULO
LCEMP
LCCOMMAND
LNTOTAL
LBRET
CS_CONTAGEM_AUTORIZACOES
RESTRI
KEY_1
fBusca1.cmdProcurar.click,
fbuscaA.cmdProcurar.click}
CONSTROI
UNLOAD
DESTROY
redim
SEPARA
nrfields
medleft+
DESTROY>
cmdEsc.clickh
cmdIns.click
cmdEnter.click
cmdDel.click}
cmdF2.click_
cmdOrdem.click
cmdBusca1.click
cmdBuscaA.click
cmdInicio.clickI
cmdFim.click
ACTIVATE
DEACTIVATE
cmdCancela.click%
RESIZEQ
ACTIVATE
SHOWy
DEACTIVATE
cmdCancela.click
tform.resize
tform.salta
tform.cmdEnter.click
tform.grid1.afterrowcolchange"*
SHOWE+
tform.resizeR.
tform.salta
tform.cmdEnter.click!/
tform.cmdF2.clickT5
tform.grid1.afterrowcolchange
CHOOSE69
cmdadicionar.click
cmdsubstituir.click":
cmdcancelar.click{:
CLICK
DESTROY
ACTIVATE
DEACTIVATEs=
COMMAND1.CLICK
COMMAND2.CLICKx>
DESTROY
activate
DEACTIVATE
COMMAND1.CLICK
CMDTUDO.CLICK
CMDNADA.CLICK
KEYPRESS
dblclick
VALID
COLUMN1.header1.refresh
caption_access9D
caption_assigndD
forecolor_access
forecolor_assign
fontitalic_access
fontitalic_assignCE
fontbold_access
fontbold_assign
fontsize_access
fontsize_assign!F
fontname_accesscF
fontname_assign
interval_access
interval_assign
startAG
stopoG
alignment_access
alignment_assign
timer.Timer[H
DESTROYSI
INSERT_TAG
SAVE_FILE
SAVEFILENOW3K
PARSE
GET_VALOR
DESTROY
WINDOW_CONFIG
DOWNLOAD_FILE
ADD_FILErS
DOWNLOAD_ALL_FILES*T
CLEAR_FILES{T
DESTROY`U
ACESSO_ENTID_NEGADO
CALIAS
CFILTRO
CORDEM1
CORDEMA
CKEY1ALFA
CKEYAALFA
CFORM
CFRMPRINT
CFIELDS
CTITULO
CREPORT
CMODE
VCHAVE
NALTURA
BCONSULTA
LENTER
OLD_ALIAS
OLD_ORDER
OLD_FILTER
OLD_WIDTH
LNLEFT
TFORM
FORM1
FPRINT
FORMPRINT
FBUSCA1
FORMFIND1
FBUSCAA
FORMFINDAo
\projectos\gdg2000\shared\icons\gdg2000.ico
ESC-Sair
\projectos\gdg2000\shared\icons\close.bmp
INS-Novo
\projectos\gdg2000\shared\Icons\new.bmp
ENTER-Editar
\projectos\gdg2000\shared\Icons\wzedit.bmp
DEL-Eliminar
\projectos\gdg2000\shared\Icons\delete.bmp
F2-Imprimir
\projectos\gdg2000\shared\icons\print.bmp
\projectos\gdg2000\shared\Icons\vtop.bmp
\projectos\gdg2000\shared\Icons\vbottom.bmp
\projectos\gdg2000\shared\icons\sortup.bmp
\projectos\gdg2000\shared\Icons\locateA.bmp
\projectos\gdg2000\shared\Icons\locate1.bmp
GRID1
MGRID
HIGHLIGHTSTYLE
CMDESC
MBUTTONL
CAPTION
PICTURE
CMDINS
CMDENTER
CMDDEL
CMDF2
CMDINICIO
MBUTTONS
CMDFIM
CMDORDEM
MBUTTONM
CMDBUSCAA
CMDBUSCA1
CMINWIDTH
WIDTH
\projectos\gdg2000\shared\icons\gdg2000.ico
Impress
Imprimir
Visualizar
Cancelar
Desde o codigo
ao codigo
HEIGHT
WIDTH
CAPTION
WINDOWTYPE
LBLDE
MLABEL
LBLATE
TXTDE
MTEXTBOX
TXTATE
CMDIMPRIME
MBUTTONO
CMDVISUALIZA
CMDCANCELA
LEFT#
Valor a procurar
LBLPROCURAR
CAPTION
\projectos\gdg2000\shared\icons\gdg2000.ico
Procura
Texto a procurar
HEIGHT
WIDTH
CAPTION
WINDOWTYPE
CONTROLBOX
LBLPROCURAR
MLABEL
TXTFIND
MTEXTBOX
CMDPROCURAR
MBUTTONO
CMDCANCELAq
key_1
key_2
CKEY1ALFA
CORDEM1
CORDEMA
key_1
key_2
CKEY1ALFA
CORDEM1
CORDEMA
CANO
LNANONOVO
\projectos\gdg2000\shared\icons\gdg2000.ico
\PROJECTOS\GDG2000\SHARED\Icons\jitalert.gif
O ficheiro indicado j
existe!!
\<Adicionar
\<Substituir
\<Cancelar
HEIGHT
WIDTH
WINDOWTYPE
CAPTION
CONTROLBOX
CADICIONAR
LNSEPARACAO
IMAGE1
MIMAGE
PICTURE
LABEL1
MLABEL
FONTSIZE
AUTOSIZE
FORECOLOR
CMDADICIONAR
MBUTTONO
CMDSUBSTITUIR
CMDCANCELARO
HEIGHT
WIDTH
FONTBOLD
FONTSIZE
CAPTION6
\<Aceitar
\<Cancelar
HEIGHT
WIDTH
CONTROLBOX
CAPTION
WINDOWTYPE
CALIAS
CCOLUNA1
CCOLUNA2
CTIPOVARIAVEL
MYCURSOR
COMMAND1
MBUTTONO
FONTSIZE
COMMAND2
CANCEL
GRID1
MGRID
ROWHEIGHT
SCROLLBARS
COLUMNCOUNT
Entidades
\<Continuar
HEIGHT
WIDTH
CONTROLBOX
CAPTION
WINDOWTYPE
KEYPREVIEW
CCURSOR
COMMAND1
MBUTTONO
FONTSIZE
CMDTUDO
CMDNADA
GRID1
MGRID
ROWHEIGHT
SCROLLBARS
COLUMNCOUNT
READONLY
WIDTH
HEIGHT
VISIBLE
COLUMNCOUNT
GRIDLINECOLOR
READONLY
ALLOWHEADERSIZING
ALLOWROWSIZING
DELETEMARK
FONTSIZE
ROWHEIGHT5
HEIGHT
WIDTH
FONTBOLD
FONTSIZE5
HEIGHT
WIDTH
FONTBOLD
FONTSIZE5
HEIGHT
WIDTH
FONTBOLD
FONTSIZE5
HEIGHT
WIDTH
FONTBOLD
FONTSIZE9
HEIGHT
WIDTH
WINDOWTYPE
FONTSIZE
AUTOSIZE
FONTSIZE
FONTSIZE4
MARGIN
SPECIALEFFECT
FONTSIZE
FONTSIZE'
INPUTMASK
AUTOSIZE
FONTSIZE
VISIBLE
GRIDLINECOLOR
ALLOWHEADERSIZING
ALLOWROWSIZING
DELETEMARK
HEIGHT
WIDTH
FONTSIZE
ROWHEIGHT
SCROLLBARS
COLUMNCOUNT
READONLY$
runline
Arial
Label1
Timer
WIDTH
HEIGHT
BACKSTYLE
BORDERWIDTH
CAPTION
FONTITALIC
FONTBOLD
FONTSIZE
FONTNAME
INTERVAL
ALIGNMENT
LABEL
AUTOSIZE
TIMER
CNIVEL
CCURSOR
CFILENAME
OLD_ALIAS
LCSTRING
OSERVIDOR
OFILE
OPATHDESTINO
OJANELASIMPLES
OTITULO
OLABEL
ODESCRICAO,
OLIGADO
CUSTOM
FORM1
MFORM
FORMPRINT
MFORM
FORMFIND1
FORMFINDAwo
FORMFINDA
MFORM
MTABIN
MTAB=q
MTABIN_EXERCICIOS
MTABIN
FRMSUBS
MFORM
BUTTONEX
MBUTTONS
FRMTABELA
MFORM
FRMENTID
MFORM(z
MGRID
GRID~}
MBUTTONL
COMMANDBUTTON
MBUTTONM
COMMANDBUTTON
MBUTTONS
COMMANDBUTTONr
MBUTTONO
COMMANDBUTTON
MFORM
FORM*
MLABEL
LABEL
MTEXTBOX
TEXTBOX
MTEXTDBL
TEXTBOX
MCOMBOCONT
COMBOBOX6
MTEXTENTRADA
TEXTBOXT
MIMAGE
IMAGE
MCHECKBOX
CHECKBOX
MGRID2
runline
container$
CREATE_XML
CUSTOM
GET_FILE_FTP
CUSTOM
TEST_CONNECTION
CUSTOM
FUNCAO
FUNCAO_1
FUNCAO_2
FUNCAO_3
FUNCAO_4
FUNCAO_5
FUNCAO_6
FUNCAO_7
FUNCAO_8
FUNCAO_9
FUNCAO_10
FUNCAO_12.
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
funci
movim
estab
proce
comuns\sconce.dbf
clfuncionarios
clmovimentos
clestabelecimentos
clprocessamentos
clconcelhos
Obtendo informa
o de Gest
o de Pessoal...
clfuncionariosQ
clmovimentosQ
clestabelecimentosQ
clprocessamentosQ
clconcelhosQ
LCPATH
LCFILE_FUNC
LCFILE_MOVI
LCFILE_CONCE
LCFILE_ESTA
LCFILE_PROC
LCCURSOR
LCOUTCURSOR
MENSAGEM
PATHDADOS
ENTIDADE
LCFILE_CONC
CLFUNCIONARIOS
CLMOVIMENTOS
CLESTABELECIMENTOS
CLPROCESSAMENTOS
CLCONCELHOS
XDISTR
XCONCE
C_CONCELHO
VALOR
XFUNC
XESTAB
XPROC
XABONO
DATA
EXERCICIO
COD_DGCI
OBJ_CODIGO
OBJ_CONCELHO
OBJ_VALOR
NRLINHAS
NCURSOR
ESTADO
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
funci
movim
indep
proce
clfuncionarios
clmovimentos
clindependentes
clprocessamentos
Obtendo informa
o de Gest
o de Pessoal (Anexo J)...
clindependentes
clfuncionarios
CCCCC
clmovimentosQ
clprocessamentosQ
cs_retencoes_1
clmovimentosQ
clprocessamentosQ
cs_retencoes_2
cs_retencoes_2
cs_retencoes_1
LCPATH
LCFILE_FUNC
LCFILE_MOVI
LCFILE_INDP
LCFILE_PROC
LCCURSOR
LCCURSOR2
LCOUTCURSOR
MENSAGEM
PATHDADOS
ENTIDADE
CLFUNCIONARIOS
CLMOVIMENTOS
CLINDEPENDENTES
CLPROCESSAMENTOS
TABELAIRS
NRESID
LATIPO
ANO_REPORTE
TIPO_REND2
XABONO
TPABONO
XPROC
TIPO_REND
VAL_RETIDO
VALOR
RETIDO
VAL_SUJEITO
DESCONT
TOTAL
ALTERA
XFUNC
EXERCICIO
CS_RETENCOES_1
VUNIT
CS_RETENCOES_2
NRLINHAS
NCURSOR
ESTADO
empresa
key_1
1.01.00
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
funci
movim
estab
proce
infop
custo
comuns\scontab.dbf
funci
movim
estab
tproc
custo
infop
contab
Obtendo informa
o de Gest
o de Pessoal...
LCPATH
LCFILE_FUNC
LCFILE_MOVI
LCFILE_ESTA
LCFILE_PROC
LCFILE_CONT
LCFILE_INFO
LCFILE_CTRO
LCOUTCURSOR
LBVERSAO_SALARIOS_OLD
XSEEK
P_CODEMP
EMPRESA
VRSAL
MENSAGEM
PATHDADOS
ENTIDADE
FUNCI
MOVIM
ESTAB
TPROC
CUSTO
INFOP
CONTAB
SELECT_MOV_OLD
SELECT_MOV
NRLINHAS
P_TPABONO
NCURSOR
ESTADO
empresa
key_1
1.01.00
LCOUTCURSOR
LBVERSAO_SALARIOS_OLD
XSEEK
P_CODEMP
EMPRESA
VRSAL
SELECT_MOV_OLD
SELECT_MOV
NRLINHAS
NCURSOR-
_ABONO
_TIPOABONO
_PROC
LNABONO
LNTIPOABONO
LNPROC
LNRET
_PROC
_ABONO
LBRET
LNPROC
LNABONO
_PROC
_ABONO
_DESCONT
LBRET
LNPROC
LNABONO
LNDESCONT
CHK_DESCONTOQ
_CODIFICADO
_DESCONTO
LNCODIFICADO
LCDESCONTO
LNTRAB
LBRESULT
LNIND
LACALCULO
LNOUTROS
LNGENERO
LNSEGURO
LNSINDICATO
LNIRS
LNTSU
LNADSE
LNCGA
LNGENEROS
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
proce
movim
funci
indep
tproc
movim
funci
indep
Obtendo informa
o de Gest
o de Pessoal...
LCPATH
LCFILE_PROC
LCFILE_MOVI
LCOUTCURSOR
MENSAGEM
PATHDADOS
ENTIDADE
LCFILE_FUNC
LCFILE_INDP
TPROC
MOVIM
FUNCI
INDEP
SELECT_RETENCOES
NRLINHAS
P_TPABONO
NCURSOR
ESTADOW
LCOUTCURSOR
SELECT_RETENCOES
NRLINHAS
NCURSORu
funci
indep
cs_pessoas
movimQ
tprocQ
cs_pessoasQ
_CURSOR
LDDATA_INI
LDDATA_FIM
LDDATA
LCCURSOR
THIS
EXERCICIO
NRESID
INDEP
TABELAIRS
FUNCI
CS_PESSOAS
CZONAG
TIPO_REND_41
XABONO
TPABONO
XPROC
CRUBRI
VALOR
MONTLN
MOVIM
TPROC
XFUNC
DATA
FALTA_AFC
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
proce
tproc
Obtendo informa
o de Gest
o de Pessoal...
C_MES
tproc/
C_MES
C_DIA
tproc/
C_DIA
C_DIARIO
tproc/
C_DIARIO
C_DOCU
tproc/
C_DOCU
tproc
cs_cursor_marca
LCPATH
LCFILE_PROC
MENSAGEM
PATHDADOS
ENTIDADE
TPROC
DATA
EXERCICIO
CS_CURSOR_MARCA
C_MES
C_DIA
MARCADIA
C_DIARIO
MARCADIARIO
C_DOCU
MARCADOCU
FECHADO
ESTADOR
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
funci
estab
proce
movim
funci
estab
tproc
movim
Obtendo informa
o de Gest
o de Pessoal...
funci
/01/02
/01/31
/02/01
/02/28
/03/01
/03/31
/04/01
/04/30
/05/01
/05/31
/06/01
/06/30
/07/01
/07/31
/08/01
/08/31
/09/01
/09/30
/10/01
/10/31
/11/01
/11/30
/12/31
/12/31
cs_total
key_1
cs_total
LCPATH
LCFILE_FUNC
LCFILE_ESTA
LCOUTCURSOR
LNMEDIA
LCANO
LNORDEM
MENSAGEM
PATHDADOS
ENTIDADE
LCFILE_PROC
LCFILE_MOVI
EXERCICIO
FUNCI
ESTAB
TPROC
MOVIM
CHAVE
MORADA
CPOSTAL
CPOSTAL2
LOCALIDADE
DISTRITO
CONCELHO
FREGUESIA
EMAIL
ACTIVIDADE
NMEDIO
ORDEM
XESTAB
C_ESTAB
CS_TOTAL
KEY_1
SSESTAB
XDISTR
XCONCE
XFREG
ACTIV
NRLINHAS
NCURSOR
ESTADO&
Verificando dados da aplica
o de Gest
o de Pessoal...
empresa
key_1
1.01.00
pessoa\
proce
movim
funci
infop
funci
tproc
movim
infop
Obtendo informa
o de Gest
o de Pessoal...
LCPATH
LCFILE_PROC
LCFILE_MOVI
LCFILE_FUNC
LCOUTCURSOR
LBVERSAO_SALARIOS_OLD
LCFILE_INFO
MENSAGEM
XSEEK
ENTIDADE
EMPRESA
VRSAL
PATHDADOS
FUNCI
TPROC
MOVIM
INFOP
MEDIA_EMPRESA
ESTADO
/01/02
/01/31
/02/01
/02/28
/03/01
/03/31
/04/01
/04/30
/05/01
/05/31
/06/01
/06/30
/07/01
/07/31
/08/01
/08/31
/09/01
/09/30
/10/01
/10/31
/11/01
/11/30
/12/31
/12/31
/01/02
/01/31
/02/01
/02/28
/03/01
/03/31
/04/01
/04/30
/05/01
/05/31
/06/01
/06/30
/07/01
/07/31
/08/01
/08/31
/09/01
/09/30
/10/01
/10/31
/11/01
/11/30
/12/31
/12/31
/01/02
/01/31
/02/01
/02/28
/03/01
/03/31
/04/01
/04/30
/05/01
/05/31
/06/01
/06/30
/07/01
/07/31
/08/01
/08/31
/09/01
/09/30
/10/01
/10/31
/11/01
/11/30
/12/31
/12/31
/01/02
/01/31
/02/01
/02/28
/03/01
/03/31
/04/01
/04/30
/05/01
/05/31
/06/01
/06/30
/07/01
/07/31
/08/01
/08/31
/09/01
/09/30
/10/01
/10/31
/11/01
/11/30
/12/31
/12/31
/01/02
/01/31
/02/01
/02/28
/03/01
/03/31
/04/01
/04/30
/05/01
/05/31
/06/01
/06/30
/07/01
/07/31
/08/01
/08/31
/09/01
/09/30
/10/01
/10/31
/11/01
/11/30
/12/31
/12/31
/01/02
/01/31
/02/01
/02/28
/03/01
/03/31
/04/01
/04/30
/05/01
/05/31
/06/01
/06/30
/07/01
/07/31
/08/01
/08/31
/09/01
/09/30
/10/01
/10/31
/11/01
/11/30
/12/31
/12/31
funciQ
tprocQ
movimQ
cs_media
funciQ
tprocQ
movimQ
cs_media
LBOLD
LNRET
LNFIELDS
LNINDICE
LCANO
LNJANEIRO
LNFEVEREIRO
LNMARCO
LNABRIL
LNMAIO
LNJUNHO
LNJULHO
LNAGOSTO
LNSETEMBRO
LNOUTUBRO
LNNOVEMBRO
LNDEZEMBRO
THIS
EXERCICIO
FUNCI
AOSERVICOREMUNERADAS
AOSERVICONAOREMUNERADAS
FORMASIMPLES
DURTRAB
TEMPOCOMPLETOREMUNERADAS
TEMPOCOMPLETONAOREMUNERADAS
TEMPOPARCIALREMUNERADAS
TEMPOPARCIALNAOREMUNERADAS
TPABONO
UNIDADE
DIASHORAS
HSEMANA
NAOREMUNERADAS
REMUNERADAS
TPROC
MOVIM
XFUNC
XPROC
XABONO
CS_MEDIA
INFOP
MYNEWARRAY
VEN_EM_FER
AOSERVICOREMUNERADASHORAS
AOSERVICONAOREMUNERADASHORAS
TEMPOCOMPLETOREMUNERADASHORAS
TEMPOCOMPLETONAOREMUNERADASHORAS
TEMPOPARCIALREMUNERADASHORAS
TEMPOPARCIALNAOREMUNERADASHORAS
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
estab
estab
Obtendo informa
o de Gest
o de Pessoal...
estab
LCPATH
LCFILE_ESTAB
LCOUTCURSOR
MENSAGEM
PATHDADOS
ENTIDADE
ESTAB
COUNT
TOTAL
NUMEROESTABELECIMENTOS
ESTADO
Verificando dados da aplica
o de Gest
o de Pessoal...
pessoa\
funci
movim
indep
proce
clfuncionarios
clmovimentos
clindependentes
clprocessamentos
Obtendo informa
o de Gest
o de Pessoal (Anexo J)...
clindependentes
clfuncionarios
CCCCC
clmovimentosQ
clprocessamentosQ
cs_retencoes_1
clmovimentosQ
clprocessamentosQ
cs_retencoes_2
cs_retencoes_2
cs_retencoes_1
LCPATH
LCFILE_FUNC
LCFILE_MOVI
LCFILE_INDP
LCFILE_PROC
LCCURSOR
LCCURSOR2
LCOUTCURSOR
MENSAGEM
PATHDADOS
ENTIDADE
CLFUNCIONARIOS
CLMOVIMENTOS
CLINDEPENDENTES
CLPROCESSAMENTOS
TABELAIRS
NRESID
LATIPO
ANO_REPORTE
TIPO_REND2
XABONO
TPABONO
XPROC
TIPO_REND
VAL_RETIDO
VALOR
RETIDO
VAL_SUJEITO
DESCONT
TOTAL
ALTERA
XFUNC
EXERCICIO
CS_RETENCOES_1
VUNIT
CS_RETENCOES_2
NRLINHAS
NCURSOR
ESTADO!
_ABONO
_TIPOABONO
_PROC
LNABONO
LNTIPOABONO
LNPROC
LNRET
LALINK
P_REND
_CONTA
_FUNCI
_ESTAB
_CENTRO
_LOCAL
_SECTOR
LCCONTA
LNFUNCI
LNESTAB
LNCENTRO
LNLOCAL
LNSECTOR
LCRET
LNIND
LCWORK
LCREPLACE
LNQTCARACTER
LCOBJECTO
GET_CONTA_CENTRO_CUSTO
PERSONALIZAR_
custo
key_1
_CENTRO
LCRET
XSEEK
CUSTO
CONTA
union all
select a.codi as c_func, a.xestab as c_estab, b.c_centro as c_centro, a.xlocal as c_local,
a.sector as c_sector, this.get_tabela_export(a.codi, this.mes, this.exercicio, a.cfgcontab) as c_cfgcontab, 501 as c_abono, 1 as t_abono,
3 as c_ab, b.valor_func as valor
from funci a, cs_ven_em_fer b
where a.codi = b.c_func
group by c_func
union all
select a.codi as c_func, a.xestab as c_estab, b.c_centro as c_centro, a.xlocal as c_local,
a.sector as c_sector, this.get_tabela_export(a.codi, this.mes, this.exercicio, a.cfgcontab) as c_cfgcontab, 502 as c_abono, 99 as t_abono,
3 as c_ab, b.valor_empr as valor
from funci a, cs_ven_em_fer b
where a.codi = b.c_func
group by c_func
contab/
contab
cs_testa_contab
C_MES
tproc/
C_MES
C_DIA
tproc/
C_DIA
C_DIARIO
tproc/
C_DIARIO
C_DOCU
tproc/
C_DOCU
empty(c.c_mes)
select a.codi as c_func, a.xestab as c_estab, b.xcentro as c_centro, a.xlocal as c_local, a.sector as c_sector, this.get_tabela_export(a.codi, this.mes, this.exercicio, a.cfgcontab) as c_cfgcontab, iif(between(b.xabono, 300, 399) and b.tpabono = 99, 500, b.xabono) as c_abono, b.tpabono as t_abono, iif(b.xabono < 200, 1, 3) as c_ab, sum(b.valor) as valor from funci a, movim b, tproc c where a.codi = b.xfunc and b.xproc = c.codi and &lcstring_marcados and year(c.data) = this.exercicio and month(c.data) = this.mes and !between(b.xabono, 200, 299) group by c_func, c_abono, t_abono union all select a.codi as c_func, a.xestab as c_estab, b.xcentro as c_centro, a.xlocal as c_local, a.sector as c_sector, this.get_tabela_export(a.codi, this.mes, this.exercicio, a.cfgcontab) as c_cfgcontab, 505 as c_abono, 00 as t_abono, 0 as c_ab, sum(b.valor*iif(b.xabono < 200, 1, -1)) as valor from funci a, movim b, tproc c where a.codi = b.xfunc and b.xproc = c.codi and b.tpabono < 80 and &lcstring_marcados and year(c.data) = this.exercicio and month(c.data) = this.mes and !between(b.xabono, 200, 299) group by c_func &string_sql order by 1 into cursor cs_1_x
cs_1_x
cs_1_x2
rep_cc/
REP_CC
infop
cs_infop_x
infop
cs_infop_x
cs_1_pag
key_1
_OUTCURSOR
LCOUTCURSOR
LCTRANCONTA
LCTRANNATUREZA
LCSTRING
LCSTRING_MARCADOS
LNVALOR_PERC
LNVALOR_PERC_PAG
LBPERC
LNTESTA_CONTAB
LCPROC_NOVO
CONTAB
CONTA
CS_TESTA_CONTAB
FUNCAO
VENCIMENTO_FERIAS
STRING_SQL
VENCIMENTO_EM_FERIAS
C_FUNC
C_ESTAB
C_CENTRO
C_LOCAL
C_SECTOR
C_CFGCONTAB
C_ABONO
T_ABONO
VALOR
CALC_VENCIMENTO_FERIAS
CS_1_X
CS_1_X2
INFOP
XFUNC
REP_CC
EXERCICIO
CS_INFOP_X
KEY_1
PACENTRO
CLEAN_ARRAY_CENTRO
LOAD_ARRAY_CENTRO
LNIND
CS_1_PAG
VENCIMENTO_FERIAS_X
PERSONALIZAR
ABONO
DESCRITIVO
TCONTA
NATUR
TRANSFORMA
NATUREZA
CS_3
CHK_NATUR
DEBITO
CREDITO
DEBITO_ANAL
CREDITO_ANAL
SALDO
SALDO_ANALg
union all
select a.codi as c_func, a.xestab as c_estab, b.c_centro as c_centro, a.xlocal as c_local,
a.sector as c_sector, a.cfgcontab as c_cfgcontab, 501 as c_abono, 1 as t_abono,
3 as c_ab, b.valor_func as valor
from funci a, cs_ven_em_fer b
where a.codi = b.c_func and !empty(a.cfgcontab)
group by c_func
union all
select a.codi as c_func, a.xestab as c_estab, b.c_centro as c_centro, a.xlocal as c_local,
a.sector as c_sector, a.cfgcontab as c_cfgcontab, 502 as c_abono, 99 as t_abono,
3 as c_ab, b.valor_empr as valor
from funci a, cs_ven_em_fer b
where a.codi = b.c_func and !empty(a.cfgcontab)
group by c_func
select a.codi as c_func, a.xestab as c_estab, b.xcentro as c_centro, a.xlocal as c_local, a.sector as c_sector, a.cfgcontab as c_cfgcontab, iif(between(b.xabono, 300, 399) and b.tpabono = 99, 500, b.xabono) as c_abono, b.tpabono as t_abono, iif(b.xabono < 200, 1, 3) as c_ab, sum(b.valor) as valor from funci a, movim b, tproc c where a.codi = b.xfunc and b.xproc = c.codi and !empty(a.cfgcontab) and year(c.data) = this.exercicio and month(c.data) = this.mes and !between(b.xabono, 200, 299) group by c_func, c_abono, t_abono union all select a.codi as c_func, a.xestab as c_estab, b.xcentro as c_centro, a.xlocal as c_local, a.sector as c_sector, a.cfgcontab as c_cfgcontab, 505 as c_abono, 00 as t_abono, 0 as c_ab, sum(b.valor*iif(b.xabono < 200, 1, -1)) as valor from funci a, movim b, tproc c where a.codi = b.xfunc and b.xproc = c.codi and !empty(a.cfgcontab) and b.tpabono < 80 and year(c.data) = this.exercicio and month(c.data) = this.mes and !between(b.xabono, 200, 299) group by c_func &string_sql having !empty(cfgcontab) order by 1 into cursor cs_1_x
cs_1_x
cs_1_pag
key_1
_OUTCURSOR
LCOUTCURSOR
LCTRANCONTA
LCTRANNATUREZA
LCSTRING
VENCIMENTO_FERIAS
STRING_SQL
VENCIMENTO_EM_FERIAS
C_FUNC
C_ESTAB
C_CENTRO
C_LOCAL
C_SECTOR
C_CFGCONTAB
C_ABONO
T_ABONO
VALOR
CALC_VENCIMENTO_FERIAS
CS_1_X
CS_1_PAG
VENCIMENTO_FERIAS_X
ABONO
DESCRITIVO
TCONTA
NATUR
CONTAB
KEY_1
TRANSFORMA
CONTA
NATUREZA
CHK_NATUR
DEBITO
CREDITO
DEBITO_ANAL
CREDITO_ANAL
SALDO
SALDO_ANAL
_NATUR
_VALOR
LCNATUR
LNVALOR
LCRET_
empty(b.c_mes)
cs_ven_em_fer
select a.xfunc as c_func, a.xcentro as c_centro, sum(a.vsuj) as vsujeito from movim a, tproc b where a.ven_em_fer = 1 and a.xproc = b.codi and &lcstring_marcados and year(b.data) = this.exercicio and month(b.data) = this.mes and a.xabono < 200 group by c_func into cursor cs_ven_em_fer_suj
movimQ
tprocQ
cs_ven_em_fer_taxa_func
movimQ
tprocQ
cs_ven_em_fer_taxa_empr
cs_ven_em_fer
_STRING
LCSTRING_MARCADOS
CS_VEN_EM_FER
C_FUNC
C_CENTRO
VALOR_FUNC
VALOR_EMPR
VENCIMENTO_EM_FERIAS
XFUNC
VUNIT
MOVIM
TPROC
XPROC
DATA
EXERCICIO
XABONO
TPABONO
CS_VEN_EM_FER_TAXA_FUNC
KEY_1
CS_VEN_EM_FER_TAXA_EMPR
CS_VEN_EM_FER_SUJ
VSUJEITO
CS_VEN_EM_FER
cs_ven_em_fer
key_1
_FUNC
LNFUNC
LCWHO
LNVALOR
VENCIMENTO_EM_FERIAS
XSEEK
CS_VEN_EM_FER
VALOR_FUNC
VALOR_EMPR
cs_ven_em_fer
key_1
_ABONO
_TPABONO
_FUNCIONARIO
LNABONO
LNTPABONO
LNFUNCIONARIO
LBRETORNO
VENCIMENTO_EM_FERIAS
XSEEK
infop
key_2
_FUNC
_TABELA
LNFUNC
LNMES
LNANO
LNTABELA
LNRET
XSEEK
INFOP
CONTABO
ESTADO
NCURSOR
_DUOFUNC
_TIPOABONO
LBRET
LNDUOFUNC
LNTIPOABONO]
funci
cs_duodec_funcs
cs_transicao
cs_1_x
cs_1_index
tipo = 3
tipo = 2
tipo > 1
and (xfunc = cs_duodec_funcs.codi or xfunc = 0)
and xfunc = cs_duodec_funcs.codi
select * from autoc where &lcexpr1 into cursor cs_natal_ferias
Caption = "IVA - Anexo O: Recapitulativo de Clientes"
Icon = ..\shared\icons\gdg2000.ico
Name = "anexoo"
PROCEDURE Unload
release anexoo_limite, total1, total2
ENDPROC
PROCEDURE Init
public anexoo_limite, total1, total2
anexoo_limite=0
=set_parms("anexoo")
thisform.text1.refresh
ENDPROC
\projectos\gdg2000\shared\forms\print
Click,
BArial, 0, 9, 5, 15, 12, 32, 3, 0
Arial, 0, 8, 5, 14, 11, 29, 3, 0
KPROCEDURE Click
do form \projectos\gdg2000\shared\forms\print
ENDPROC
anexoo
pageframe
pageframe
Pageframe1
anexoo
ErasePage = .T.
PageCount = 2
Top = 48
Left = 12
Width = 480
Height = 245
TabIndex = 2
Name = "Pageframe1"
Page1.FontSize = 8
Page1.Caption = "Impresso \<Oficial"
Page1.Name = "Page1"
Page2.FontSize = 8
Page2.Caption = "Con\<fer
ncias"
Page2.Name = "Page2"
shape
shape
Shape2
anexoo.Pageframe1.Page1
@Top = 46
Left = 47
Height = 61
Width = 385
Name = "Shape2"
commandbutton
commandbutton
Command1
anexoo.Pageframe1.Page1
fTop = 224
Left = 56
Height = 27
Width = 84
Caption = "Command1"
TabIndex = 1
Name = "Command1"
.PROCEDURE Click
select l_nif,;
sum(iif(empty(l_contac),l_valor,l_valor*-1)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" ;
group by l_nif ;
into cursor recapl
* and verifica_nif(l_nif)=.t.
ENDPROC
\projectos\gdg2000\shared\forms\frmfont
Click,
xTop = 298
Left = 87
Height = 27
Width = 71
FontSize = 8
Caption = "Im\<pressora"
TabIndex = 5
Name = "Command4"
Command4
commandbutton
commandbutton
commandbutton
Command2
anexoo.Pageframe1.Page1
fTop = 224
Left = 56
Height = 27
Width = 84
Caption = "Command1"
TabIndex = 2
Name = "Command2"
.PROCEDURE Click
select l_nif,;
sum(iif(empty(l_contac),l_valor,l_valor*-1)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" ;
group by l_nif ;
into cursor recapl
* and verifica_nif(l_nif)=.t.
ENDPROC
THISFORM
RELEASE
Click,
commandbutton
RPROCEDURE Click
do form \projectos\gdg2000\shared\forms\frmfont noshow
ENDPROC
anexoo
Command5
commandbutton
commandbutton
commandbutton
commandbutton
Command3
anexoo.Pageframe1.Page1
fTop = 224
Left = 56
Height = 27
Width = 84
Caption = "Command1"
TabIndex = 3
Name = "Command3"
.PROCEDURE Click
select l_nif,;
sum(iif(empty(l_contac),l_valor,l_valor*-1)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" ;
group by l_nif ;
into cursor recapl
* and verifica_nif(l_nif)=.t.
ENDPROC
frmcfgm
Declara
o Anual - ANEXO O (Verso)
anexoo_v
FRMCFGM
Click,
sTop = 298
Left = 15
Height = 27
Width = 71
FontSize = 8
Caption = "\<Fonte"
TabIndex = 4
Name = "Command5"
anexoo
commandbutton
commandbutton
Command4
anexoo.Pageframe1.Page1
xTop = 178
Left = 294
Height = 27
Width = 84
FontSize = 8
Caption = "\<Visualiza"
TabIndex = 4
Name = "Command4"
PROCEDURE Click
=upd_parms("anexoo","anexoo_*")
select plano
set order to key_1
select l_nif,;
iif(empty(l_contac),l_contad,l_contac) as recapconta ,;
sum(iif(empty(l_contac),l_valor,l_valor*-1)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" ;
group by l_nif ;
having tottrans >= anexoo_limite ;
into cursor recapo
if reccount()=0
=messagebox("N
o existe nenhum registo por listar",0+64,"")
return
endif
SET RELATION TO recapo.recapconta INTO PLANO
=imp("anexoo_r","",.f.)
do clear_relations
return
ENDPROC
frmcfgm
Declara
o Anual - ANEXO O (Frente)
anexoo_f
FRMCFGM
Click,
lanca
recapl
L_NIF
L_CONTAC
L_VALOR
TOTTRANS
LANCA
VERIFICA_NIF
L_MAPAR
L_TMAPAR
RECAPL
Click,
Text1
textbox
textbox
anexoo
Label1
shape
shape
Shape1
anexoo.Pageframe1.Page1
RTop = 172
Left = 7
Height = 2
Width = 458
SpecialEffect = 0
Name = "Shape1"
commandbutton
commandbutton
Command5
anexoo.Pageframe1.Page1
vTop = 178
Left = 380
Height = 27
Width = 84
FontSize = 8
Caption = "\<Imprime"
TabIndex = 5
Name = "Command5"
PROCEDURE Click
=upd_parms("anexoo","anexoo_*")
total1=0
total2=0
select l_nif,;
sum(iif(empty(l_contac),l_valor,l_valor*-1)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" ;
group by l_nif ;
having tottrans >= anexoo_limite ;
into cursor recapo
if reccount()=0
=messagebox("N
o existe nenhum registo por listar",0+64,"")
return
endif
if reccount()>100
=messagebox("N
o pode utilizar o impresso oficial."+chr(13)+"Existem "+alltrim(str(reccount()))+" registos por incluir",0+64,"")
endif
=messagebox("Coloque a frente do impresso na impressora",0+64,"")
go top
sum round(tottrans,0) for recno()<47 to total1
go top
sum round(tottrans,0) to total2
=imp("anexoo_f","for recno()<47",.t.)
if reccount()>46
=messagebox("Coloque o verso do impresso na impressora",0+64,"")
=imp("anexoo_v","for recno()>46",.t.,1)
endif
return
ENDPROC
anexoo
anexoo_*
KEY_1
lanca
recapo
o existe nenhum registo por listar
cano_r
UPD_PARMS
PLANO
KEY_1
L_CONTAC
L_CONTAD
RECAPCONTA
LANCA
L_NIF
VERIFICA_NIF
L_MAPAR
L_TMAPAR
L_MES
PARENT
TXTMESINF
VALUE
TXTMESSUP
TXTCONTASUP
TXTCONTAINF
TXTNIFSUP
TXTNIFINF
RECAPO
CLEAR_RELATIONS
Click,
label
label
.PROCEDURE Click
thisform.release
ENDPROC
anexoo
Command2
Command1
label
label
Label2
anexoo.Pageframe1.Page1
AutoSize = .T.
FontSize = 8
WordWrap = .T.
Caption = "Se o numero de clientes a incluir no mapa ultrapassar os 100, n
o poder
utilizar o impresso oficial."
Height = 30
Left = 61
Top = 58
Width = 357
TabIndex = 6
Name = "Label2"
commandbutton
commandbutton
Command6
anexoo.Pageframe1.Page1
}Top = 178
Left = 8
Height = 28
Width = 109
FontSize = 8
Caption = "Configurar Frente"
TabIndex = 7
Name = "Command6"
hPROCEDURE Click
do form frmcfgm with "Declara
o Anual - ANEXO O (Frente)", "anexoo_f"
ENDPROC
FontSize = 8
ControlSource = "anexoo_limite"
Height = 21
InputMask = (masc(13,1))
Left = 247
SpecialEffect = 1
TabIndex = 1
Top = 7
Width = 139
Name = "Text1"
commandbutton
commandbutton
anexoo.Pageframe1.Page2
commandbutton
commandbutton
Command7
anexoo.Pageframe1.Page1
~Top = 178
Left = 118
Height = 28
Width = 109
FontSize = 8
Caption = "Configurar Verso"
TabIndex = 8
Name = "Command7"
gPROCEDURE Click
do form frmcfgm with "Declara
o Anual - ANEXO O (Verso)", "anexoo_v"
ENDPROC
AutoSize = .T.
FontSize = 8
Caption = "Valor a partir do qual inclui nos recapitulativos :"
Height = 16
Left = 18
Top = 10
Width = 230
TabIndex = 6
Name = "Label1"
commandbutton
commandbutton
anexoo.Pageframe1.Page2
commandbutton
commandbutton
Command4
anexoo.Pageframe1.Page2
vTop = 178
Left = 383
Height = 27
Width = 84
FontSize = 8
Caption = "\<Imprime"
TabIndex = 8
Name = "Command4"
PROCEDURE Click
=upd_parms("anexoo","anexoo_*")
select plano
set order to key_1
select *,;
iif(empty(l_contac),l_contad,l_contac) as recapconta ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" and ;
between(l_mes,This.Parent.txtmesinf.value,This.Parent.txtmessup.value) and ;
iif(!empty(this.parent.txtcontasup.value),between(l_contad,this.parent.txtcontainf.value,this.parent.txtcontasup.value) or between(l_contac,this.parent.txtcontainf.value,this.parent.txtcontasup.value),.t.) and ;
iif(empty(l_contac),l_contad,l_contac) as recapconta ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" and ;
between(l_mes,This.Parent.txtmesinf.value,This.Parent.txtmessup.value) and ;
iif(!empty(this.parent.txtcontasup.value),between(l_contad,this.parent.txtcontainf.value,this.parent.txtcontasup.value) or between(l_contac,this.parent.txtcontainf.value,this.parent.txtcontasup.value),.t.) and ;
Caption = "IVA - Anexo P: Recapitulativo de Fornecedores"
Icon = ..\shared\icons\gdg2000.ico
Name = "anexop"
PROCEDURE Init
public anexop_limite, total1, total2
anexop_limite=0
=set_parms("anexop")
thisform.text1.refresh
ENDPROC
PROCEDURE Unload
release anexop_limite, total1, total2
ENDPROC
\projectos\gdg2000\shared\forms\print
Click,
BArial, 0, 9, 5, 15, 12, 32, 3, 0
Arial, 0, 8, 5, 14, 11, 29, 3, 0
KPROCEDURE Click
do form \projectos\gdg2000\shared\forms\print
ENDPROC
anexop
pageframe
pageframe
Pageframe1
anexop
ErasePage = .T.
PageCount = 2
Top = 36
Left = 12
Width = 480
Height = 245
TabIndex = 2
Name = "Pageframe1"
Page1.FontSize = 8
Page1.Caption = "Impresso \<Oficial"
Page1.Name = "Page1"
Page2.FontSize = 8
Page2.Caption = "Con\<fer
ncias"
Page2.Name = "Page2"
shape
shape
Shape2
anexop.Pageframe1.Page1
@Top = 46
Left = 47
Height = 61
Width = 385
Name = "Shape2"
commandbutton
commandbutton
Command1
anexop.Pageframe1.Page1
fTop = 224
Left = 56
Height = 27
Width = 84
Caption = "Command1"
TabIndex = 1
Name = "Command1"
.PROCEDURE Click
select l_nif,;
sum(iif(empty(l_contac),l_valor,l_valor*-1)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" ;
group by l_nif ;
into cursor recapl
* and verifica_nif(l_nif)=.t.
ENDPROC
\projectos\gdg2000\shared\forms\frmfont
Click,
xTop = 288
Left = 87
Height = 27
Width = 71
FontSize = 8
Caption = "Im\<pressora"
TabIndex = 6
Name = "Command4"
Command4
commandbutton
commandbutton
commandbutton
Command2
anexop.Pageframe1.Page1
fTop = 224
Left = 56
Height = 27
Width = 84
Caption = "Command1"
TabIndex = 2
Name = "Command2"
.PROCEDURE Click
select l_nif,;
sum(iif(empty(l_contac),l_valor,l_valor*-1)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" ;
group by l_nif ;
into cursor recapl
* and verifica_nif(l_nif)=.t.
ENDPROC
THISFORM
RELEASE
Click,
commandbutton
RPROCEDURE Click
do form \projectos\gdg2000\shared\forms\frmfont noshow
ENDPROC
anexop
Command5
commandbutton
commandbutton
commandbutton
commandbutton
Command3
anexop.Pageframe1.Page1
fTop = 224
Left = 56
Height = 27
Width = 84
Caption = "Command1"
TabIndex = 3
Name = "Command3"
.PROCEDURE Click
select l_nif,;
sum(iif(empty(l_contac),l_valor,l_valor*-1)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="C" ;
group by l_nif ;
into cursor recapl
* and verifica_nif(l_nif)=.t.
ENDPROC
frmcfgm
Declara
o Anual - ANEXO P (Verso)
anexop_v
FRMCFGM
Click,
sTop = 288
Left = 15
Height = 27
Width = 71
FontSize = 8
Caption = "\<Fonte"
TabIndex = 5
Name = "Command5"
anexop
commandbutton
commandbutton
Command4
anexop.Pageframe1.Page1
xTop = 178
Left = 294
Height = 27
Width = 84
FontSize = 8
Caption = "\<Visualiza"
TabIndex = 4
Name = "Command4"
PROCEDURE Click
=upd_parms("anexop","anexop_*")
select plano
set order to key_1
select l_nif,;
iif(empty(l_contad),l_contac,l_contad) as recapconta ,;
sum(iif(empty(l_contac),l_valor*-1,l_valor)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="F" ;
group by l_nif ;
having tottrans >= anexop_limite ;
into cursor recapp
if reccount()=0
=messagebox("N
o existe nenhum registo por listar",0+64,"")
return
endif
SET RELATION TO recapp.recapconta INTO PLANO
=imp("anexop_r","",.f.)
do clear_relations
return
ENDPROC
frmcfgm
Declara
o Anual - ANEXO P (Frente)
anexop_f
FRMCFGM
Click,
lanca
recapl
L_NIF
L_CONTAC
L_VALOR
TOTTRANS
LANCA
VERIFICA_NIF
L_MAPAR
L_TMAPAR
RECAPL
Click,
Text1
textbox
textbox
anexop
Label1
shape
shape
Shape1
anexop.Pageframe1.Page1
RTop = 172
Left = 7
Height = 2
Width = 458
SpecialEffect = 0
Name = "Shape1"
commandbutton
commandbutton
Command5
anexop.Pageframe1.Page1
vTop = 178
Left = 380
Height = 27
Width = 84
FontSize = 8
Caption = "\<Imprime"
TabIndex = 5
Name = "Command5"
PROCEDURE Click
=upd_parms("anexop","anexop_*")
total1=0
total2=0
select l_nif,;
sum(iif(empty(l_contac),l_valor*-1,l_valor)) as tottrans ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="F" ;
group by l_nif ;
having tottrans >= anexop_limite ;
into cursor recapo
if reccount()=0
=messagebox("N
o existe nenhum registo por listar",0+64,"")
return
endif
if reccount()>100
=messagebox("N
o pode utilizar o impresso oficial."+chr(13)+"Existem "+alltrim(str(reccount()))+" registos por incluir",0+64,"")
endif
=messagebox("Coloque a frente do impresso na impressora",0+64,"")
go top
sum round(tottrans,0) for recno()<47 to total1
go top
sum round(tottrans,0) to total2
=imp("anexop_f","for recno()<47",.t.)
if reccount()>46
=messagebox("Coloque o verso do impresso na impressora",0+64,"")
=imp("anexop_v","for recno()>46",.t.,1)
endif
return
ENDPROC
anexop
anexop_*
key_1
lanca
recapp
o existe nenhum registo por listar
canp_r
UPD_PARMS
PLANO
KEY_1
L_CONTAD
L_CONTAC
RECAPCONTA
LANCA
L_NIF
VERIFICA_NIF
L_MAPAR
L_TMAPAR
L_MES
PARENT
TXTMESINF
VALUE
TXTMESSUP
TXTCONTASUP
TXTCONTAINF
TXTNIFSUP
TXTNIFINF
RECAPP
CLEAR_RELATIONS
Click,
label
label
.PROCEDURE Click
thisform.release
ENDPROC
anexop
Command2
Command1
label
label
Label2
anexop.Pageframe1.Page1
AutoSize = .T.
FontSize = 8
WordWrap = .T.
Caption = "Se o numero de fornecedores a incluir no mapa ultrapassar os 100, n
o poder
utilizar o impresso oficial."
Height = 30
Left = 61
Top = 58
Width = 349
TabIndex = 6
Name = "Label2"
commandbutton
commandbutton
Command6
anexop.Pageframe1.Page1
}Top = 178
Left = 8
Height = 28
Width = 109
FontSize = 8
Caption = "Configurar Frente"
TabIndex = 7
Name = "Command6"
hPROCEDURE Click
do form frmcfgm with "Declara
o Anual - ANEXO P (Frente)", "anexop_f"
ENDPROC
FontSize = 8
ControlSource = "anexop_limite"
Height = 21
InputMask = (masc(13,1))
Left = 247
SpecialEffect = 1
TabIndex = 1
Top = 7
Width = 139
Name = "Text1"
commandbutton
commandbutton
anexop.Pageframe1.Page2
commandbutton
commandbutton
Command7
anexop.Pageframe1.Page1
~Top = 178
Left = 118
Height = 28
Width = 109
FontSize = 8
Caption = "Configurar Verso"
TabIndex = 8
Name = "Command7"
gPROCEDURE Click
do form frmcfgm with "Declara
o Anual - ANEXO P (Verso)", "anexop_v"
ENDPROC
AutoSize = .T.
FontSize = 8
Caption = "Valor a partir do qual inclui nos recapitulativos :"
Height = 16
Left = 18
Top = 10
Width = 230
TabIndex = 4
Name = "Label1"
commandbutton
commandbutton
anexop.Pageframe1.Page2
commandbutton
commandbutton
Command4
anexop.Pageframe1.Page2
vTop = 178
Left = 383
Height = 27
Width = 84
FontSize = 8
Caption = "\<Imprime"
TabIndex = 8
Name = "Command4"
PROCEDURE Click
=upd_parms("anexop","anexop_*")
select plano
set order to key_1
select *,;
iif(empty(l_contad),l_contac,l_contad) as recapconta ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="F" and ;
between(l_mes,This.Parent.txtmesinf.value,This.Parent.txtmessup.value) and ;
iif(!empty(this.parent.txtcontasup.value),between(l_contad,this.parent.txtcontainf.value,this.parent.txtcontasup.value) or between(l_contac,this.parent.txtcontainf.value,this.parent.txtcontasup.value),.t.) and ;
iif(empty(l_contad),l_contac,l_contad) as recapconta ;
from lanca ;
where !empty(l_nif) and verifica_nif(l_nif)=.t. and !isalpha(l_nif) and l_mapar=.t. and l_tmapar="F" and ;
between(l_mes,This.Parent.txtmesinf.value,This.Parent.txtmessup.value) and ;
iif(!empty(this.parent.txtcontasup.value),between(l_contad,this.parent.txtcontainf.value,this.parent.txtcontasup.value) or between(l_contac,this.parent.txtcontainf.value,this.parent.txtcontasup.value),.t.) and ;
(.txt)