在Procedure中提交请求及请求等待

来源：互联网发布：单片机应用技术推荐编辑：程序博客网时间：2024/05/23 00:06

V_LAYOUT     := FND_REQUEST.ADD_LAYOUT('MEW'
                                          ,'MEWSHIPNBS'
                                          ,NULL
                                          ,NULL
                                          ,'PDF');
    V_REQUEST_ID := FND_REQUEST.SUBMIT_REQUEST(APPLICATION => 'MEW'
                                              ,PROGRAM     => 'MEWSHIPNBS'
                                              ,DESCRIPTION => NULL
                                              ,START_TIME => TO_CHAR(SYSDATE
                                                                     ,'yyyy/mm/dd hh24:mi:ss')
                                              ,SUB_REQUEST => FALSE
                                              ,ARGUMENT1   => P_SET_OF_BOOKS_ID
                                              ,ARGUMENT2   => P_ORG_ID
                                              ,ARGUMENT3   => P_CUST_ACCOUNT_NAME
                                              ,ARGUMENT4   => P_SHIP_TO_ADDRESS_CODE
                                              ,ARGUMENT5   => P_CUST_PO_NUMBER
                                              ,ARGUMENT6   => P_SCHEDULE_SHIP_DATE
                                              ,ARGUMENT7   => P_SUBINVENTORY_CODE);

    COMMIT;

    L_WAIT_OUTCOME := FND_CONCURRENT.WAIT_FOR_REQUEST(REQUEST_ID => V_REQUEST_ID
                                                     ,INTERVAL   => 10
                                                     ,PHASE      => L_PHASE
                                                     ,STATUS     => L_STATUS
                                                     ,DEV_PHASE => L_DEV_PHASE
                                                     ,DEV_STATUS => L_DEV_STATUS
                                                     ,MESSAGE    => L_MESSAGE);

    FND_FILE.PUT_LINE(FND_FILE.LOG
                     ,L_PHASE);
    FND_FILE.PUT_LINE(FND_FILE.LOG
                     ,L_STATUS);
    FND_FILE.PUT_LINE(FND_FILE.LOG
                     ,L_DEV_PHASE);
    FND_FILE.PUT_LINE(FND_FILE.LOG
                     ,L_DEV_STATUS);