Lógica da Rotina de Login para Sistemas Multi-Empresa ou Multi-Planos

De BISAWiki

Descrição:

• Esta é a rotina que seleciona qual a empresa/plano que vai ser utilizado pelo Sistema. Na realidade, é selecionado o .MDB em que reside os dados da empresa/plano.

A Rotina:

• Ela deverá receber quatro argumentos (strings):
  • Str1: que conterá a parte fixa da nomenclatura dos arquivos que o sistema utilizará, e;
  • Str2: que conterá o nome da tabela a se pegar o nome do plano/empresa, e;
  • Str3: com o nome do campo que contém o nome do plano/empresa, e;
  • Str4: com a descrição textual do arquivo (para ser usado nas mensagens.

A título de Exemplo:

• O Sistema de Plano de Ação deve passar como parâmetros:

"BI_PAW", "APAWPLAN", "PLAN_Descricao", "Plano"

• O Sistema de Contabilidade deverá passar como parâmetros:

"BI_CTW", "ACTWEMPR", "EMPR_Nome", "Empresa"

• O de Folha de Pagamento deverá passar como parâmetros:

"BI_APW", "AAPWEMPR", "EMPR_Nome", "Empresa"

• Se Existir no diretório do PAW (definido no .INI) arquivos com o nome Str1xx.MDB

Carregar num arquivo temporário a relação de Str1xx.MDB que encontrou no diretório, 
lendo o campo enviado, na tabela enviada como parâmetro.
Fim Se

• No arquivo temporário, acrescer um registro com a string <CRIAR UM(A) NOVO(A)> + Str4

Habilitar num Combo Box este arquivo temporário

Se <Criar Novo(a)>
   Solicitar Código a Criar
Fim Se

• Passar Str1xx.MDB (xx Será o Código Escolhido pelo Usuário) para a rotina DBNETUSE para que ela crie/verifique a estrutura do banco de dados

• O Programa deve consistir a Tabela e o Campo Descrição, que se estiverem vazios, deve entrar na manutenção dos mesmos e não sair enquanto não preenchidos.

Detalhes:

• Código do Plano é Dispensável, ele é parte do nome do arquivo. Se o usuário desejar mudar o "código", é só renomear o arquivo.
• Todo arquivo de Empresa, Plano, Só conterá um Registro