INDEX TEMPDV01 STR(CP_DIVISAO,3)+STR(CP_COD_FOR,4)+DTOS(CP_DT_VENC)
FILTRO CP_DT_VENC>=Z_DE .AND. CP_DT_VENC<=Z_ATE
VARIAVEL Z_TIPOLST="VENCIMENTOS"

INCLUDE CP00.LST

VARIAVEL z_opclst="0"
T3,35,Opcao de Listagem:,8,z_opclst,9
T4,38,0..Todos os titulos
T5,38,1.Apenas os Abertos
T6,38,2.. Apenas os Pagos
FILTRO Z_OPCLST="0".OR.(z_opclst="1".and.day(cp_dt_lqd)=0).or.(z_opclst="2".and.day(cp_dt_lqd)>0)
