- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- advpl: explosão automática da OP - MSEXECAUTO MATA650
×
Linguagem de Programação ADVPL
Perguntas advpl: explosão automática da OP - MSEXECAUTO MATA650
- lucio.ethica
- Autor do Tópico
- Desconectado
- Membro Iniciado
-
Menos
Mais
- Postagens: 2
- Obrigados Recebidos: 0
11 anos 6 meses atrás #14044
por lucio.ethica
Alguém sabe orientar se é possível forçar a explosão da OP após a execução da MSEXECAUTO MATA650?
(MSExecAuto({|x,y| mata650(x,y)},aVetor,3))
(MSExecAuto({|x,y| mata650(x,y)},aVetor,3))
Por favor Acessar ou Registrar para participar da conversa.
- henry.charriere
- Desconectado
- Membro Platina
-
Menos
Mais
- Postagens: 492
- Obrigados Recebidos: 0
11 anos 5 meses atrás #14257
por henry.charriere
Respondido por henry.charriere no tópico advpl: explosão automática da OP - MSEXECAUTO MATA650
cNumOp := GetNumSC2()
aVetor :={ {"C2_NUM" ,cNumOp ,NIL},;
{"C2_ITEM" ,"01" ,NIL},;
{"C2_SEQUEN" ,"001" ,NIL},;
{"C2_PRODUTO" ,SZC->ZC_COD ,NIL},;
{"C2_LOCAL" ,SZC->ZC_ALMOX ,Nil},;
{"C2_QUANT" ,SZC->ZC_QTD ,NIL},;
{"C2_CC" ,cGet1 ,NIL},;
{"C2_DATPRI" ,Stod(SZC->ZC_DATA) ,NIL},;
{"AUTEXPLODE","S" ,NIL},;
{"C2_DATPRF" ,Stod(SZC->ZC_DATA) ,NIL}}
MSExecAuto({|x,y| mata650(x,y)},aVetor,3) //Inclusao
Essa opção faz explodir: {"AUTEXPLODE","S" ,NIL},;
aVetor :={ {"C2_NUM" ,cNumOp ,NIL},;
{"C2_ITEM" ,"01" ,NIL},;
{"C2_SEQUEN" ,"001" ,NIL},;
{"C2_PRODUTO" ,SZC->ZC_COD ,NIL},;
{"C2_LOCAL" ,SZC->ZC_ALMOX ,Nil},;
{"C2_QUANT" ,SZC->ZC_QTD ,NIL},;
{"C2_CC" ,cGet1 ,NIL},;
{"C2_DATPRI" ,Stod(SZC->ZC_DATA) ,NIL},;
{"AUTEXPLODE","S" ,NIL},;
{"C2_DATPRF" ,Stod(SZC->ZC_DATA) ,NIL}}
MSExecAuto({|x,y| mata650(x,y)},aVetor,3) //Inclusao
Essa opção faz explodir: {"AUTEXPLODE","S" ,NIL},;
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- advpl: explosão automática da OP - MSEXECAUTO MATA650
Tempo para a criação da página:0.073 segundos