Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Descrição

O ponto de entrada FRGPSFOR permite customizar as informações que serão demonstradas na guia GPS, como razão social, código CNPJ/CPF/CEI e demais informações cadastrais. O código de barras será gerado conforme as informações customizadas.

Observações

Exemplos

User Function FRGPSFOR()
Local aRet := {}
Local aGPS := aClone(ParamIxb)

/*
A variável PARAMIXB é um array que contém a seguinte estrutura:
1 - Número do CNPJ/CPF
2 - Razão Social
3 - Nº do Telefone
4 - Endereço (Logradouro + Número)
5 - Bairro
6 - CEP
7 - Município
8 - UF
9 - Recno da tabela SA2 (Fornecedor) do registro posicionado
*/

SA2->(dbGoTo(aGPS9aGPS[9]))


If !Empty(SA2->A2_U_CDCEI)
aAdd(aRet,Transform(SA2->A2_U_CDCEI,"@R ##.###.#####/##"))
Else
aAdd(aRet,aGPS1aGPS[1])
EndIf

aAdd(aRet,aGPS2aGPS[2])
aAdd(aRet,aGPS3aGPS[3])
aAdd(aRet,aGPS4aGPS[4])
aAdd(aRet,aGPS5aGPS[5])
aAdd(aRet,aGPS6aGPS[6])
aAdd(aRet,aGPS7aGPS[7])
aAdd(aRet,aGPS8aGPS[8])

Return aRet

  

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus10 e Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

ParamIXB
A variável PARAMIXB é um array que contém a seguinte estrutura:
1 - Número do CNPJ/CPF
2 - Razão Social
3 - Nº do Telefone
4 - Endereço (Logradouro + Número)
5 - Bairro
6 - CEP
7 - Município
8 - UF
9 - Recno da tabela SA2 (Fornecedor) do registro posicionado

10- Numero do CEI (caso seja informado no ponto de entrada FINGPSPRC na posição 7)

Retorno

aRet
Deve ser retornado um array com a seguinte estrutura
1 - Número do CNPJ/CPF
2 - Razão Social
3 - Nº do Telefone
4 - Endereço (Logradouro + Número)
5 - Bairro
6 - CEP
7 - Município
8 - UF

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

FINRGPS.PRW