Páginas filhas
  • CT175GRV - Creates adjustment entries -- 109642

Entry-Points: CT175GRV - Creates adjustment entries


Scope:

Microsiga Protheus 10, Microsiga Protheus 11

Versions:

Microsiga Protheus 10, Microsiga Protheus 11

Compatible Countries:

All

Operating Systems:

All

Compatible with the Databases:

All

Languages:

Portuguese (Brazil) , Portuguese (Portugal) , Spanish , English


Description:

This P.E. creates adjustment entriese   

Event

It happens in the routine that creates adjustment entries.                                

Source Program

CTBA175.PRW

Syntax

CT175GRV - Creates adjustment Entries ( [ aClone(aCab) ], [ aClone(aTotItem) ] ) --> aRetorno

Parameters:



Name



Type



Description



Default



Mandatory



Reference



aClone(aCab)



Array of Record



Copy of the cab matrix












aClone(aTotItem)



array_of_record



Copy of the matrix with item totals











Return

aRetorno(array_of_record)

Collection with adjustment entries

Examples

If lCt175GrCT2          aRetorno    :=      ExecBlock('CT175GRV',.F.,.F.,{aClone(aCab),aClone(aTotItem)})            aCab        :=    aClone(aRetorno[1])           aTotItem    :=    aClone(aRetorno[2])           aRetorno    :=    {}          Endif             IncProc(STR0036) //"Creating entries "      MSExecAuto({|x,y,Z| Ctba102(x,y,Z)},aCab,aTotItem,3)       aTotItem    :=    {}          If lMsErroAuto          DisarmTransaction()           MostraErro()            Return .F.  Endif             nBase       :=    nX