资源描述:
《oracleebsform个性化的项目应用实例[终稿]》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
FORM个性化的应用实例文档作者:YangHe创建口期:5/20/2007最近更新:3/26/2013控制编号:FORM个性化V1.0文档版本:1.0审批:松下富上通汉得拷贝数 文档控制变更记录日期作者版本变更参考5/20/2007YangHe1新创建的文档审阅姓名职位分发拷贝数姓名地点1111 目录文档控制21概述23安装环境23安装前准备23阅读说明及约定23FORM个性化24协亨项目ORACLE销伟订单录入控制24协亨项目ORACLE子库存转移控制31协亨项目ORACLE杂项事务处理控制36添加菜单项调用系统功能39已解决和未解决的问题57未解决问题57已解决问题57 概述FORM个性化是.10新增的功能。通过个性化设置,我们可以不必去修改ORACLE的FORM源码而实现FORM标准功能的修改,因为个性化代码是独立储存在数据库表中的,FORM的升级均对此无影响。所以在项忖上要対FORM进行修改时,如果能行,最好还是用FORM个性化来实现这里顺便提下两个预iff文件,一个是'HideDiagnosticsmenuentry',用來控制help菜单下的Diagnostics是否隐藏,默认为不隐藏。一个是’Utilities:Diagnostics'用來轻制进入诊断模式时是否需要apps密码,默认为需要密码。根据具体需要看是否设置。FORM个性化触发器事件冇五个FORM白帶的触发器动作:WHEN-NEW-FORM-INSTANCE、WHEN-NEW-BLOCK-INSTANCE>WHEN-NEW-RECORD-INSTANCE、WHEN-NEW-ITEM-INSTANCEWHEN-VALIDATE-RECORD以及MENU、SPECIAL(点击口处义的菜单动作,最后的例子中我们可以看到)。通过这些触发器岀件,我们町以实现改变ITEMSBLOCKSCANVASESWINDOWSREGIONS等的属性及值、执行FORM的内置函数、显示错误警告MESSAGE信息、显示DEBUG信息、口足义一个菜甲项來执行应用中的某功能、创建一个全局变量來传递信息等。FORM个性化操作起來比较简单,ORACLE育一个专门的文档对其进行介绍的,详见METALINKNote:279034.1。这里简单介绍一下在实际项目中的几个应丿I」。安装环境硬件平台:IBM操作系统及版本:OracleRDBMS版本:9.2.0.6.0OracleEBS版本:11.5.10.2安装前准备以上操作,如有疑问,请向系统管理员寻求帮助阅读说明及约定□本文中蓝色字体为需耍注意的内容。□本文中红色字体为特别帝耍的内容。□本文屮黑色粗体10号字为输入的命令。 FORM个性化以下介绍的儿个FORM个性化应用大部分是基于上海协亨信息科技有限公司ERP项目的实际开发。协亨项目ORACLE销售订单录入控制项II背景及业务需求:协亨手机连锁销售集团是一家主要经营手机销售的连锁零售企业。其在全国有儿白家门店,当门店的POS系统匕线厉,口常销售都是在POS系统中完成的,通过接口传给ORACLEfl动生成销佶:订单,在ORACLE中我们禁止手工录入这个门店的销售订单。具体的控制方法是:把订单头的销售员设置成必录字段。在离开该字段的时候添加校验:根据销售员查找门店信息,若找不到,表示这是跟门店无关的销售,不控制。若找到,则判断该门店是否已经POS上线,如果已经是POS上线的并且POS控制类型二现实门店,那么就不能通过验证。否则可以通过。销售超级用户职责/订单;退货/销售订单/帮助/诊断/自定义代码/个性化在Oracle的订单录入界面,禁止录入这个门店的销售订单。在销售订单FORM下进入FORM个性化:L(T)Window帮助(血O销售订单订单信息主要窗口帮助址)OracleApplications程序库D键盘帮助区)•..诊断⑪历史记录(B)关于OracleApplications(0)...JfX禁用安全诊断显示数据库错误Q)...检查(E)...记录测试Web代理程序(W)...跟踪Q)调试©)雇性0)其它客户客户编号自定义代码①)订单编号FORM个性化界面条件伪代码: 销售员id在客户化表XH_SHOP_INFO屮冇对应的冇效门店,且POS上线口期非空,且门店类型为现实门店。序号说明触发器事件触发器对象条件10FORBIDSOIMPORTWHEN-VALIDATE・RECORDORDER:ORDER.SALESREP_IDIN(SELECTSALESREPJDFROMXH_SHOP_INFOWHERENVL(END_DATE_ACTIVE,SYSDATE+l)>TRUNC(SYSDATE))AND(SELECTPOS_ONLINE_DATEFROMXH_SHOP_INFOWHERENVL(END_DATE_ACTIVE,SYSDATE+l)>TRUNC(SYSDATE)ANDSALESREP.ID=:ORDER.SALESREP_ID)ISNOTNULLAND(SELECTPOS_CONTROL_TYPEFROMXH_SHOP_INFOWHERENVL(END_DATE_ACTIVE,SYSDATE+l)>TRUNC(SYSDATE)ANDSALESREP.ID=:ORDER.SALESREP1D)='REAL*活动 符合条件的记录在保存时报以下错误:该销售员对应的门店POSLL上线,不允许在ORACLE录入订单序号类型消息类型消息文本10消息错误该销售员对应的门店POS已上线,不允许在ORACLE录入订单o衷单个性化(销售订单I:::::::;::::〉::;:::::〉:::::::〉::::::;:::::::::〉:::〉::::::::::::::::::;:::::〉:::〉:::〉:::::"rx函数名表单名训试模式ONTOEXOEORDR)RBIDSOINPORTLINE条件活动说明启用r厂厂r厂厂'厂层号序序号类型插入“获取"表达式(E)・・・(A)▲功能肖息文本现在申请(C)同时对订单行也要进行限制序号说明触发器事件触发器对象条件 序号说明触发器事件触发器对象条件10FORBIDSOIMPORTLINEWHEN-VALIDATE・RECORDLINE:ORDER.SALESREP_IDIN(SELECTSALESREPJDFROMXH_SHOP_INFOWHERENVL(END_DATE_ACT1VE,SYSDATE+l)>TRUNC(SYSDATE))AND(SELECTPOS_ONLINE_DATEFROMXH_SHOP_INFOWHERENVL(END_DATE_ACTIVE,SYSDATE+l)>TRUNC(SYSDATE)ANDSALESREPJD=:ORDER.SALESREP_ID)ISNOTNULLAND(SELECTPOS_CONTROL_TYPEFROMXH_SHOP_INFOWHERENVL(END_DATE_ACTIVE,SYSDATE+l)>TRUNC(SYSDATE)ANDSALESREPJD=:ORDER.SALESREPID)='REAL'活动序号类型消息类型消息文本10消息错误该销售员对应的门店POS已上线,不允许在ORACLE录入订单看实际中的应用情况: 录入销售订单,销售人员为’1112073曹杨二店',该店POS_ONLINE_DATE不为空,且POS_CONTROL_TYPE='REAL',即POS上线门期非空,且门店类型为现实门店。新增一条规则,设置销售人员为必需字段O诸误:吹::•:吹•:•:::•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:•:X该销售贝对应的门店POS已上线,不允许在0RA(<丄E录入订单序号说明触发器事件触发器对象条件10设置销售人员为必输字段WHEN-NEW-RECORD-INSTANCEORDER FORBIDSOINFORTFORBIDSOBFORTLINE谡置子库存为必籀字段条件(您可以输入附加事件名称。)WHEN-T4EW-RKX)H>-INSTANCE序号说明设富韬善人员为必谕序段表单名函数名ESKiwwu调试模式甌傩发器事件触发器对象条件ORDER不在“谕入-査询”模式下处理模式上下文值层插入“获取”表达式(E)…(A)插入项目值⑴…脸证(B)现在申请©活动序号类型对象类型目标对象特性名称值10特性项目ORDER.SALESREP_MIRREQUIRED(APPLICATIONSCOVER)真 賤单名调试模式矢团序号说明启用层—M按文本选择⑸...顶目▼ORDER.SALESREF^MERREQUIREDGCTLICATIOIecx)vew真▼对象类型目标对躱特性名称值获取值(G)插入项目值(I)...脸证辺)现在申请(C)看实际屮的应用悄况:当我们新建一个销售订单,町以看到,销售人员变成了必输字段。 协亨项目ORACLE子库存转移控制业务需求:协亨门店的POS上线前,直接在ORACLE中做子库存转移。POS系统上线后,所冇的调拨业务都是在POS中进行的,通过接口传给ORACLEH动做了库存转移,在ORACLE中禁止手工录入该门店对应的子库转移。库存超级用户职责/事务处理/子库存转移/事务处理行/帮助/诊断/自定义代码/个性化在子库存转移界血,在[子库存]及【II标子库存]两个字段上,在离开该字段的时候添加校验:根据子库存的门弹性域查找门店信息,判断该门店是否已经POS上线,如果已经是POS上线的并且POS控制类型=现实门店,那么就不能通过验证。否则可以通过。即如果在对应门店已上线的子库做子库存转移,在保存时会出现以下错谋:序号说明触发器事件触发器对象条件 序号说明触发器事件触发器对象条件10FORBIDSUBINVTRANSFERWHEN-VALIDATE-RECORDMTL_TRX_LINE(SELECTPOS_ONLINE_DATEFROMXH_SHOP_INFOXSWHEREnvl(end_date_active,sysdatE+l)>TRUNC(SYSDATE)ANDXS.SHOP_NUMBER=(SELECTMSI.ATTRIBUTE1FROMMTL_SECONDARY_INVENTORIESMSIWHERENVL(MSI.DISABLE_DATE,SYSDATE)>TRUNC(SYSDATE)ANDMSI.SECONDARY_INVENTORY_NAME=:MTL_TRX_LINE.SUBINVENTORY_CODE))ISNOTNULLAND(SELECTPOS_CONTROL_TYPEFROMXH_SHOP_INFOXSWHERENVL(END_DATE_ACTIVE,SYSDATE+l)>TRUNC(SYSDATE)ANDXS.SHOP_NUMBER=(SELECTMSI.ATTRIBUTE1FROMMTL_SECONDARY_INVENTORIESMSIWHEREnvl(msi.disable_date,sysdatE)>TRUNC(SYSDATE)ANDMSI.SECONDARY_INVENTORY_NAME=:MTL_TRX_LINE.SUBINVENTORYCODE))=,REAL, 矢团▲(您可以输入附加事件名称。)WEN-VALIDftrE-I®CORDMTLTRILINE不在“篇入-吉询”槿式下值•—训试模式层(SELECTPOS_ONLINE_DAIEFROMXH_MDP_INFOXSWERENVL(Er©_DATE_ACniVE,SVSDATE+1)>THJNC(SYSDATDN©XS.SHDP_NUMBER=(SELECTMSI.ATTRIEUIE1FROMMTL_SEQONDARY_INVENTORIES触发器事件触发器对象条件处理模式函数名条件活动说明启用上下文层祐入项目值(I).・・现在申请©活动 序号类型消息类型消息文本10消息错误子库存对应的门店POS已上线,不允许在ORACLE中进行子库存转移 序号说明触发器事件触发器对象条件 10FORBIDSUBINVTRANSFER2WHEN-VALIDATE・RECORDMTL_TRX_LINE(SELECTPOS_ONLINE_DATEFROMXH_SHOP_INFOXSWHEREnvl(end_date_active,sysdatE+l)>TRUNC(SYSDATE)ANDXS.SHOP_NUMBER=(SELECTMSI.ATTRIBUTE1FROMMTL_SECONDARY_INVENTORIESMSIWHERENVL(MSI.DISABLE_DATE,SYSDATE)>TRUNC(SYSDATE)ANDMSI.SECONDARY_INVENTORY_NAME=:MTL_TRX_LINE.TRANSFER_SUBINVENTORY))ISNOTNULLAND(SELECTPOS_CONTROL_TYPEFROMXH_SHOP_INFOXSWHERENVL(END_DATE_ACTIVE,SYSDATE+l)>TRUNC(SYSDATE)ANDXS.SHOP_NUMBER=(SELECTMSI.ATTRIBUTE1FROMMTL_SECONDARY_INVENTORIESMSIWHEREnvl(msi.disable_date,sysdatE)>TRUNC(SYSDATE)ANDMSI.SECONDARY_INVENTORY_NAME=:MTL_TRX_LINE.TRANSFER_SUBINVENTORY))=,REAL' INVTTMKSUBINV函数名表单名训试模式关团条件罰触发器事件WHEN-VALIDAIE-REWRD▼(您可以输入附加事件名称。)融发器对象mljuSIlde条件EELECTPOS.ONLINE_DATEFROMHBLSHD巳INFOXSWERENVL(B©_DATE_ACnVE,S^ZSDME+1)>THING(SxSDATE)丽MS.SH)巳TOBER二(SELECTETTRIBUinFROMMIL_SECO^_INVTNTORIES处理模式不在;辐入-査洵;榄式下司祐入“获取”表达式(E)・・・(A)插人项目值①…脸证(B)现在申请(C)上下文层值1地点▼]序号类型消息类型消息文本10消息错误口标子库存对应的门店POS已上线,不允许在ORACLE中进行子库存转移协亨项目ORACLE杂项 事务处理控制业务需求:协亨门店的POS上线前,可以直接在ORACLE屮做杂项事务处理。POS系统上线后,门店的盘点是在POS中做的,通过接II传给ORACLE自动做杂项事务处理。此时在ORACLE屮禁止手工录入该门店对应的杂项事务处理。库存超级用户职责/事务处理/杂项事务处鹽事务处理行/帮助/诊断/自定义代码/个性化在杂项库存事务处理界面,在[子库存]字段匕在离开该字段的时候添加校验:根据子库存的门弹性域查找门店信息,判断该门店是否已经POS上线,如果已经是POS上线的并H.POS控制类型二现实门店,那么就不能通过验证。否则可以通过。即如果在对应门店已上线的了库做子库存转移,在保存时会出现以卜-错误:序号说明触发器事件触发器对象条件 序号说明触发器事件触发器对象条件10FORBIDMISCELLTRANSFERWHEN-VALIDATE・RECORDMTL_TRX_LINE(SELECTPOS_ONLINE_DATEFROMXH_SHOP_INFOXSWHEREnvl(end_date_active,sysdatE+l)>TRUNC(SYSDATE)ANDXS.SHOP_NUMBER=(SELECTMSI.ATTRIBUTE1FROMMTL_SECONDARY_INVENTORIESMSIWHERENVL(MSI.DISABLE_DATE,SYSDATE)>TRUNC(SYSDATE)ANDMSI.SECONDARY_INVENTORY_NAME=:MTL_TRX_LINE.SUBINVENTORY_CODE))ISNOTNULLAND(SELECTPOS_CONTROL_TYPEFROMXH_SHOP_INFOXSWHERENVL(END_DATE_ACTIVE,SYSDATE+l)>TRUNC(SYSDATE)ANDXS.SHOP_NUMBER=(SELECTMSI.ATTRIBUTE1FROMMTL_SECONDARY_INVENTORIESMSIWHEREnvl(msi.disable_date,sysdatE)>TRUNC(SYSDATE)ANDMSI.SECONDARY_INVENTORY_NAME=:MTL_TRX_LINE.SUBINVENTORYCODE))=,REAL, INVINVTTMKMISC函数名说明训试模式启用层条件活动插入“获取”表达式(E)•…(A)触发器事件触发器对象条件处理模式上下文WEN-VALIME-I®a)I©(您可以输入附加事件名称。)MrL_lR(_LINESELECTPOS_ONLINE_DATEFROMXH_SH)P_INFOXSWERENVL(H^DATE_ACIIVE,SYSDATE+1)>TRJNC(SVSDATD抓DXS・SHOPNUMBER=(SELECTMSI.ATTRIBUIE1FROMMTLSEOONDAI&INVENIORIES▲不花“篇入-査询”植式下▼值1地点▼层插入项目值("•现在申请(C)活动序号类型消息类型消息文本10消息错误了库存对应的门店POS已上线,不允许在ORACLE中进行杂项事务处理 添加菜单项调用系统功能同时对订单行也要进行限制以下是个性化的执行效果。在tools菜单里增加了一个菜单项Executable,点击可以调出该并发程序所对应的nJ执行界面。FileEditViewToolsExecutable©的磷豉丨診自0乡拆丨丨?OConcurrentProgramsProgramKH:库存救崖狼表(历史)^EnabledShortNameXHTNVSOuApplicationKHCustomzedAppilicationDescriptionNameMethodOptionsOutputFormatTextCopyto...SessionControl"Save(C)f^PrintIncompatibilitiesParameters调出结果如卜 FileEditViewFolderToolsWindowHelpN%a【令滸㉚$掘丨跃瞻讷磷頓丨診自3多讎丨?整体逻辑:打开并发程序定义界面,在Tools菜单栏下新加一个菜单项。点击该菜单时,如果并发程序名为空,则报一个错误。如果可执行名非空,增加一个全局变量,储存可执行的名称。点击新增的菜单项,可以打开可执行FORMo当打开可执行FORM时,对上述定义的全局变量进行初始化。进入查询模式。将全局变量的值赋予可执行名称项值。进行查询。清除全局变量的值。以下是step_by_step编辑详情1、打开并发程序定义界血,再打开FORM个性化界血,定义-•个名为Executable的个性化规则,对■应的触发器事件为WHEN・NEW・FORM・INSTANCE ConcurrentPrograms0EnabledProgram2、在Actions111,增加一个Menu类型,其+MenuEntry选择'SPECIALS(SPECIAL】至15是在Tools菜单下,16至30是在Reports菜单下,31至45在Actions菜单下),MenuLabel输入'Executable'(即菜单项标签),IconName为,CONC_PROG,即并发程序FORM对应的BLOCKFormNameFNDCPMCPFunctionNameFND_FNDCPMLP_DEVDebugModeOffConditionActionsEnabledmBlock(s)MenuEntrSPECIALl:ElecutableecirtnbleMenuLabelRenderlinebeforemenuIconNam>AddBlock...3、保存,打开可执行界面,可以看到新增的菜单项,点击,没冇事件发生。 (薛%0丨令密IExecutablFileEditViewFolderovavOConcurrentProgramsOutputFormatTmtRequest9Save(C)PrintCopyto...SessionControlIncompatibilitiesParameters4、在可执行界面下,ft-JFFORM个性化界面,我们增加一个事件为,如果可执行的名称为空,贝U报一个错误'PleaseEnterExecutableName!"新增一个个件化规则CheckExecutableName,TriggerEvent为SPECIAL1,条件为可执彳j名称为空°即CONC_PROG.EXECUTABLE_NAMEISNULL' CbirteEtLevelValue|Site▼▼▼ConcurrentProgramsSeqDescriptionLevel10ExecutableRxxtion120CheckEiecutableNsuseRxxtionULJf1LJ1ActionsConditionProcessingModePbtinErrta^-Query5、在Actions下,设置一个Meassage类型,MessageType为Error,MessageText为PleaseEnterExecutableName!LevelSeqDescriptionSeqTypeDescriptionhfessage▼)LanguageAll▼Enabled(Z3▼▼□▼▼□▼▼□z♦♦▼▼□♦♦♦zzz▼▼□/♦▼▼□▼▼□▼▼□6、保存。打开并发程序定义界面,ExecutableName项为空,点接点击Executableo FileEditViewFolderovavExecutaKL[M0沙晔魔丨/自3乡毒丨丨?OConcurrentProgramsjf71XEzecutahleNameMethodOptionsRequestOutputFormatTmt9Save(C)PrintCopyto...SessionControlIncompatibilitiesParameters7、出现错误信息:PleaseEnterExecutableName! :薛蚩a丨令詹①出签【務』苗晔廉【診自3乡雜丨【?OffNameinctiMethodTypeIncrementorMLSFunctionOConcurrentPrograns0Save(C)0PrintjvelhxjctiProgramExecutableRequestColiunns0UseinSRS□RunAlone□EnableTrace、]AllowDisabledValues0RestartonSystemFailure0NLSCompliantRowseNauStyleDStyleRequiredPrinterCopyto...SessionControlIncompatibilitiesParameters8、在并发定义界面厂打开FORM个性化界而。我们先定义-・个全局变量,储存可执行的乞称,在后而中要用到。新增一个名为ExcutableEntered的个性化规则,TriggerEvent为SPECIAL1,条件为:CONC_PROG・EXECUTABLE_NAMEisnotnull LevelValue|Site▼▼▼▼ProgramOFormPersonal!zations(ConcurrentPrograms(DeveloperMode))八h八0EnabledDebugModeFunctionNameFNDlFNDCPMPJOEVFormNameFNDCRUP9、在Actions里加入一个Property类型,ObjectType为GlobalVariable即全局变量,变量名为XX_XH_EXECUTABLE_NAME,为了便于区分,我们FORM个性化的全局变量全部以XX_开头。PropertyName为VALUE,Value为=:CONC_PROG.EXECUTABLE_NAME(前面冇二号,如果不加等号的话,会被赋值 为':CONC_PROG.EXECUTABLE_NAME')。 ProgramWHEnabledFormPersonalizations(ConcurrentPrograms(DeveloperMode))八T几•几―J八几•几•几J几JJ几•几•几FormNameDebugModeSeqDescriptionLevel10ExecutableFunction20QieckExecutableNoneRuction190EccutableEnteredRuction11FunctionNameFNDlFNDCFMP_DEVConditionActionsSelectByText...ObjectTypohalVariablexilekecotabijo^2^>TargetObjecPropertyNamVALUEValu.g5bNCJ亦&EXECUTAK此NM町二^GetValue10、再增加一个Builtin类型,BuiltinType为LunchaFunction即调用一个功能,FunctionCode为FND_FNDCPMFE即可执行对应的功能,FunctionName会被口动调;1|。LevelSeqDescriptionConditionActionsParametersBuiltinFunctionFuncticmAddParameter...IK保存。打开并发程序界面,查找一个并发程序,点击TooIs>Executable,nf以看到可执行定义界面被调出,但是没有数据。 {DiagnosticsenabledFileEditViewFolderToolsWindowHelp口i库存现有量很馬(历史)Program[^EnabledShortNameXHINVQTYApplicationOConcurrentProgramExecutableDescription$tageFunctionParairietersCopyto...SessionControlIncompatibilitlesParameters12、关闭并发请求界面,打开可执行界面,再打开FORM个性化界面。新增加一个FORM个性化规则INITXX_XH_EXECUTABLE_NAME,触发器事件为WHEN-NEW-FORM-INSTANCEo我们做这个个性化规则的H的是初始化4局变量INITXX_XH_EXECUTABLE_NAMEo 〔同乜a【令滸紂出帶【跃豳宦侈凌【丛自❾乡雒丨?13、在Actions下,增加一个Property类型,ObjectType为GlobalVariable,变量名为XX_XH_EXECUTABLE_NAMEoPropertyName为INITIALVALUE(注意与VALUE的区别,VALUE是立接赋值,而INITIALVALUE为如果该变量为null或未被创建,会被赋初值,如果有值的话,则不会覆盖),Value为 =nulL这个个性化的冃的是为了直接打开该FORM时,后瓯定义的用到此全局变量的个性化规则冇效。 ConcurrentProgramExecutablPFormPersonal!zations(ConcurrentProgramExecutables)FormNameSeqDescriptionLevelI10INITXXXILEXECUTABLEMEFunctionLOFunctionNameR^FNIXJFMEDebugModeOffConditionActions14、新增一条名为EnterQuery的个性化规则。触发器的事件为WHEN-NEW-FORM-INSTANCE,条件为:global.XX_XH_EXECUTABLE_NAMEisnotnull。即上面定义的那个全局变量的值不为空时才会执行。SeqDescriptionCondition10INTTXX_XHLEXECUTAELEJNAME20Hits'QuayLJfl]OActionsTriggerEv^tTriggerObjectLNEVFFORfTTGTArC(Youcanenteradditionaleventnames.Conditi:glotal.XXXHECECUTAHuENAKEisrotnullfbtinEntQueryMsdb|Site▼▲▼ProcessingModePontest~LevelValue 15、在Actions,设置一个Builtin类型,BuiltinType为DO_KEY,就像在FORM中直接执行的语句。设逍Argument为ENTER.QUERY即进入查询模式。FunctionNameFND_FNDCIMEFormNameFNDCPMTDebugMocConditionActionsAddParanieter...SeqDescription10INHXX.XILEXEXOTAELEJNAME20Bite?Quay16、新增一条名为TxccutcQuery7个性化规则,触发器项为WHEN-NEW-RECORD-INSTANCE,对象为FND_EXECUTABLES,条件为:global.XX_XH_EXECUTABLE_NAMEisnotnuILProcessingMode改为OnlyinEnter-QueryModeo主更是能在查询模式〒继玉执行该代码,如果不改在并发程序界面调出可执行界面时,可执行会停在查询模式里。 OConcurrentProgramExecutab"FormNameOFormPersonal!zations(ConcurrentProgramExecutables)JJJJJJ几—J—J—JJJJJJJJJ八ActionsCondition|Site▼Site▼Site▼▼SeqDescriptionLevel10INHXX_XHJEXECUTABLE_NAME・■丿Function20EnterQueryFunctionI30EcecuteQueryFunctionI1FunctionNameFND_FNDCPMPEDebugModeOff17、在Actions里,设置type为Property,ObjectType为Item,TargetObject为FND_EXECUTABLES.EXECUTABLE_NAME,PropertyName为VALUE,Value为=:global.XX_XH_EXECUTABLE_NAMEeFormNameDebugModeOffConditionFormPersonal!zations(ConcxirrentProgramExecutables) SeqT□口口口LanguageEnabledDescriptionObjectTypSelectByText...IteuFNDEvECUTTTargetObje沁UEPropertyNValu=:global.XXXHECGetValue10INKXX_XH_EXECUTABLEM£Rxxtion20EnterQueryRxxtionI30ExecuteQuayRxxtionSeqDescriptionLevelActionsFunctionName|FNDLFNDCHiffE 18、増加一个Builtin类型,BuiltinType为DOJKEY,Argument为EXECUTE_QUERY。即进行FND_EXECUTABLES・EXECUTABLE_NAME的值等于全局变量的查询。ConditionAddParanieter.…FunctionNameMEFormNameFNDOTKDebugMode|10INITXX.XH_EXECirrAELEJttK£Function20EnterQueryFunctionI30EcecuteFunctionULJActions19、新增一条名为ClearXX_XH_EXECUTABLE_NAMEValue个性化规则。触发器事件为WHEN-NEW-RECORD-INSTANCE,对彖为FND_EXECUTABLES,条件为:global.XX_XH_EXECUTABLE_NAMEisnotnullFormPersonalizations(ConcurrentProgramExecutables)-tfawteitSeqDescriptionLevel10INTTXX.XHKECUrTABLE^NAhEFixictic20BitarQuayRnctic90EiscuteQuayFunctic]40ClearXXXHEXECUTABLENA!置ValueFuncticLevelValue|Site▼▼▼▼ 20、在Actions里,设置Type为Property,ObjectType为GlobalVariable,TargetObjectXX_XH_EXECUTABLE_NAME,PropertvName为VALUE,Value为二nuH,即查询完Z后将该全局变量的值清空。FormPersonalizetions(ConcxirrentProgramExecutables)FunctionNameFormNameFT[10INHXX_XHLEXECUTABLE_NA區Function▼20HiterQuayFunction▼30ExecuteQktaryFunction▼II40ClearXX_XH.EXECUTABLEJWhEValueFunction▼SeqDescriptionLevel0▲*zzVEnabledConditionActions|tET(吏tTy刁All▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼JO▼▼匚口PropertyNamValu二null□GetValueInsertItemValue・・・ValidateEnabled0l±ObjectTypTargetObject^SelectByText...VALLIE21、以下是执行情况。ApplyNow ^^DiagnosticsenabledIFileEditViewFolder1«■AMTools|WindowHelpExecutableCDConcurrentProgramsI務宙他磷頓丨診自3乡齢丨丨?7lXExecutableNameMethodOptionsOutputFormat沁▼0Save(C)f^PrintColumnsJRowsStyle1StyleRequiredPrinter(—Copyto...fSessionControlI—IncompatibilitiesParameters FileEditViewFolderToolsWindowHelpN%a【令滸㉚$掘丨跃瞻讷磷頓丨診自3多讎丨? 已解决和未解决的问题未解决问题问题解决方法责任人完成日期影响已解决问题问题解决方法责任人完成日期影响