MATA089 - Smart TIO Registration (AUTOMATIC ROUTINE)

 

CONTENTS

01. OVERVIEW

Product Line:

Microsiga Protheus®

Industry:

Services

Module:

SIGAFIS - Tax Records

Function:

MATA089 - Smart TIO

Scope:

Microsiga Protheus 12

Versions:

Microsiga Protheus 12

Operating Systems:

All

Compatible with the following databases:

All

Access Level:

Level 1 (Customer Access)

Languages:

All

02 DESCRIPTION:

This routine is intended to perform the automatic entering of Smart TIO Registration using the automatic routine mechanism.

03. TECHNICAL INFORMATION

 
Automatic routine - MATA089 ( \[xAutoCab\], \[nCallOpcx\] ) --> Nil
Return: Nil

ExecAuto - MATA089

Name

Type

Description

Default

Mandatory

Reference

<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id="7c15b77e-bc0c-48f3-9cc0-fcba2c2940ac"><ac:plain-text-body><![CDATA[

 

[xAutoCab],

Array of Record

Header

 

X

 

]]></ac:plain-text-body></ac:structured-macro>

<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id="c015224c-62b1-4e5a-8b17-7e9f4df720b5"><ac:plain-text-body><![CDATA[

 

[nCallOpcx]

Array of Record

Options Add, Edit, View, etc.

 

X

 

]]></ac:plain-text-body></ac:structured-macro>

04 EXAMPLE

 
ExecAuto - MATA089
#Include "RwMake.CH"
#include "tbiconn.ch"
User Function TMata089()
    Local aCab := {}
    private lMsErroAuto := .F.
    PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01" MODULO "FIS"
    aCab:= { {"FM_TIPO" ,"01" ,Nil}}
    // Code of operation type or
    // material transaction. (DJ Table)
    MSExecAuto({|x,y| Mata089(x,y)},aCab,3)
    // Inclusion
    conout("Just performed the automatic routine of the Smart TIO Registration")
    //-- Return of error in routine execution
    If lMsErroAuto
       conout("erro") cErro:=MostraErro()
    Else
        conout("Ok")
    Endif
Return