- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Numero sequencial para campo de itens
×
Linguagem de Programação ADVPL
Perguntas Numero sequencial para campo de itens
- VAGNER
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 5
- Obrigados Recebidos: 0
11 anos 5 meses atrás #15142
por VAGNER
Numero sequencial para campo de itens foi criado por VAGNER
Bom dia!
Criei uma rotina customizada com cabeçalho e GetDados para os itens e dentro do GetDados tem um campo item igual na rotina de solicitações de compra e pedidos de venda. Minha duvida é como trazer o numero do item automático, igual nas rotinas que citei. Quando o usuário for fazer uma inclusão já vir com o numero 01 no item e a medida que for adicionando itens ir acrescendo esse valor. Desde já agradeço a atenção de todos.
Criei uma rotina customizada com cabeçalho e GetDados para os itens e dentro do GetDados tem um campo item igual na rotina de solicitações de compra e pedidos de venda. Minha duvida é como trazer o numero do item automático, igual nas rotinas que citei. Quando o usuário for fazer uma inclusão já vir com o numero 01 no item e a medida que for adicionando itens ir acrescendo esse valor. Desde já agradeço a atenção de todos.
Por favor Acessar ou Registrar para participar da conversa.
- diegoo_martins
- Desconectado
- Membro Dourado
Menos
Mais
- Postagens: 175
- Obrigados Recebidos: 0
8 anos 7 meses atrás #30497
por diegoo_martins
Respondido por diegoo_martins no tópico Numero sequencial para campo de itens
Vagner, bom dia.
Conseguiu a solução?
Também estou precisando fazer esta manutenção.
Att,
Conseguiu a solução?
Também estou precisando fazer esta manutenção.
Att,
Por favor Acessar ou Registrar para participar da conversa.
- rodrigolparaujo
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 78
- Obrigados Recebidos: 0
8 anos 4 meses atrás #30971
por rodrigolparaujo
Respondido por rodrigolparaujo no tópico Numero sequencial para campo de itens
Olá, eu uso o MsNewGetDados (
tdn.totvs.com/display/public/mp/MsNewGetDados
)
oGetDados:= MsNewGetDados():New(aPosObj[2,1],aPosObj[2,2],aPosObj[2,3],aPosObj[2,4],GD_UPDATE,"AllwaysTrue","AllwaysTrue","+ZZK_ITEM",aAltera,,999,"AllwaysTrue","","AllwaysTrue",oPanel4,aHeaderEx,aColsEx)
onde você lê "+ZZK_ITEM" é o campo que receberá o sequencial
Usando MsGetDados ( tdn.totvs.com/display/public/mp/MsGetDados )
oGet := MsGetDados():New(32,1,094,316,nOpcx,"AllwaysTrue","AllwaysTrue","+CL_ITEM",.T.)
oGetd:=MsGetDados():New(aPosObj[2,1],aPosObj[2,2],aPosObj[2,3],aPosObj[2,4],nOpc,"A410LinOk","A410TudOk","+C6_ITEM/C6_Local/C6_TES/C6_CF/C6_PEDCLI",.T.,If(lGCT,aPedCpo[2],If(!Empty(SC5->C5_PEDEXP) .AND. GetMV("MV_EEC0023",,.F.),FAT2CposInt("SC6"),NIL)),nColFreeze,,ITENSSC6*IIF(MaGrade(),1,3.33),"A410Blq()",,,"A410ValDel()",,lFreeze)
O parametro cIniCpos do componente é onde vc coloca o nome do campo, mas com um sinal de "+" antes para o incremento
oGetDados:= MsNewGetDados():New(aPosObj[2,1],aPosObj[2,2],aPosObj[2,3],aPosObj[2,4],GD_UPDATE,"AllwaysTrue","AllwaysTrue","+ZZK_ITEM",aAltera,,999,"AllwaysTrue","","AllwaysTrue",oPanel4,aHeaderEx,aColsEx)
onde você lê "+ZZK_ITEM" é o campo que receberá o sequencial
Usando MsGetDados ( tdn.totvs.com/display/public/mp/MsGetDados )
oGet := MsGetDados():New(32,1,094,316,nOpcx,"AllwaysTrue","AllwaysTrue","+CL_ITEM",.T.)
oGetd:=MsGetDados():New(aPosObj[2,1],aPosObj[2,2],aPosObj[2,3],aPosObj[2,4],nOpc,"A410LinOk","A410TudOk","+C6_ITEM/C6_Local/C6_TES/C6_CF/C6_PEDCLI",.T.,If(lGCT,aPedCpo[2],If(!Empty(SC5->C5_PEDEXP) .AND. GetMV("MV_EEC0023",,.F.),FAT2CposInt("SC6"),NIL)),nColFreeze,,ITENSSC6*IIF(MaGrade(),1,3.33),"A410Blq()",,,"A410ValDel()",,lFreeze)
O parametro cIniCpos do componente é onde vc coloca o nome do campo, mas com um sinal de "+" antes para o incremento
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Numero sequencial para campo de itens
Tempo para a criação da página:0.124 segundos