#INCLUDE "TBICONN.CH" #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 .T. |