Criando arquivos de trabalho temporários

Função CriaTrab

Usada para cria arquivos de trabalho. Caso lDbf = .T., a função criará um arquivo DBF com o nome e a estrutura definida em aArray. Caso lDbf = .F., a função não criará arquivo de nenhum tipo, apenas fornecerá um nome válido.

Sintaxe:
CriaTrab (aArray, lDbf)

Parâmetros:
aArray – Array multidimensional contendo os campos a criar {Nome, Tipo, Tamanho, Decimal}
lDbf – Determina se o arquivo de trabalho deve ser criado (.T.) ou não (.F.)

Retorna:
ExpC1 – Nome do Arquivo gerado pela função.

Exemplo:

aRBSFest := {{"COD" , "C", 6, 0}, {"NOME", "C", 50, 0}}
cRBSFtrb := criatrab(aRBSFest, .t.)
dbusearea(.t., , cRBSFtrb, "ARQRBSF", .f.)
cRBSFchv := "COD"
index on &cRBSFchv to &cRBSFtrb

Comentários

Postagens mais visitadas deste blog

Status das tabelas: SPED050 e SPED052

STATUS DA TABELA SPED050: Status NFe (campo STATUS) : 1 = NFe Recebida. 2 = NFe Assinada. 3 = NFe com falha no schema XML. 4 = NFe transmitida. 5 = NFe com problemas. 6 = NFe autorizada. 7 = Cancelamento. Status Cancelamento/inutilização (campo STATUSCANC) : 1 = NFe Recebida. 2 = NFe Cancelada. 3 = NFe com falha de cancelamento/inutilização. Status Mail (campo STATUSMAIL) : 1 = A transmitir. 2 = Transmitido. 3 = Bloqueio de transmissão – cancelamento/inutilização. STATUS DO SPED052: 1 = Lote transmitido. 2 = Lote recebido com sucesso. 3 = Lote com erro.

Protheus integrado ao Active Directory (Single SignOn)

Usando a integração do usuário do Protheus com o Active Directory (AD): 1) O ambiente deve estar atualizado (RPO, Update, LIB e Binário). 2) Entre no Configurador / Usuários / Senhas / Política. 3) Na primeira aba, em Parâmetros, defina no como "Habilitar single sign-on" se a integração será obrigatória ou opcional. 4) No combo "Modalidade de Single Sign-on", defina como "Active Directory". Clique em Confirmar. 5) Agora vá ao cadastro do usuário (Usuário / Senhas / Usuários), clique sobre o usuário e clique em Alterar. Na primeira aba (Usuário), selecione a aba Active Directory. 6) Clique duas vezes sobre o campo abaixo de "Domínio", e preencha o domínio da rede. Clique duas vezes sobre o campo abaixo de "Usuário", e preencha o nome de usuário da rede que ficará vinculado a este usuário do Protheus. Clique em Confirmar. Ao entrar no Protheus, já irá aparecer por padrão o dom...

Impressão com imagens no Protheus

Muitas vezes é necessário incluir uma imagem num relatório (uma logomarca por exemplo). Uma das maneiras de se fazer isto, é usar a classe TMSPRINTER() . O programa exemplo abaixo, ilustra bem como fazer. Este usa também a classe TFONT() (o tamanho do fonte leva o sinal de menos) : # include "PROTHEUS.CH" # include "RWMAKE.CH" user function fImprimeG() local oFont08 := tfont():New( 'Courier new' ,, -8, .t.),,; oFont09 := tfont():New( 'Courier new' ,, -9, .t.),,; oFont10 := tfont():New( 'Courier new' ,,-10, .t.) oPrint:=tmsprinter():new( "Impressao Grafica" ) oPrint:setportrait() oPrint:SetpaperSize(9) // PAPEL A4 if .not. oPrint:Setup() // MOSTRA JANELA DE CONFIGURAÇÃO DE IMPRESSAO msgalert( "IMPRESSAO CANCELADA." ) return nil endif // ESTE BLOCO PODE FICAR EM LOOP (DO WHILE, FOR..., ETC.) oPrint:StartPage() // oPrint:sayBitmap(linha, coluna, "C:\SUAPASTA\SUAIMAGEM.BMP", largura, al...

Microsig@ ADVPL

Pesquisar este blog