'Nome       : Ascii.amx
'Tipo       : AMX OPC
'Data       : 2002/02/20
'Versao     : 2.0
'Descricao  : Importacao/Exportacao de dados ASCII

'==============================================================================
'#VER - Historia de modificacoes
'==============================================================================
'- Versao : 1.0   2000/10/30 --------------------------------------------------
'Versao base

'- Versao : 1.0a  2001/01/29 --------------------------------------------------
'Permitir activar limites de exportacao CTA

'- Versao : 2.0   2002/??/?? --------------------------------------------------
'Importar contas e artigos
'Permitir indicar modo de activacao da tabela/ficheiro a usar
'Permitir limitar data na exportacao de movimentos ENC


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


'==============================================================================
#ESP - Campos especificos
'==============================================================================
Tipo de configuracao              [OpcCfg]=ASCII

'opcoes
Documentos                        [OpcDoc]=S,
Datas                              [OpcDt]=S,
Contas                             [OpcCt]=S,
Artigos                           [OpcArt]=S,

'diversos
Impressora adicional              [PrtAdi]=[SIG_DIR.DEV],AmxPrt.std

Radical de clientes               [CliRad]=211
Digitos de clientes (sem radical) [CliDig]=4

'formatos
Exportar                          [OpcExp]=ExpCtaMov:0,ExpStcMov:0,+
                                          +ExpEncDoc:0,ExpEncMov:0

Importar                          [OpcImp]=ImpCtaMst:0,ImpCtaAng:0,ImpCtaMov:0,+
                                          +ImpStcMst:1,ImpStcMov:0,+
                                          +ImpEncDoc:0,ImpEncMov:0
##


'==============================================================================
'= Importacao =
'==============================================================================

'= CTA ========================================================================
'------------------------------------------------------------------------------
#DOC - Contas CTA
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ImpCtaMst,Contas CTA

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=CtaMst
Limites a validar          [DocEsp]=OpcLim=CT
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,CtaMst.asc
'Ficheiro de resultados     [DocEsp]=FicRes=[SIG_INS.LOC.SIG],trf,CtaMst.res

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=LC
Campos do ficheiro         [DocEsp]=AscCmp=x_RecVal,x_RecSit,x_RecLoc,x_RecDiv$,+
                                          +Opc$,Ct$,Nom$,Entid$,Ctrb$,x_OrdAux$,+
                                          +Txl$,RzaNd,CodTrat$,RefCt$,RefCod$,+
                                          +IvaAno$,IvaPer$,+
                                          +Ccusto,Pais,Moeda

Modo de importacao (NOR,SBT,LPZ)  [DocEsp]=MoImp=NOR
##


'------------------------------------------------------------------------------
#DOC - Dados anagraficos CTA
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ImpCtaAng,Dados anagraficos CTA

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=CtaAng
Limites a validar          [DocEsp]=OpcLim=CT
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,CtaAng.asc
'Ficheiro de resultados     [DocEsp]=FicRes=[SIG_INS.LOC.SIG],trf,CtaAng.res

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=LC
Campos do ficheiro         [DocEsp]=AscCmp=x_RecVal,x_RecSit,x_RecLoc,x_RecDiv$,+
                                          +Opc$,Ct$,Nom2$,Morada$,Local$,Cpost$,+
                                          +Nib$,Cloc$,Cae$,Contacto$,+
                                          +Telef$,Telem$,Fax$,Email$,Web$,+
                                          +Grp$,Prc$,Vend,Cpag,Desco$,+
                                          +Trsp%,CrdCtl,Rappel,CompAno,ComAnt,+
                                          +Txl$,Ender$

Modo de importacao (NOR,SBT,LPZ)  [DocEsp]=MoImp=NOR
##


'------------------------------------------------------------------------------
#DOC - Movimentos CTA
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ImpCtaMov,Movimentos CTA

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=CtaMov
Limites a validar          [DocEsp]=OpcLim=DOC,DT,CT
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,CtaMov.asc
Ficheiro de resultados     [DocEsp]=FicRes=[SIG_INS.LOC.SIG],trf,CtaMov.res

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=L
'Campos do ficheiro         [DocEsp]=AscCmp=Ct$,Dtl,Ndo,Descr$,Vln,Tv$
Campos do ficheiro         [DocEsp]=AscCmp=+
                                          +Opc$,Ct$,Dtl,Tdoc$,Ndoc$,Dtv,Cmov,Descr$,+
                                          +Vl,Vme,Tv$,Div$,Pais,Moeda,Cmb

'Campos nao usados: x_RecVal,x_RecSit,x_RecLoc,x_RecDiv$,

Modo de importacao (NOR,LPZ)  [DocEsp]=MoImp=NOR


'==================
' Opcoes especiais
'==================
'NDO        - Numero de documento - Tipo SIG 2.x
'VLN        - Valor nacional      - tipo SIG 2.x
##


'= STC ========================================================================
'------------------------------------------------------------------------------
#DOC - Artigos STC
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ImpStcMst,Artigos STC

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=StcMst
Limites a validar          [DocEsp]=OpcLim=ART
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,StcMst.asc
'Ficheiro de resultados     [DocEsp]=FicRes=[SIG_INS.LOC.SIG],trf,StcMst.res

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=LC
Campos do ficheiro         [DocEsp]=AscCmp=x_RecVal,x_RecSit,x_RecLoc,x_RecDiv$,+
                                          +Opc$,Art$,Nom1$,x_CodAux1$,x_CodAux2$,+
                                          +CodBar$,Nom2$,CodSbt$,Unid$,Loc$,+
                                          +TpArt,Txl$,Pais,Grupo$,UnForm,+
                                          +Pv1,Pv2,Pv3,Pv4,PrcOrg,Tarr,Varr,PrcGrp,+
                                          +Iva,NumDec,CmvTx$,Desco$,Prom$,DesAcm$,+
                                          +CtpTip,RapTip,RecLst$,+
                                          +Penc,Smin,Smax,RepoQu,RepoTmp,RepoAlg,Sazon,+
                                          +FrnCt$,FrnUltN$,FrnCod$,FrnDescr$,FrnDesco$,+
                                          +DtIni,MedTip,MedTxt$,Peso,Fcnv,+
                                          +UsaArz,UsaLotes,UsaTaras,UsaQu2

Modo de importacao (NOR,SBT,LPZ)  [DocEsp]=MoImp=LPZ
##


'------------------------------------------------------------------------------
#DOC - Movimentos STC
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ImpStcMov,Movimentos STC

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=StcMov
Limites a validar          [DocEsp]=OpcLim=DOC,DT,CT,ART
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,StcMov.asc
Ficheiro de resultados     [DocEsp]=FicRes=[SIG_INS.LOC.SIG],trf,StcMov.res

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=L
Campos do ficheiro         [DocEsp]=AscCmp=Art$,Dtl,Ct$,Ndo$,Ser$,Cmv,Qu,VT,+
                                   +ArzEnt,ArzSai,Desco$,Vend

Modo de importacao (NOR,LPZ)  [DocEsp]=MoImp=NOR

'==================
' Opcoes especiais
'==================
'Ndo        - Numero de documento   - Tipo SIG 2.x
'Vtn        - Valor total nacional  - tipo SIG 2.x
'Ser$       - Serie/diario          - Tipo SIG 2.x
##


'= ENC ========================================================================
'------------------------------------------------------------------------------
#DOC - Movimentos ENC
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ImpEncMov,Movimentos ENC

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=EncMov
Limites a validar          [DocEsp]=OpcLim=DOC,CT,ART
'Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,EncMov.asc
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,EncMov.exp
Ficheiro de resultados     [DocEsp]=FicRes=[SIG_INS.LOC.SIG],trf,EncMov.res

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=L
Campos do ficheiro         [DocEsp]=AscCmp=x1$,x2$,x3$,x4$,Opc$,+
                                   +Tdoc$,Ndoc$,TpRg,NumLin,TipRl$,Ct$,Art$,+
                                   +Qu,Qu2,Que,Prc,Iva,Desco$,ArzEnt,ArzSai,Pcu,+
                                   +MedTqv,MedTip,MedTxt$,MedVal,ComPer,Lote$,+
                                   +Hora,Div$,Vend
##


'------------------------------------------------------------------------------
#DOC - Documentos ENC
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ImpEncDoc,Documentos ENC

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=EncDoc
Limites a validar          [DocEsp]=OpcLim=DOC,CT,DT
'Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,EncDoc.asc
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,EncDoc.exp
Ficheiro de resultados     [DocEsp]=FicRes=[SIG_INS.LOC.SIG],trf,EncDoc.res

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=L
Campos do ficheiro         [DocEsp]=AscCmp=x1$,x2$,x3$,x4$,Opc$,+
                                   +Tdoc$,Ndoc$,Mat$,Dtl,Dtv,Dtpe,Dtr,+
                                   +HrIni,HrFim,HrSai,CtEnt$,CtSai$,Tpv$,Descr$,+
                                   +Pais,Moeda,CmbCta,CmbStc,Ptv,ArzEnt,ArzSai,+
                                   +IvaTip,IvaPtx$,DesAcm$,+
                                   +Vend,ComPer,ComInc,ComTot,ComPag,+
                                   +Qu,Ilq,ValTot,ValMe,+
                                   +ModoPag,+CpagCod,ModoPagN$,+ValRec,+
                                   +NumMov,Mrec$,Macm$,DocFrc$,DocGrp$,SitDoc$,+
                                   +ActCta$,ActCtp$,ActStc$,ActDoc$,DocImp$,+
                                   +DocCnf$,CtaCmov,Trp$,Oper$,Txl$
##


'==============================================================================
'= Exportacao =
'==============================================================================

'= CTA ========================================================================
'------------------------------------------------------------------------------
#DOC - Movimentos CTA
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ExpCtaMov,Movimentos CTA

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=CtaMovLin
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=CtaMov
Limites a validar          [DocEsp]=OpcLim=DOC,DT,CT
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,CtaMov.exp
Ficheiro de resultados     [DocEsp]=FicRes=

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=L
##


'= STC ========================================================================
'------------------------------------------------------------------------------
#DOC - Movimentos STC
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ExpStcMov,Movimentos STC

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=StcMovLin
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=StcMov
Limites a validar          [DocEsp]=OpcLim=DT,ART
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,StcMov.exp
Ficheiro de resultados     [DocEsp]=FicRes=

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=L
##


'= ENC ========================================================================
'------------------------------------------------------------------------------
#DOC - Documentos ENC
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ExpEncDoc,Documentos ENC

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=EncDocLin
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=EncDoc
Limites a validar          [DocEsp]=OpcLim=DOC,DT,CT
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,EncDoc.exp
Ficheiro de resultados     [DocEsp]=FicRes=

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=L
##


'------------------------------------------------------------------------------
#DOC - Movimentos ENC
'------------------------------------------------------------------------------
Tipo                       [DocTip]=ASCII
Nome                       [DocNom]=ExpEncMov,Movimentos ENC

'formato
Saida/Impressora           [DocPrt]=
Linhas por pagina          [DocLpg]=
Colunas por linha          [DocCol]=
Ajustar pagina             [DocApg]=

'funcoes de listagem
Listar cabecalho            [FxCAB]=
Listar linhas               [FxLIN]=EncMovLin
Listar fim                  [FxFIM]=

'parametros especificos
Tipo SIG                   [DocEsp]=SigTip=EncMov
Limites a validar          [DocEsp]=OpcLim=DOC,CT,ART,DT
Ficheiro de dados          [DocEsp]=FicDat=[SIG_INS.LOC.SIG],trf,EncMov.exp
Ficheiro de resultados     [DocEsp]=FicRes=

'ficheiro ASCII
Tipo do ficheiro ASCII     [DocEsp]=AscTip=L
##


'==============================================================================
#VAR - Variaveis
'==============================================================================
'Pag       = Doc_CntPag
'Cnt       = FrmVal$(CntAux(1),21,4)
'DataExt   = FrmVal$(Sig_DtHoje,45,0)

'dados de exportacao
ExpTx     = MemTxt$(11)
##


'==============================================================================
#PGM - Programa/Funcoes
'==============================================================================
SUB AscIni 'forcar inicializacao
end sub


'- CtaMov ---------------------------------------------------------------------
SUB CtaMovLin 'registo de movimentos CTA
print MemTxt$(11)
end sub


'- StcMov ---------------------------------------------------------------------
SUB StcMovLin 'registo de movimentos STC
print MemTxt$(11)
'print MemTxt$(102)
'print MemTxt$(110)
'print MemTxt$(123)
end sub


'- EncDoc ---------------------------------------------------------------------
SUB EncDocLin 'registo de documentos ENC
print MemTxt$(11);
end sub


'- EncMov ---------------------------------------------------------------------
SUB EncMovLin 'registo de movimentos ENC
print MemTxt$(11)
end sub

##


'==============================================================================
#INC - Inclusao de ficheiros
'==============================================================================
Ficheiro de relatorios    =[SIG_DIR.CFG],amx,AmxRes.std
#

