Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Budget Planning and Control (SIGAPCO) |
Function: | PCOA310 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
The entry point PCOA3103 is used in the context of Entry Reprocessing to handle and adjust the selection query of the data to be reprocessed. It allows the application of specific filters on the data range of the source table, based on the rules of the entry point to be reprocessed, ensuring that only the relevant data are included in the reprocessing. This entry point must return the final query, which will be executed, meeting the specific filtering requirements and criteria set by the user.
If ExistBlock( "PCOA3103" )
//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//P_E³ Entry Point used for adding user functions to ³
//P_E³ the preparation of query to reprocess the Entries ³
//P_E³ Parameters : cProcesso, cItem, aClone(aRet), cAliasEntid, cQuery ³
//P_E³ Return : cQuery expression of query ³
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
cQuery := ExecBlock( "PCOA3103", .F., .F.,{cProcesso,cItem,aClone(aRet),cAliasEntid,cQuery})
EndIf
User Function PCOA3103() Local cProc := ParamIXB[1] Local cItem := ParamIXB[2] Local aParam := ParamIXB[3] Local cAlias := ParamIXB[4] Local cQuery := ParamIXB[5] If cProc+cItem == '00008201' cQuery += " AND CT2_DATA BETWEEN '"+DTOS(aParam[2])+"' AND '"+DTOS(aParam[3])+"' " cQuery += " AND CT2_DC<>'4' " cQuery += " AND CT2_MOEDLC='01' " EndIf Return cQuery
Important