Estou tentando usar o comando set_block_property mas estou com um problema que não sei se tem solução usando esse set_block_property.
Tela um form com cabeçalho e detalhes.
Ambos são blocos base-table.
Tenho tb uma tela separadamente com colunas para consulta desses blocos base-table.
Criei duas variáveis uma l_vWhere e outra l_vWherel uma recebe cabeçalho e outra os detalhes o problema é quando consulto os detalhes e não há dados mesmo assim o cabeçalho é consultado. então ele me traz a linha de cabeçalho mas não o detalhe isso não acontece ao inverso... quando consulto o cabeçalho as linhas se comportam normalmente.
Tem alguma forma de corrigir isso sem ter que criar uma view... por que tiver que criar uma view ... vou perder tudo e ter que refazer tudo em no-base-table.
abs
segue script:
-- Conta cargo
IF :AP_LETTER_EXC_V.BANK_ACCOUNT_NAME IS NOT NULL THEN
--
IF l_vWhere IS NOT NULL THEN
l_vWhere := l_vWhere || ' AND ';
END IF ;
l_vWhere := NVL(l_vWhere, ' ') || ' BANK_ACCOUNT_NAME = '|| '''' ||:AP_LETTER_EXC_V.BANK_ACCOUNT_NAME||'''';
--
ELSE
IF l_vWhere IS NOT NULL THEN
l_vWhere := l_vWhere || ' AND ';
END IF ;
l_vWhere := NVL(l_vWhere, ' ') || ' BANK_ACCOUNT_NAME = BANK_ACCOUNT_NAME ';
END IF;
-- Pago Confirmado
IF :AP_LETTER_EXC_V.PAGAMENTO_CONFIRMADO IS NOT NULL THEN
--
IF l_vWherel IS NOT NULL THEN
l_vWherel := l_vWherel || ' AND ';
END IF ;
l_vWherel := NVL(l_vWherel, ' ') || ' PAYMENT_PRIORITY = '|| '''' ||:AP_LETTER_EXC_V.PAGAMENTO_CONFIRMADO||'''';
--
ELSE
IF l_vWherel IS NOT NULL THEN
l_vWherel := l_vWherel || ' AND ';
END IF ;
l_vWherel := NVL(l_vWherel, ' ') || ' NVL(PAYMENT_PRIORITY,''N'') = NVL(PAYMENT_PRIORITY, ''N'') ';
END IF;
SET_BLOCK_PROPERTY('AP_LET_EXC_HEAD', DEFAULT_WHERE, l_vWhere) ;
SET_BLOCK_PROPERTY('AP_LET_EXC_LINE', DEFAULT_WHERE, l_vWherel) ;
GO_BLOCK('AP_LET_EXC_HEAD');
--CLEAR_BLOCK;
SYNCHRONIZE ;
EXECUTE_QUERY ;
GO_ITEM('AP_LET_EXC_LINE.NR_LINE');