Histórico da Página

Descrição 

Inclui, altera ou encerra o apontamento de produção.

Observações

Exemplos

User Function TMATA680_INCLUI()

Local nOpc := 3 //inclusão

aadd(aMata680,{"H6_OP", "codigo da op" ,NIL})
aadd(aMata680,{"H6_PRODUTO", "codigo do produto" ,NIL})
aadd(aMata680,{"H6_DTAPONT", "Data final" ,NIL})

MsExecAuto({|x,y|MATA680(x,y)},aMata680,nOpc)

Return Nil

User Function TMATA680_EXCLUI()

Local nOpc := //exclui

aadd(aMata680,{"INDEX",nOrdem ,NIL}) //nOrdem : ordem de pesquisa dos dados.

MsExecAuto({|x,y|MATA680(x,y)},aMata680,nOpc)

Return Nil

User Function TMATA680_ENCERRA()

Local nOpc := 7 // Encerra ordem de produção

aadd(aMata680,{"H6_OP" , SH6->H6_OP ,NIL})
aadd(aMata680,{"H6_PRODUTO" , SH6->H6_PRODUTO ,NIL})
aadd(aMata680,{"H6_SEQ" , SH6->H6_SEQ ,NIL})

MsExecAuto({|x,Y|MATA680(aMata680,nOpc)})

Return Nil