经租开发代码增补

src/main/webapp/WEB-INF/classes/prj/PRJ2000/pur_order_create_check.lwm

+<?xml version="1.0" encoding="UTF-8"?>
+<!--
+    $Author: zhangxing5129  
+    $Date: 2014-10-13 下午01:02:37  
+    $Revision: 1.0  
+    $Purpose: 项目创建校验 
+-->
+<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm">
+    <bm:operations>
+        <bm:operation name="update">
+            <bm:parameters>
+                <bm:parameter name="cdd_list_id" dataType="java.lang.Long" input="true" output="true" outputPath="@cdd_list_id"/>
+            </bm:parameters>
+            <bm:update-sql><![CDATA[
+                BEGIN
+                    hlcm_pur_order_pkg.pur_create_save_check(p_project_id =>${@project_id},
+                                                              p_user_id =>${/session/@user_id},
+                                                              p_function_code =>${@function_code},
+                                                              p_function_usage =>${@function_usage},
+                                                              p_project_status =>${@project_status},
+                                                              p_bp_id_tenant =>${@bp_id_tenant},
+                                                              p_cdd_list_id => ${@cdd_list_id});
+                END;
+            ]]></bm:update-sql>
+        </bm:operation>
+		        <bm:operation name="query">
+            <bm:query-sql>
+                select bp.bp_wfl_status from hls_bp_master bp where bp.bp_id =${@bp_id_tenant}
+            </bm:query-sql>
+        </bm:operation>
+    </bm:operations>
+</bm:model>

src/main/webapp/WEB-INF/classes/prj/PRJ2000/purchase_order_import_list.lwm

+<?xml version="1.0" encoding="UTF-8"?>
+<!--
+    $Author: SC
+    $Date: 2022年11月23日20:40:09
+    $Revision: 1.0
+    $Purpose:
+-->
+<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm" needAccessControl="false">
+    <bm:operations>
+        <bm:operation name="query">
+            <bm:query-sql><![CDATA[
+                SELECT t1.*
+                FROM (SELECT li.line_id,
+                li.error_message,
+                li.status,
+                li.header_id,
+                li.line_number,
+                hd.created_by,
+                li.source_table,
+                li.attribute_1,
+                li.attribute_2,
+                li.attribute_3,
+                li.attribute_4,
+                li.attribute_5,
+                li.attribute_6,
+                li.attribute_7,
+                li.attribute_8,
+                li.attribute_9,
+                li.attribute_10,
+                li.attribute_11,
+                li.attribute_12,
+                li.attribute_13,
+                li.attribute_14,
+                li.attribute_15,
+                li.attribute_16,
+                li.attribute_17,
+                li.attribute_18,
+                li.attribute_19,
+                li.attribute_20,
+                li.attribute_21,
+                li.attribute_22,
+                li.attribute_23,
+                li.attribute_24,
+                li.attribute_25,
+                li.attribute_26
+                FROM fnd_interface_headers hd,
+                fnd_interface_lines   li
+                WHERE hd.header_id = li.header_id
+                AND hd.template_code = 'PURCHASE_ORDER_LEASE'
+                AND li.line_number >0
+                AND HD.CREATED_BY = ${/session/@user_id}
+                ) t1
+                #WHERE_CLAUSE#
+                order by t1.line_number
+
+                ]]></bm:query-sql>
+        </bm:operation>
+
+        <bm:operation name="insert">
+            <bm:update-sql><![CDATA[
+                begin
+                hlcm_pur_order_pkg.purchase_order_import_lease(p_header_id =>${/parameter/@header_id},
+                p_project_id =>${@project_id},
+                p_user_id =>${/session/@user_id});
+                end;
+                ]]>
+            </bm:update-sql>
+        </bm:operation>
+
+        <bm:operation name="update">
+            <bm:update-sql><![CDATA[
+                begin
+                hlcm_pur_order_pkg.purchase_import_lease_check(p_header_id => ${/model/header/record/@header_id},
+                p_project_id =>${@project_id},
+                p_user_id => ${/session/@user_id});
+                end;
+                ]]></bm:update-sql>
+        </bm:operation>
+
+    </bm:operations>
+    <bm:query-fields>
+        <bm:query-field name="header_id" queryExpression="t1.header_id=${@header_id}"/>
+    </bm:query-fields>
+</bm:model>

src/main/webapp/modules/prj/PRJ2000/purchase_order_entrance.lview

+<?xml version="1.0" encoding="UTF-8"?>
+<!--
+    $Author: wangwei
+    $Date: 2023-8-27 下午01:54:29
+    $Revision: 1.0  
+    $Purpose:  租赁物维护（经营性租赁）入口
+-->
+<a:screen xmlns:a="http://www.leaf-framework.org/application" customizationEnabled="true" dynamiccreateenabled="true" trace="true">
+    <a:view>
+        <a:link id="prj2000_get_layout_code_link_id" model="cont.CON500.con_contract_get_layout_code" modelaction="update"/>
+		<a:link id="prj_project_link" model="prj.PRJ2000.pur_order_wfl" modelaction="execute"/>
+        <a:link id="prj2000_pur_order_deteail_link_id" url="${/request/@context_path}/modules/prj/PRJ2000/purchase_order_deteail.lview"></a:link>
+        <script type="text/javascript"><![CDATA[
+
+
+            //查询时调用(grid)
+           /* window['${/parameter/@layout_code}_on_layout_dynamic_grid_query'] = function(ds, qpara, bp_seq) {
+                var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
+                if (ds == $(ds_id)) {
+                    aut_authority_list_validate_query(ds, qpara);
+                }
+            };*/
+        //新建
+        window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function() {
+            var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_project');
+                var param = {};
+                param['function_code'] = 'PRJ2000D';
+                param['function_usage'] = 'CREATE';
+                param['url_title'] = '采购申请单维护';
+                //param['default_value_dsid']=ds_id;
+                hls_doc_get_layout_code('prj2000_get_layout_code_link_id', param, 'prj2000_pur_order_deteail_link_id', ds_id, '${/parameter/@layout_code}');
+
+
+        };
+		//取消
+        window['${/parameter/@layout_code}_user_button2_layout_dynamic_click'] = function() {
+            debugger;
+            var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_project');
+            var records = $(ds_id).getSelected();
+            var projectId = records[0].data.project_id;
+            if(records[0].data.project_status=='APPROVING' || records[0].data.project_status=='APPROVED' || records[0].data.project_status=='CANCEL'){
+                Leaf.showMessage('${l:PROMPT}', '请选择新建或审批退回的采购单进行取消操作！');
+                return;
+        };
+            Leaf.showConfirm('${l:PROMPT}', '是否确定取消该单据?', function () {
+                Leaf.request({
+                    url: $('prj_project_link').getUrl(),
+                    para:{project_id:projectId},
+                    success: function () {
+                        Leaf.SideBar.show({
+                            msg: '取消成功',
+                            duration: 2000
+                        });
+                        $(ds_id).query();
+                    },
+                    scope: this
+                });
+            }, function () {
+            }, null, null);
+        };
+
+
+        //租赁物导出
+        window['${/parameter/@layout_code}_G_PUR_ORDER_USER_BUTTON1_layout_dynamic_tab_click'] = function () {
+            var lease_item_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_project');
+            var grid_id = lease_item_ds_id.replace('ds', 'layout_grid_id');
+            $(grid_id)._export();
+
+        };
+
+        function prj2000d_get_detail(id, name, query_only){
+            debugger;
+            var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_project');
+            var record = window['${/parameter/@layout_code}_hls_link_render_record'][id + '---' + name];
+            var project_id=record.get('project_id');
+            var projectStatus=record.get('project_status');
+            var param = {};
+            if(projectStatus=='NEW' || projectStatus=='APPROVED_RETURN'){
+                param['function_code'] = 'PRJ2000D';
+                param['function_usage'] = 'MODIFY';
+                param['url_title'] = '采购申请单维护';
+                param['project_id'] = project_id;
+            }
+            if(projectStatus=='APPROVING' || projectStatus=='CANCEL' || projectStatus=='APPROVED'){
+                param['function_code'] = 'PRJ2000D_WFL';
+                param['function_usage'] = 'QUERY';
+                param['maintain_type'] = 'READONLY'
+                param['url_title'] = '采购申请单维护';
+                param['project_id'] = project_id;
+            }
+            hls_doc_get_layout_code('prj2000_get_layout_code_link_id', param, 'prj2000_pur_order_deteail_link_id', ds_id, '${/parameter/@layout_code}');
+
+        }
+
+        //超链接渲染
+        window['${/parameter/@layout_code}_dynamic_link_renderer'] = function (value, record, name, config_record) {
+            var link_function = '';
+            window['${/parameter/@layout_code}_hls_link_render_record'][record.id + '---' + name] = record;
+            if (name == 'project_number') {
+                link_function = 'prj2000d_get_detail';
+                return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' +value + '</a>';
+            }
+        };
+        ]]></script>
+        <a:screen-include screen="modules/cont/CON500/con_contract_get_layout_code.lview"/>
+        <!--<a:screen-include screen="modules/cont/CON500/con_contract_authority_list_validate.lview?document_category=CON501&amp;function_code=PRJ501N"/>-->
+    </a:view>
+</a:screen>

src/main/webapp/modules/prj/PRJ2000/purchase_order_import.lview

+<?xml version="1.0" encoding="UTF-8"?>
+<!--
+    $Author: luzhengyou
+    $Date: 2023年9月5日
+    $Revision: 1.0
+    $Purpose:
+-->
+<a:screen xmlns:a="http://www.leaf-framework.org/application">
+    <a:init-procedure>
+        <a:model-query defaultWhereClause="t1.code = &apos;PUR_ORDER_TEMPLATE&apos;" model="sys.SYS120.hls_attachment_module" rootPath="template_path"/>
+    </a:init-procedure>
+    <a:view>
+	    <a:link id="downloadFile_id" url="${/request/@context_path}/downloadFile.lview"/>
+        <script type="text/javascript"><![CDATA[
+		function downloadFile() {
+            new Leaf.Window({
+                url: $('downloadFile_id').getUrl(),
+                title: '${l:HLS.SUPPORTING_DOCUMENT}',
+                params: {
+                    'table_name': 'HLS_ATTACHMENT_MODULE',
+                    'header_id': '${/model/template_path/record/@attachment_module_id}'
+                },
+                width: 850,
+                height: 400
+            });
+        }
+        function saveClick(){
+            if (document.getElementById('importFile').value){
+                var fileName = document.getElementById('importFile').value;
+                var fileType = fileName.substr(fileName.lastIndexOf("."));
+                if (fileType != '.xls' && fileType != '.xlsx' && fileType != '.xlsm') {
+                    alert('请选择正确的导入文件！');
+                } else {
+                    doSubmit();
+                }
+            }
+        }
+
+        var _input_window;
+
+        function doSubmit() {
+            _input_window = new $L.Window({
+                title: '${l:HLS.IMPORT}',
+                fullScreen: true
+            });
+            debugger;
+            new Ext.Template('<iframe id ="_input_window" name="_input_window" border="0" frameborder="0" height="100%"  width="100%"  style="border:none;padding:0px;margin:0px;"></iframe>').insertFirst(_input_window.body.dom, {}, true);
+            var form = document.getElementById('importForm');
+            var url = '${/request/@context_path}/modules/prj/PRJ2000/purchase_order_import_info.lview?project_id=${/parameter/@project_id}';
+            //var url = '${/request/@context_path}/modules/prj/PRJ2000/purchase_order_import_info.lview?session_id=${/parameter/@session_id}&winid=${/parameter/@winid}&batch_id=${/parameter/@batch_id}&_csrf=${/session/@_csrf.token}';
+            form.action = url;
+            form.submit();
+            $('${/parameter/@winid}').close();
+            _input_window.on('close', function() {
+                $('${/parameter/@parent_ds_id}').query();
+            });
+        }
+
+
+        ]]></script>
+        <a:dataSets>
+            <a:dataSet id="label_ds" autoCreate="true">
+                <a:fields>
+                    <a:field name="label2" defaultValue="1、  严格按照导入模板整理数据，检查必输事项是否缺少数据。"/>
+                    <a:field name="label3" defaultValue="2、  关闭Excel文件后，方可进行产品主数据导入。"/>
+                    <a:field name="label4" defaultValue="3、  本导入程序只支持Office Excel。"/>
+                    <a:field name="label5" defaultValue="仔细阅读上述事项，并检查确认无误。"/>
+                    <a:field name="label6" defaultValue="导入完毕后，请在系统内核实数据是否导入成功。"/>
+                </a:fields>
+            </a:dataSet>
+        </a:dataSets>
+        <a:fieldSet style="margin-left:10px;margin-top:10px;" title="导入注意事项" width="400">
+            <a:label name="label2" bindTarget="label_ds" style="margin-left:10px;" width="380"/>
+            <a:label name="label3" bindTarget="label_ds" style="margin-left:10px;" width="380"/>
+            <a:label name="label4" bindTarget="label_ds" style="margin-left:10px;" width="380"/>
+            <a:label name="label5" bindTarget="label_ds" style="color:#055A78;font-weight:bold;margin-left:10px;" width="380"/>
+            <a:label name="label6" bindTarget="label_ds" style="color:#055A78;font-weight:bold;margin-left:10px;" width="380"/>
+        </a:fieldSet>
+        <a:fieldSet style="margin-left:10px;margin-top:10px;" title="导入文件" width="400">
+            <form name="upload" id="importForm" enctype="multipart/form-data" method="post" target="_input_window">
+                <label style="margin-left:10px;margin-top:10px;"><![CDATA[请选择文件:]]></label>
+                <input name="CONTENT" id="importFile" style="margin-bottom:4px;width:160px;height:22px;" type="file"/>
+                <input onclick="downloadFile()" style="margin-left:10px;margin-top:10px;width:60px;height:23px" type="button" value="模板下载"/>
+                <input onclick="saveClick()" style="margin-left:25px;margin-top:10px;width:60px;height:23px" type="button" value="导入"/>
+            </form>
+        </a:fieldSet>
+    </a:view>
+</a:screen>

src/main/webapp/modules/prj/PRJ2000/purchase_order_import_info.lview

+<?xml version="1.0" encoding="UTF-8"?>
+<!--
+    $Author: SC
+    $Date: 2022年11月23日15:14:31
+    $Revision: 1.0
+    $Purpose:
+-->
+<a:screen xmlns:a="http://www.leaf-framework.org/application">
+    <a:init-procedure>
+        <a:model-query model="acr.acr_get_sys_import_head_id" rootPath="header"/>
+        <a:import-excel header_id="${/model/header/record/@header_id}" separator="," status_field="/parameter/@ImportSuccess" template_code="PURCHASE_ORDER_LEASE" user_id="${/session/@user_id}"/>
+        <a:model-query defaultWhereClause="header_id=${/model/header/record/@header_id} and TEMPLATE_CODE = &apos;PURCHASE_ORDER_LEASE&apos;" model="acp.ACP518.acp_import_get_status" rootPath="status"/>
+        <a:model-update model="prj.PRJ2000.purchase_order_import_list"/>
+    </a:init-procedure>
+    <a:view>
+        <a:link id="import_prj_lease_item_list_link_id" model="prj.PRJ2000.purchase_order_import_list" modelaction="insert"/>
+        <script><![CDATA[
+
+        function import_exit() {
+            parent._input_window.close();
+
+        }
+
+        var import_flag=0;
+        function import_btn() {
+
+            var ds = $('purchase_order_import_list_ds');
+            var record = ds.getAll();
+            if(import_flag==0){
+                for (var i = 0;i < record.length;i++) {
+                    if (record[i].get('status') == 'ERROR') {
+                        Leaf.showMessage('${l:PROMPT}', '导入的数据存在错误，请查看错误信息！');
+                        return;
+                    }
+                }
+                Leaf.showConfirm('提示', '确定要导入信息吗？', function() {
+                    debugger;
+                    Leaf.Masker.mask(Ext.getBody(), '${l:HLS.EXECUTING}');
+                    Leaf.request({
+                        url: $('import_prj_lease_item_list_link_id').getUrl(),
+                        para: {
+                            header_id: '${/model/header/record/@header_id}',
+                            project_id:'${/parameter/@project_id}'
+                        },
+                        scope: this,
+                        success: function () {
+                            import_flag = import_flag + 1;
+                            Leaf.SideBar.show({
+                                msg: '操作成功',
+                                duration: 2000
+                            });
+                            Leaf.Masker.unmask(Ext.getBody(), '${l:HLS.EXECUTING}');
+                            import_exit();
+                        }
+                    });
+                });
+            }else{
+                Leaf.showMessage('${l:PROMPT}', '数据已导入不能重复导入！');
+                return;
+            }
+        }
+
+        ]]></script>
+        <a:dataSets>
+            <a:dataSet id="purchase_order_import_list_ds"  autoQuery="true" fetchAll="true" model="prj.PRJ2000.purchase_order_import_list"
+                       queryUrl="${/request/@context_path}/autocrud/prj.PRJ2000.purchase_order_import_list/query?header_id=${/model/header/record/@header_id}">
+                <a:fields>
+                    <a:field name="error_message" readOnly="true"/>
+                    <a:field name="attribute_1" readOnly="true"/>
+                    <a:field name="attribute_2" readOnly="true"/>
+                    <a:field name="attribute_3" readOnly="true"/>
+                    <a:field name="attribute_4" readOnly="true"/>
+                    <a:field name="attribute_5" readOnly="true"/>
+                    <a:field name="attribute_6" readOnly="true"/>
+                    <a:field name="attribute_7" readOnly="true"/>
+                </a:fields>
+            </a:dataSet>
+        </a:dataSets>
+        <a:screenBody>
+            <a:form id="success_form" height="400" title="THE_IMPORTED_DATA" width="980">
+                <a:screenTopToolbar>
+                    <a:gridButton click="import_exit" text="退出"/>
+                    <a:gridButton click="import_btn" text="导入"/>
+                </a:screenTopToolbar>
+                <a:grid   id="grid_ds_id" bindTarget="purchase_order_import_list_ds" marginWidth="50" marginHeight="100"  navBar="true">
+                    <a:columns>
+                        <a:column name="attribute_1" prompt="品牌" width="120" align="center"/>
+                        <a:column name="attribute_2" prompt="商品种类" width="160" align="center"/>
+                        <a:column name="attribute_3" prompt="机型种类" width="160" align="center"/>
+                        <a:column name="attribute_4" prompt="单位" width="160" align="center"/>
+                        <a:column name="attribute_5" prompt="机型" width="160" align="center"/>
+                        <a:column name="attribute_6" prompt="机号" width="160" align="center"/>
+                        <a:column name="attribute_7" prompt="金额" width="160" align="center"/>
+                        <a:column name="error_message" editor="textArea_e" prompt="错误信息" width="200"/>
+                    </a:columns>
+                    <a:editors>
+                        <a:textArea id="textArea_e" height="50" width="240"/>
+                    </a:editors>
+                </a:grid>
+            </a:form>
+        </a:screenBody>
+    </a:view>
+</a:screen>