Perguntas Legenda

Olá pessoal, sou novo com advpl.
Preciso criar uma legenda para pedidos de faturamento parcial, vi que existe o ponto de entrada MA410COR, porém qual a condição para que seja considerado como parcial?

Obrigado.

Oi Felipe,

Fature um pedido parcialmente e veja como fica a tabela SC5. De uma olhada aqui;

www.supeerp.com/forum/display_printer_th...rumID=1&TopicID=7050
tdn.totvs.com/display/public/mp/MA410COR...+do+status+do+pedido

Opa,
fiz isso aqui, só que fica tudo de uma cor só

User Function MA410COR(aCores)
Local aCor:={}
dbSelectArea("SC6")
dbGoTop()

aCor:={ { "SC6->C6_QTDENT < SC6->C6_QTDVEN ",'BR_PRETO'},;
{ "!Empty(C5_NOTA) .Or. C5_LIBEROK=='E' .And. Empty(C5_BLQ)" ,'DISABLE'},;
{ "!Empty(C5_LIBEROK).And. Empty(C5_NOTA).And. Empty(C5_BLQ)",'BR_AMARELO'},;
{ "C5_BLQ == '1'",'BR_AZUL'},;
{ "C5_BLQ == '2'",'BR_LARANJA'},;
{ "Empty(C5_LIBEROK).And.Empty(C5_NOTA) .And. Empty(C5_BLQ)",'ENABLE'}}


Return(aCor)

consegui fazer assim, só que quando o pedido tem mais de um item não respeita a condição

User Function MA410COR(aCores)
Local aCor:={}

aCor:={ {"SC9->C9_QTDLIB <> SC6->C6_QTDVEN .And. Empty(C5_NOTA) .And. C5_NUM $ SC9->C9_PEDIDO",'BR_PRETO'},;
{"!Empty(C5_NOTA) .Or. C5_LIBEROK=='E' .And. Empty(C5_BLQ)" ,'DISABLE'},;
{"!Empty(C5_LIBEROK).And. Empty(C5_NOTA).And. Empty(C5_BLQ)",'BR_AMARELO'},;
{"C5_BLQ == '1'",'BR_AZUL'},;
{"C5_BLQ == '2'",'BR_LARANJA'},;
{"Empty(C5_LIBEROK).And.Empty(C5_NOTA) .And. Empty(C5_BLQ)",'ENABLE'}}


Return(aCor)