Text of Programação e Customizações AdvPL e Protheus. Aula 1...
Slide 1
Programao e Customizaes AdvPL e Protheus
Slide 2
Aula 1 Evoluo e Arquitetura do Sistema Arquivos Customizaes Case Sistema de Contas Correntes
Slide 3
1974 Assembler Batch 1978 Natural Adabas Online 1983 DBase II III, Clipper Summer 1990 Clipper 5 SIGA Advanced 1995 FiveWin/Top/Coencisa, VO, Delphi, SQL 2000 AdvPL Protheus 5... 8 Evoluo do Sistema da Microsiga
Slide 4
Server (MP8SRVWIN.EXE) Monitor RPO (MPDP811.RPO) Top Connect DB2OracleSQL Server MySQLPostGresSybase Client (WEB) ActiveX Remote (MP8RMT.EXE) Windows Linux Browser Windows Linux Unix Windows Linux Unix Client Aplication Server Database Server DBF/CTREE Multi-Camada
Slide 5
Mltiplas configuraes...... Hub..... Hub. modem Servidor Terminal Dados
Slide 6
Protheus Server COMPILADOR INTERPRETADOR Repositrio de Objetos Remote Protheus Base de Dados Remote Protheus Remote Protheus Remote Protheus WEB Services
Slide 7
Estrutura Protheus APO MATA010 APO MATA010 REMOTE Executa MATA010 Executa MATA010 Executa MATA410 Executa MATA410 Executa CTBR040 Executa CTBR040 RPO MATA010 MATA410 CTBR040 SERVER Programa Fonte MATA010 Cad.ProdutosPed.VendasBalancete Cont. Compilao
Interface de Banco de Dados (Top Connect) Interface de Banco de Dados (Top Connect) Banco de Dados Interface de Software Bsico (acesso ao Hardware) WEB Services. WEB Services. Soluo Protheus (Server). Soluo Protheus (Server). Interface de Apresentao (Remote). Interface de Apresentao (Remote). AP I REDE SGBD.
Slide 10
Projeto Repositrio de Objetos IDE Integrated Development Environment IDE Integrated Development Environment Programa Fonte
Slide 11
Protheus Server Protheus Remote Top Connect Monitor Aplicativos
Slide 12
Camadas Protheus Camada de Dados Camada de Aplicao Camada de Interface Camada de Repositrio de Objetos
Slide 13
RPO arquivo binrio com os APOs BUILD executveis, DLLs e RPO Patch atualizaes do RPO Conjuntos de arquivos
Slide 14
Windows Linux Hand Held (Palm ou Pocket PC) ActiveX Remote
Slide 15
Thin Client Baixo trfego na rede Multi-plataforma Atualizao automtica ASP - Aplication Server Provider Browser Internet (HTML) Terminal Remoto
Slide 16
Estrutura de pastas do sistema ERP811 APO (RPO) BIN REMOTE SERVER INCLUDE MP_DATA DATA (verso ISAM) SAMPLES SPOOL SYSTEM (Dic.Dados, Menus,...) SYSTEMLOAD MY PROJECTS
ERP811 APO BIN REMOTE SERVER INCLUDE MP_DATA DATA SAMPLES SPOOL SYSTEM SYSTEMLOAD MY PROJECTS SIGACFG TCP Environment MP8SRV.INI [Environment] SourcePath=C:\ERP811\APO RootPath=C:\ERP811\MP_Data StartPath=\system\ RpoDb=dbf RpoLanguage=portuguese RpoVersion=811 LocalFiles=ads localdbextension=.dbf PictFormat=DEFAULT DateFormat=DEFAULT [Drivers] Active=TCP [TCP] TYPE=TCPIP Port=1234 MP8SRV.INI
Arquivos Famlia SX ArquivoDescrio SX1Perguntas e Respostas SX2Mapeamento de Tabelas SX3Dicionrio de Dados SX4Agenda do Schedule de Processos SX5Tabelas SX6Parmetros SX7Gatilhos SX9Relacionamento entre Tabelas SXAPastas Cadastrais apontadas no SX3 SXBConsulta por meio da tecla F3 (Consulta Padro) SXDControle do Schedule de Processos SXESeqncia de Documentos (+1) SXFSeqncia de Documentos (prximo) SXGTamanho padro para campos SXKRespostas das Perguntas (SX1) por Usurio SXOControle de LOGs por Tabela SIXndices dos Arquivos.XNUMenu de Opes dos Mdulos Pasta \SYSTEM
Slide 28
SA- Cadastros SB- Estoques SC- Previses de E/S SD- Mov. De Estoque SE- Financeiro SF- Fiscal SG- Estruturas SH- Carga de Mquina SI- Contbil SJ- Estatsticas SM- Miscelneas SN- Ativo Fixo SO-Assist. Tcnica SP- Ponto Eletrnico SQ-Recr. e Seleo SR-Folha de Pagto ST-Manut. Industrial SU-Telemarketing SV-Concessionrias SW e SY- Export./Import. Q?-Qualidade (Celerina) R?-Recursos Humanos SZ,QZ,RZ- Livres P?-Projetos Especiais M.E.R. Modelo de Entidades e Relacionamento Famlias de Arquivos de Dados Pasta \DATA ou Banco de Dados
Slide 29
Principais Arquivos de Dados PrefixoDescrio SA1Cadastro de Clientes SA2Cadastro de Fornecedores SA3Cadastro de Vendedores SB1Cadastro de Produtos SB2Saldos dos Produtos por Almoxarifado SB5Dados Complementares de Produtos SC1Solicitaes de Compras SC5Cabealho dos Pedidos de Venda SC6Itens dos Pedidos de Venda SC7Pedidos de Compras SD1Itens das Notas Fiscais de Entrada SD2Itens das Notas Fiscais de Sada SD3Movimentaes Internas de Produtos SE1Ttulos a Receber SE2Ttulos a Pagar SF1Cabealho das Notas Fiscais de Entrada SF2Cabealho das Notas Fiscais de Sada SI1Plano de Contas SI2Lanamentos Contbeis
Slide 30
Arquivos de Dados por Empresa O sistema permite controlar at 99 Empresas. Cada Empresa pode ter at 99 Filiais: Empresa 01 Filiais01Empresa 02 Filiais0102...99 Para cada Empresa criado um jogo de arquivos: SXXnn0 onde:XX = Prefixo do arquivo nn = Empresa Exemplo: Empresa 99 -> SA1990, SA2990, SB1990...
Slide 31
Arquivos de Dados Nomenclatura dos campos: Arquivo SA1:A1_FILIALSA2:A2_FILIALSB1:B1_FILIALQA1:QA1_FILIAL A1_CODA2_CODB1_CODQA1_COD A1_NOMEA2_NOMEB1_DESCQA1_DESC A1_ENDA2_ENDB1_TIPO Filiais Os dados das Filiais ficam dentro do arquivo de cada Empresa. Todo arquivo, exceto SM2, tem um campo XX_Filial que identifica a Filial: 01 02
Slide 32
Arquivos de Dados Compartilhado registros compartilhados entre as filiais Campo Filial: em branco Exclusivo o registro exclusivo da filial Campo Filial: cdigo da Filial (varivel cFilAnt) C5_FILIAL C5_NUM C5_EMISSAO C5_CLIENTE C5_PROD C5_VALOR 01 000001 01/01/04 000002 11.11014 15.000,00 01 000005 01/01/04 000023 13.13000 5.600,00 01 000007 20/01/04 000016 15.15140 5.600,00 02 000001 01/01/04 000002 11.11014 15.000,00 02 000005 01/01/04 000023 13.13000 5.600,00 02 000007 20/01/04 000016 15.15140 5.600,00 03 000001 01/01/04 000002 11.11014 15.000,00 03 000005 01/01/04 000023 13.13000 5.600,00 03 000007 20/01/04 000016 15.15140 5.600,00 A1_FILIAL A1_COD A1_NOME 000015 FABRICA DE TINTAS E VERINIZES LTDA /SP 000016 TEX MALHAS E CONFECCOES S.A /SP 000001 CLIENTE PADRAO 000020 ARMANDO JOSE FLORES /SC 000007 COMERCIO SOM DO MUNDO /SP xFilial(SA1) xFilial(SC5) cFilAnt Ex: SA1 - Compartilhado Ex: SC5 - Exclusivo Modo de Acesso
Slide 33
Arquivos de ndices REGISTRO A1_FILIAL A1_COD A1_NOME 01 000015 FABRICA DE TINTAS E VERINIZES LTDA /SP 02 000016 TEX MALHAS E CONFECCOES S.A /SP 03 000001 CLIENTE PADRAO 04 000020 ARMANDO JOSE FLORES /SC 05 000007 COMERCIO SOM DO MUNDO /SP Todo arquivo precisa ter pelo menos um ndice ndice Primrio: acesso direto ao registro verificao de chave duplicada Ordenao de registros CHAVE REGISTRO 000001 03 000007 05 000015 01 000016 02 000020 04 ndices
Slide 34
Arquivos de ndices Um arquivo pode ter at 35 ndices (1...9, A...Z) dbSetOrder(n), onde n = 1...35 funo para selecionar o ndice. Alm dos ndices originais, usurios podem incluir seus prprios ndices. Caso a Microsiga inclua novos ndices, os do usurio sero renumerados. ndices Portanto, ndices de usurio devem sempre ter um NickName. Deve-se usar a funo dbOrderNickName(NICKNAME) ndices do sistema, nunca tero NickName. Usa-se dbSetOrder(). SA1 ndices do Sistema1 2... 7 ndice do Usurio8A1_TIPO Nos programas: dbSetOrder(8) novo ndice do Sistema8 ndice do Usurio9A1_TIPO ndice do Usurio8A1_TIPO NickName: TIPO novo ndice do Sistema8 ndice do Usurio9A1_TIPO NickName: TIPO Nos programas: dbOrderNickName(TIPO) X
Slide 35
Parmetros, Tabelas, Perguntas Frmulas - Expresses em AdvPL / User Function Validaes, Gatilhos, Campos de Arquivos User Function via menu Pontos de Entrada Dicionrio de Dados Ativo SigaRPM, Crystal, Excel Customizao
Slide 36
Slide 37
Parmetros: arquivo SX6 cESTNEG := GetMV(MV_ESTNEG) If cESTNEG == S.Or. QtdVenda < B2_Saldo tratamento normal Else tratamento de erro EndIf S 100 200 V S 201 200 V F N 100 200 F V N 201 200 F Customizao Parmetros
Slide 38
Tabelas: arquivo SX5 Tabela 12: Estados do Brasil Tabela 13: CFOP Tabela 33: Estado Civil Customizao Tabelas
