//예정원가 전송프로그램 홀딩 2011.05.03
      PERFORM zcor0180_excute.
*//자금운용사업 생성
      PERFORM call_zcor0580_pgm .

위 perform수행하면 zcor0180이란 프로그램을 수행하고

백버튼을 눌러야 밑의 perform문이 수행되는데 

백버튼 누름이 없이 위의 perform문이 성공하면 바로 밑의

perform문이 실행되게 하려고 하면 어떻게 하면 되나요?

참 그런데 이렇습니다......

FORM zcor0180_excute .

  DATA: seltab     TYPE TABLE OF rsparams,
        seltab_wa  LIKE LINE OF seltab,
        lv_count TYPE i.

  SELECT COUNT( * ) INTO lv_count FROM zcot0190 WHERE pspid = p_pspid
                                   AND zvstat1 = '3'.
  IF sy-subrc < 2.
    CLEAR: seltab[], seltab.
    seltab_wa-selname = 'SO_PSPID'.
    seltab_wa-kind    = 'S'.      "SELECT OPTION
    seltab_wa-sign    = 'I'.
    seltab_wa-option  = 'EQ'.
    seltab_wa-low     = p_pspid.
    APPEND seltab_wa TO seltab.

    SUBMIT zcor0180  WITH  SELECTION-TABLE seltab
     AND RETURN.

    gv_error = ' ' .

*    PERFORM call_zcor0580_pgm .
  ENDIF.

ENDFORM.                    "