审批界面跳转form界面

审批工作流界面跳转到FORM

1、在FORM级触发器'WHEN-NEW- FORM-INSTANCE'中添加以下代码:

--从审批界面进入的时候执行查询跳转头块

IF :parameter.HEADER_ID IS NOT NULL THEN -- 从审批界面进入

:parameter.g_query_find := 'TRUE';

app_find.find('TRADE_HEADERS');

go_block('TRADE_HEADERS');

:parameter.g_query_find := 'FALSE';

end if;

 

2、在主从块的头块的'PRE-QUERY'中添加以下 代码：

--当参数有值的时候执行查询

IF :parameter.HEADER_ID IS NOT NULL THEN

app_find.query_range(:PARAMETER.HEADER_ID, :PARAMETER.HEADER_ID,':PARAMETER.HEADER_ID');

END IF;

 

3、(附加)如果FORM界面打开时弹出选择库存组织框，则需要进行下一步操作才能进行跳转,添加的代码放在FORM级触发器PRE-FORM中

（注：没有添加此段代码之前PRE-FORM中就包含fnd_org.choose_org;添加此段代码只是添加在参数不为空的时候）

 

if :parameter.REQ_HEADER_ID is not null then

SELECT cfr.org_id, ood.organization_code, ood.organization_id,ood.ORGANIZATION_NAME,ood.CHART_OF_ACCOUNTS_ID

INTO l_org_id,:parameter.ORG_CODE,:parameter.ORG_ID,:parameter.ORG_NAME,:parameter.CHART_OF_ACCOUNTS_ID

FROM cux_dis_req_headers_all cfr, org_organization_definitions ood

WHERE 1 = 1

AND cfr.header_id = :parameter.req_header_id

AND cfr.org_id = ood.operating_unit

AND ood.ORGANIZATION_CODE!='MST';

else

fnd_org.choose_org;

SELECT ood.operating_unit

INTO l_org_id

FROM org_organization_definitions ood

WHERE ood.organization_id = :parameter.org_id;

END IF;

mo_global.init('CUX');

mo_global.set_policy_context('S',l_org_id);

 

动态设置LOV一般用于一个字段的LOV取值逻辑有多个来源的时候

 

SET_ITEM_PROPERTY('LINE_VERIFY.ACTION_TYPE_DIS', LOV_NAME, 'LINE_VERIFY_ACTION_TYPE_DIS_LOV');

 

查询销售订单行状态

SELECT c.flow_status_code ,c.line_id from oe_order_lines_all c WHERE c.line_id= 1045141;

DECLARE

l_status VARCHAR2( 30);

BEGIN

l_status := oe_line_status_pub.Get_Line_Status (p_line_id => 1045141,

p_flow_status_code => 'ENTERED');

dbms_output.put_line('l_status:' || l_status);

END;

 

采购订单状态CODE:

SELECT nvl(pha.authorization_status,

'INCOMPLETE'), --状态编码

pha.po_header_id,

pha.segment1,

po_headers_sv3.get_po_status(pha.po_header_id) --, --状态说明

-- po_headers_sv2.get_document_status(X_lookup_code => , X_document_type => , X_document_status => )

FROM po_headers_all pha

WHERE 1 = 1

AND pha.segment1 IN ('T02B161026003NC-2',

'T02B161026003NC-1');

 

销售订单行号:

ool.line_number

|| decode(ool.shipment_number, null, null, '.'||ool.shipment_number)

|| decode(ool.option_number, null, null, '.'||ool.option_number)

line_shipment_option_number