'Nome       : LsComVar.std
'Tipo       : LST
'Data       : 2005/06/17
'Versao     : 1.2
'Descricao  : Dados comumns para listagens - Zona VAR

'------------------------------------------------------------------------------
'#VER - Historia de modificacoes
'------------------------------------------------------------------------------
'- Versao : 1.0  2001/05/13 ---------------------------------------------------
'Versao base

'- Versao : 1.1  2000/09/16 ---------------------------------------------------
'Alteracao do Zoom

'- Versao : 1.2  2005/??/?? ---------------------------------------------------
'Compatibilizacao para SIG4


'------------------------------------------------------------------------------
#DEF - Definicao global do documento
'------------------------------------------------------------------------------
Caracteres invalidos             [CarInv]=#
##


'------------------------------------------------------------------------------
#ESP - Campos especificos
'------------------------------------------------------------------------------
Zoom para preview             [PrvZoom]=1
Opcoes para impressora WIN   [PrWinOpc]=[ORI=P]
##


'------------------------------------------------------------------------------
#VAR - Variaveis
'------------------------------------------------------------------------------
Tit      = Memtxt$(1)
Pag      = Doc_CntPag
DataExt  = FrmVal$(Sig_DtHoje,45,0)

'dados da conta actual
CtCod      = Cta_Mst_Ct$
CtNome     = left$(Cta_Mst_Nome$,35)
CtMorada   = Cta_Ang_Morada$
CtLocal    = Cta_Ang_Local$
CtCpost    = Cta_Ang_CPost$
CtCont     = Cta_Ang_Contacto$
CtTelef    = Cta_Ang_Telef$

'variaveis com os dados da empresa
EmpNome    = Emp_Inf_Nome$
EmpMorada  = Emp_Inf_Morada$
EmpLocal   = Emp_Inf_Local$
EmpCpost   = Emp_Inf_Cpost$


TxEmpLocDt = Emp_Inf_Local$+","+FrmVal$(Sig_DtHoje,45,0)

##

