I have a smart browser but I found I cannot update the data field. This is my procedure 'add-record' on my smart browser to handle the add function :
IF AVAIL tmp-dtl THEN
RUN dispatch IN THIS-PROCEDURE ('assign-statement':U).
IF NOT CAN-FIND (FIRST tmp-dtl NO-LOCK ) THEN
RUN dispatch IN THIS-PROCEDURE ('create-record':U).
RUN dispatch IN THIS-PROCEDURE ('open-query':U).
DEF VAR j AS INT.
k = 0.
j = 0.
FOR EACH tmp-dtl NO-LOCK:
k = k + 1.
j = j + 1.
END.
IF k > 2 THEN k = k - 1.
DO i = 1 TO k:
APPLY 'ENTRY' TO tmp-dtl.policy-no IN BROWSE br_table.
APPLY 'CURSOR-DOWN' TO br_table IN FRAME {&FRAME-NAME}.
END.
Is there anything I have missed? Please help!
IF AVAIL tmp-dtl THEN
RUN dispatch IN THIS-PROCEDURE ('assign-statement':U).
IF NOT CAN-FIND (FIRST tmp-dtl NO-LOCK ) THEN
RUN dispatch IN THIS-PROCEDURE ('create-record':U).
RUN dispatch IN THIS-PROCEDURE ('open-query':U).
DEF VAR j AS INT.
k = 0.
j = 0.
FOR EACH tmp-dtl NO-LOCK:
k = k + 1.
j = j + 1.
END.
IF k > 2 THEN k = k - 1.
DO i = 1 TO k:
APPLY 'ENTRY' TO tmp-dtl.policy-no IN BROWSE br_table.
APPLY 'CURSOR-DOWN' TO br_table IN FRAME {&FRAME-NAME}.
END.
Is there anything I have missed? Please help!