分类目录归档:EBS Form开发

Form开发常用命令点

1. 根据条件,输出错误提示

IF :detail_line.quantity <= 0 THEN
        fnd_message.set_string('数量不能为0或负数!');
        fnd_message.error;
        RAISE form_trigger_failure;
END IF;

2.  完成MOAC的初始化
   CUX_MOAC_PKG.pre_form;   
   app_window.set_window_position('MAIN', 'FIRST_WINDOW');

3. 初始化folder块,可初始化多个folder块
    app_folder.define_folder_block(object_name=>'CUXGSPCHK01',
                                   folder_block_name=>'DETAIL_HEADER',
                                   prompt_block_name=>'DETAIL_HEADER_PROMPT',
                                   folder_canvas_name=>'DETAIL_HEADER_STK',
                                   folder_window_name=>'MAIN',
                                   disabled_functions=>null,
                                   tab_canvas_name=>null,
                                   fixed_canvas_name=>null);
    app_folder.event('INSTANTIATE');

4. 功能:当进入FORM时,执行pre_form程序完成MOAC的初始化
   procedure pre_form
   is
      l_default_org_id  number;
      l_default_ou_name varchar2(240);
      l_ou_count         number;
   begin
        MO_GLOBAL.init('CUX');
       
        mo_utils.get_default_ou(l_default_org_id, l_default_ou_name, l_ou_count);
     
        copy(l_default_org_id,'PARAMETER.mo_default_org_id'); 
        copy(l_default_ou_name,'PARAMETER.mo_default_ou_name');
        copy(l_ou_count,'PARAMETER.mo_ou_count'); 
       
        –fnd_message.debug('l_default_org_id = ' || l_default_org_id);
        –fnd_message.debug('l_default_ou_name = ' || l_default_ou_name);
        –fnd_message.debug('l_ou_count = ' || l_ou_count);
       
        –判断是否找到了OU,如果没有找到,则报错
        if nvl(l_ou_count,0) <= 0 then
            fnd_message.set_name('CUX', '没有找到相应的OU,请联系系统管理员或开发人员!');
            fnd_message.error;
            raise form_trigger_failure;
        end if;           
   end pre_form;

 5. 帮助》历史记录灰掉问题

问题:在一个FORM中发现历史记录菜单灰掉

解决:这个跟块查询灰掉一样,块查询是把块级触发器WHEN-NEW-RECORD-INSTANCE触发器层级修改为BEFORE,

这个问题需要将WHEN-NEW-BLOCK-INSTANCE触发器层级修改为BEFORE,因为这两个的可用与否,是FORM级触发器判断的,如果覆盖,就不可用了。

PS:使用历史记录时报“历史记录不可用”,是由于在该块中没有5个数据库WHO字段的原因,添加上就行。

6. 设置ITEM属性

set_item_instance_property('DETAIL_LINE.LOT_NUMBER',
                                   current_record,
                                   update_allowed,
                                   property_false);

 set_item_property('QUERY_FIND.VENDOR_CUST_NAME'
                       ,insert_allowed
                       ,property_false);

7.Form客户化设置消息例子,参考系统用户创建form,用户创建触发器

FND_USER_PKG_WRP

FND_USER_PKG

8.问题描述: 手电筒功能查询一次后变灰色,不可用

原因:QUERY_FIND查询块中的Query_Allowed属性为NO

方法:把该属性设置为YES即可。

原因:这是主数据块(被查询的数据块)上When-new-record-instance触发器的执行层次问题

方法:改一下主data block的触发器WHEN-NEW-RECORD-INSTANCE ,把属性execution hierarchy改为after。

Form客户化开发大致步骤

  客户化一个Form程序,一般会经历如下开发过程(未包括具体代码书写及程序包调用):
      1.建立数据库对象(表,视图,序列,同义词等)
      2.打开template.fmb文件,更名为CUXGLIMPORT
      3.删除Data Blocks下的两个块——BLOCKNAME、DETAILBLOCK,
        它们是模版自带的示例主从块。
      4.删除Canvases下的一个画布——BLOCKNAME
      5.修改Windows下的BLOCKNAME这个Window,在Property Palette中
        将Name改为“HEADERS”,将Title改  为“XXXX”
      6.修改Forms级触发器PRE-FORM
      7.修改Forms级触发器WHEN-NEW-FORM-INSTANCE
      8.修改Program Unit下app_custom中的close_window过程
      9.创建Block数据块
      10.设置Block属性及其Subclass
      11.新增CURRENT_RECODE_INDICATOR 子类信息
         CURRENT_RECODE_INDICATOR
      12.画布创建
      13.程序单元    
      14.块级别触发器on_insert……

注意点:
      1.画布和窗口的对应,LOV创建最后在指定的item上面。
      2.ROW_ID 属性 row_id 18
      3.记录间距为0
      4.LOV建立时,需要注意返回项,否则在保存的时候会报错
      5.一般情况下请在order by 中写上命令
      6.form级别第一个导航块
      7.block级别导航块

完成后,通过ftp工具上传至相应服务器目录,最后通过ssh工具编译即可完成。可参考此链接编译form命令:http://www.llku.com/?p=177

 

编译EBS R12 Form是出现ksh: frmcmp_batch: not found错误解决方法

    编译EBS R12 Form是出现以下错误:ksh: frmcmp_batch: not found.
    通过env|grep ORACLE_HOME查看,里面的环境变量是否有ORACLE_HOME,如果没有,则可以确定是导致此问题出现的原因。编辑".profile"文件,具体如下:
    vi  .profile 加入以下内容:". /u01/TEST/apps/apps_st/appl/APPSTMPPROD_test.env”,
再次通过命令"env|grep ORACLE_HOME"可以看到ORACLE_HOME=/u01/TEST/apps/tech_st/10.1.2
最后再次通过Form编译命令编译相关Form,成功!

Oracle EBS Form编译命令

    Oracle Form在Oracle EBS系统中占有非常重要的作用,作为技术顾问,首先得了解如何编译form文件。这里贴出对R12和11i版form编译命令,具体如下:

    Oracle EBS R12 编译命令:

      frmcmp_batch  $AU_TOP/forms/ZHS/test.fmb apps/apps output_file=$CUX_TOP/forms/ZHS/test.fmx

    Oracle EBS 11i 编译命令:
      f60gen module=test.fmb userid=apps/apps output_file=/ora1159/prod/prodappl/pa/11.5.0/forms/US/test.fmx

命令解释:
  1. 要能应用frmcmp_batch命令,首先得保证系统环境变量设置正确,特别是ORACLE_HOME环境变量的正确性;

  2. Form编译命令一定要在Form文件所在的目录下执行,否则虽然编译命令会执行,但是并不能正确生产fmx文件,也就无法正确 使用该表单;

  3. 一般客户化的Form编译后的fmx文件都存放在$CUX_TOP相应的目录下,因此建议相关项目人员在系统搭建好的第一时间设置好客户化环境,这对客户化工作非常有必要;

  4. 目前EBS 11i逐渐升级或者替代为R12,但是掌握11iform的编译还是很有必要。

查看form最新版本时间:
cd $AU_TOP/forms/ZHS
ls -l –time-style=full test.fmb