Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Silvia Regina Nazareno Morato

Gravado em

comparado com

Nova versão 2

changes.mady.by.user admin

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
GPEXINSCR - Atualiza informações da empresafilial
GPEXINSCR - Atualiza informações da empresafilial

Ponto-de-Entrada: GPEXINSCR - Atualiza informações da empresa/filial
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Versões: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Brasil
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil)
Descrição: 
Poonto de Entrada criado após a criação do array com os dados da empresa/filial, que permite a alteração das informações da empresa/filial.
Eventos
 
Programa Fonte 
GPEXFUN.PRX
Sintaxe

GPEXINSCR - Atualiza informações da empresa/filial ( [ aInfo[] ] )

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
aInfo[]Array of RecordArray que contém as informações da Empresa/Filial.
Retorno
    ()
Observações
Dentro da função fInfo(), no fonte GPEXFUN.PRX, foi adicionado um Ponto de Entrada que permite alterar os dados que estão dentro do array da Empresa/Filial.
A alteração efetuada será válida todas as vezes em que for utilizada a rotina FINFO(), que carrega as informações da Empresa/Filial.

O array modificado é o aInfo[ 24 ] , onde:

// 01 - Filial
// 02 - Reduz Filial
// 03 - Nome Completo
// 04 - Endereco Cobranca
// 05 - Cidade Cobranca
// 06 - Estado Cobranca
// 07 - Cep Cobranca
// 08 - Cgc Cobranca
// 09 - Insc Cobranca
// 10 - Telefone
// 11 - Fax Char14
// 12 - Producao RuralChar01  - "S" ou "N""
// 13 - Bairro Cobranca Char20
// 14 - Compl. End. CobrancaChar12
// 15 - Tipo de InscricaoNum01  -  1-CEI, 2-CGC, 3-CPF, 4-INCRA
// 16 - CNAEChar05
// 17 - FPASChar04
// 18 - Acid. de TrabalhoChar08
// 19 - C¢digo MunicipioChar07
// 20 - Natureza JuridicaChar04
// 21 - Data Base Pgto. RAISChar02
// 22 - N§ de ProprietariosChar02
// 23 - Se Modificou Endere‡o Char01  - "S" ou "N"
// 24 - Se Modificou INSC/CGC Char01  - "S" ou "N"
// 25 - Causa da Mudan‡aChar01
// 26 - INC./CGC AnteriorChar14
Exemplos 
#include "rwmake.ch"User Function GPEXINSCR()if  SM0->M0_Codigo == "01" .and. SM0->M0_CODFIL == "01"aInfo[08] := '99999999999999'aInfo[15] := 2endif            Return(aInfo)
Variáveis
NomeTipoEscopoPode Alterardescrição
Array of RecordGlobalNão