Hi,
Can anyone give a help on this what am I doing as wrong, please?
This assignment does not make any effect - The Query keeps showing all records of the table.
/***************************************************************/
DEF VAR c-fieldname AS CHAR NO-UNDO.
DEF VAR c-value AS CHAR NO-UNDO.
ASSIGN f-promno
f-pcode.
ASSIGN c-fieldname = "promot.prom-no:U,promot.p-code:U"
c-value = f-promno:SCREEN-VALUE + CHR(1) + f-pcode:SCREEN-VALUE + CHR(1).
IF f-promno:SCREEN-VALUE <> "" THEN DO:
DYNAMIC-FUNCTION('assignQuerySelection':U IN h_bwgo55-sdoprom,
c-fieldname,
c-value,"=":U).
END.
ELSE
DYNAMIC-FUNCTION('removeQuerySelection':U IN h_bwgo55-sdoprom,
"promot.prom-no","=").
DYNAMIC-FUNCTION('OpenQuery':U IN h_bwgo55-sdoprom).
/**********************************************************************/
Thanks in advance.
Can anyone give a help on this what am I doing as wrong, please?
This assignment does not make any effect - The Query keeps showing all records of the table.
/***************************************************************/
DEF VAR c-fieldname AS CHAR NO-UNDO.
DEF VAR c-value AS CHAR NO-UNDO.
ASSIGN f-promno
f-pcode.
ASSIGN c-fieldname = "promot.prom-no:U,promot.p-code:U"
c-value = f-promno:SCREEN-VALUE + CHR(1) + f-pcode:SCREEN-VALUE + CHR(1).
IF f-promno:SCREEN-VALUE <> "" THEN DO:
DYNAMIC-FUNCTION('assignQuerySelection':U IN h_bwgo55-sdoprom,
c-fieldname,
c-value,"=":U).
END.
ELSE
DYNAMIC-FUNCTION('removeQuerySelection':U IN h_bwgo55-sdoprom,
"promot.prom-no","=").
DYNAMIC-FUNCTION('OpenQuery':U IN h_bwgo55-sdoprom).
/**********************************************************************/
Thanks in advance.