Exemplo: | #INCLUDE "TOTVS.CH" //--------------------------------------------------------------------------- /*/{Protheus.doc} LjSimpFat Ponto de entrada para verificar se o item será considerado no simples faturamento
@type function @author Varejo @since 14/02/2020 @version P12
@param ParamIxb, array, array dos itens do orçamento
@return lógico, Retorna se deve incluir o item da venda no pedido de simples faturamento /*/ //--------------------------------------------------------------------------- User Function LjSimpFat() Local aArea := GetArea() Local aSl2Prod := aClone(ParamIxb) Local nI := 0 Local nPosProd := Ascan(aSl2Prod[1], {|x| AllTrim(x[1]) == "L2_PRODUTO" }) Local lRet := .T.
// loop em todos os itens da venda For nI := 1 to Len( aSl2Prod ) If AllTrim(aSl2Prod[nI,nPosProd,2]) == "12" lRet := .F. Exit EndIf Next nI
RestArea(aArea) Return lRet |