Esta rotina tem a finalidade de executar automaticamente o MATA930, Reprocessamento dos Livros Fiscais.
Para utilização desta rotina, necessitamos apenas do Array para preenchimento dos dados do Wizard da rotina e de uma varável lógica indicando se o reprocessamento será ou não via rotina automática
#INCLUDE "PROTHEUS.CH"
#INCLUDE "TBICONN.CH"
User Function MyMata930()
Local aParam := array(11)
Local lRotAut := .t.
PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01" MODULO "FIS"
aParam[1] := '01/01/11' //Data Inicial
aParam[2] := '31/01/11' //Data Final
aParam[3] := 1 //1-Entrada 2-Saída 3-Ambos
aParam[4] := '' //Nota Fiscal Incial
aParam[5] := 'ZZZZZZ' //Nota Fiscal Final
aParam[6] := '' //Série Incial
aParam[7] := 'ZZZ' //Série Final
aParam[8] := '' //Cli/For Inicial
aParam[9] := 'ZZZZZZ' //Cli/For Final
aParam[10] := '' //Loja Incial
aParam[11] := 'ZZ' //Loja Final
MATA930(lRotAut,aParam)
RESET ENVIRONMENT
Return