PROCEDURE MAIN(ERRBUF OUT VARCHAR2, RETCODE OUT VARCHAR2, P_CUSTOMER_ID IN VARCHAR2, P_PERSON_ID IN VARCHAR2, P_MAKER_ID IN VARCHAR2, P_START_DATE IN VARCHAR2, --这里为字符格式 P_END_DATE IN VARCHAR2 --这里为字符格式 ) IS l_contract_date_from DATE; -- 合同日期至 l_contract_date_to DATE; -- 合同日期至 BEGIN RETCODE := '0'; l_contract_date_from := trunc(fnd_conc_date.string_to_date(P_START_DATE));--调用函数转化为日期格式 l_contract_date_to := trunc(fnd_conc_date.string_to_date(P_END_DATE));--调用函数转化日期格式 OUTPUT_DATA_HTML(P_CUSTOMER_ID, P_PERSON_ID, P_MAKER_ID, l_contract_date_from, --销售日期从 l_contract_date_to --销售日期至 ); END; PROCEDURE output_data_html(P_CUSTOMER_ID IN VARCHAR2, P_PERSON_ID IN VARCHAR2, P_MAKER_ID IN VARCHAR2, P_START_DATE IN DATE, --这里为日期格式 P_END_DATE IN DATE --这里为日期格式 ) IS BEGIN SELECT * FROM OE_ORDER_HEADERS_ALL OOH WHERE (p_start_date IS NULL OR trunc(ooh.ordered_date) >= p_start_date) AND (p_end_date IS NULL OR trunc(ooh.ordered_date) <= p_end_date); END; --程序定义的参数时候的值集为 FND_STANDARD_DATE