Páginas filhas
  • MATA089 - Smart TIO Registration (AUTOMATIC ROUTINE)

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

CONTENTS

Índice
exclude

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


04. EXAMPLE

...


Bloco de código

...

language

...

 

...

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

java
themeMidnight
title

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("

...

error") cErro:=MostraErro()

...


    Else

...


        conout("Ok")

...


    Endif

...


Return

...