- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Campo numérico no array
×
Linguagem de Programação ADVPL
Perguntas Campo numérico no array
- andresan
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 8
- Obrigados Recebidos: 0
11 anos 7 meses atrás #12571
por andresan
Campo numérico no array foi criado por andresan
Pessoal, boa tarde!
Estou precisando da ajuda de vocês!
Tenho um campo numérico na matriz que não estou conseguindo fazer ele ficar como está definido na tabela (Numérico com 6,0). Na tela ela fica apenas com 01 dígito e não seis como definido na tabela!!
A variável é a NTOTPA.
Abaixo parte do código para um melhor entendimento de minha dúvida
dData := MsDate()
cVeic := Space(08)
cCarga := Space(08)
cUsu := Space(13)
nTotpa := 0.00
Obs := Space(70)
//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Array com descricao dos campos do Cabecalho ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
aC:={}
AADD(aC,{"cCarga" ,{15,010},"Nr da Carga ","99999999",!Empty(cCarga),,})
AADD(aC,{"cVeic" ,{15,100},"Placa Veiculo",,!Empty(cVeic),,})
AADD(aC,{"dData" ,{15,200},"Data da Saida",,,,.F.})
//AADD(aC,{"nTotpa" ,{40,010},"Total Pallets",,,,.T.})
AADD(aC,{"obs" ,{40,100},"Observacao ","@!",,,.T.})
Agradeço antecipadamente,
André
Estou precisando da ajuda de vocês!
Tenho um campo numérico na matriz que não estou conseguindo fazer ele ficar como está definido na tabela (Numérico com 6,0). Na tela ela fica apenas com 01 dígito e não seis como definido na tabela!!
A variável é a NTOTPA.
Abaixo parte do código para um melhor entendimento de minha dúvida
dData := MsDate()
cVeic := Space(08)
cCarga := Space(08)
cUsu := Space(13)
nTotpa := 0.00
Obs := Space(70)
//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Array com descricao dos campos do Cabecalho ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
aC:={}
AADD(aC,{"cCarga" ,{15,010},"Nr da Carga ","99999999",!Empty(cCarga),,})
AADD(aC,{"cVeic" ,{15,100},"Placa Veiculo",,!Empty(cVeic),,})
AADD(aC,{"dData" ,{15,200},"Data da Saida",,,,.F.})
//AADD(aC,{"nTotpa" ,{40,010},"Total Pallets",,,,.T.})
AADD(aC,{"obs" ,{40,100},"Observacao ","@!",,,.T.})
Agradeço antecipadamente,
André
Por favor Acessar ou Registrar para participar da conversa.
- kanaamlrr
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
11 anos 7 meses atrás #12572
por kanaamlrr
Respondido por kanaamlrr no tópico Campo numérico no array
Cara, isso é um ponto de entrada?
Se sim, qual PE é?
você já tentou definir da seguinte forma:
AADD(aC,{"nTotpa" ,{06,000},"Total Pallets","@999999",,,.T.})
depois posta pra gente se deu certo.
Se sim, qual PE é?
você já tentou definir da seguinte forma:
AADD(aC,{"nTotpa" ,{06,000},"Total Pallets","@999999",,,.T.})
depois posta pra gente se deu certo.
Por favor Acessar ou Registrar para participar da conversa.
- andresan
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 8
- Obrigados Recebidos: 0
11 anos 7 meses atrás #12574
por andresan
Respondido por andresan no tópico Campo numérico no array
Esta é a rotina de Modelo 2!
Assim não deu certo
Ele continua com o mesmo erro. Este {40,010} seria a posição na tela e quando alterei para sua linha ele ficou no topo da tela!
Eu tentei usar o comando SIZE mas, também dá o mesmo erro, não sei se usei de forma correta o comando ou não é o SIZE a solução. Ele só fica no tamanho original quando fica no browse porque ele é o campo e não a variável do cabeçalho.
Assim não deu certo
Ele continua com o mesmo erro. Este {40,010} seria a posição na tela e quando alterei para sua linha ele ficou no topo da tela!
Eu tentei usar o comando SIZE mas, também dá o mesmo erro, não sei se usei de forma correta o comando ou não é o SIZE a solução. Ele só fica no tamanho original quando fica no browse porque ele é o campo e não a variável do cabeçalho.
Por favor Acessar ou Registrar para participar da conversa.
- kanaamlrr
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
- kanaamlrr
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
- andresan
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 8
- Obrigados Recebidos: 0
11 anos 7 meses atrás #12577
por andresan
Respondido por andresan no tópico Campo numérico no array
Kanaãm!
Deu certo!!!!!!! "@ER"
Declarei assim:
nOpcx:=3
//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Montando aHeader ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
dbSelectArea("Sx3")
dbSetOrder(1)
dbSeek("SZE")
nUsado:=0
aHeader:={}
While !Eof() .And. (x3_arquivo == "SZE")
IF X3USO(x3_usado) .AND. cNivel >= x3_nivel
nUsado:=nUsado+1
AADD(aHeader,{ TRIM(x3_titulo), x3_campo, x3_picture,x3_tamanho, x3_decimal,,x3_usado, x3_tipo, x3_arquivo, x3_context})
Endif
dbSkip()
End
Valeu mesmo!!!!!!!
Deu certo!!!!!!! "@ER"
Declarei assim:
nOpcx:=3
//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Montando aHeader ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
dbSelectArea("Sx3")
dbSetOrder(1)
dbSeek("SZE")
nUsado:=0
aHeader:={}
While !Eof() .And. (x3_arquivo == "SZE")
IF X3USO(x3_usado) .AND. cNivel >= x3_nivel
nUsado:=nUsado+1
AADD(aHeader,{ TRIM(x3_titulo), x3_campo, x3_picture,x3_tamanho, x3_decimal,,x3_usado, x3_tipo, x3_arquivo, x3_context})
Endif
dbSkip()
End
Valeu mesmo!!!!!!!
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Campo numérico no array
Tempo para a criação da página:0.127 segundos