V2.44 ERwi[ 2(( char(18)X%KeyType%TableName %EntityName()Note ID Note Text  c110_64"operation IN ('I' ,'U' ,'D' ,'S' ) c104_23deprecated IN ('Y' ,'N' ) c104_21function_type IN ('F' ,'R' )2CURRENTCURRENT DBSERVERNAME DBSERVERNAMENULLNULLSITENAMESITENAMETODAYTODAYUSERUSER DEFAULT__N_'N' DEFAULT__F_'F' Template Name" Template Code Template TypeTemplate CSX Id#PARENT UPDATE RESTRICT  -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT UPDATE RESTRICT when( not ( -- %%JoinPKPK(inserted,deleted," = "," and") %JoinPKPK(inserted,deleted," = "," and") ) and exists ( select * from %Child where -- %%JoinFKPK(%Child,deleted," = "," and") %JoinFKPK(%Child,deleted," = "," and") )) (execute procedure erwin_raise_except( -746, 'Cannot UPDATE %Parent because %Child exists.' )), 'PARENT UPDATE CASCADE -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT UPDATE CASCADE when( -- %%JoinPKPK(deleted,inserted," <> "," or ") %JoinPKPK(deleted,inserted," <> "," or ") ) (update %Child set -- %%JoinFKPK(%Child,inserted," = ",",") %JoinFKPK(%Child,inserted," = ",",") where -- %%JoinFKPK(%Child,deleted," = "," and") %JoinFKPK(%Child,deleted," = "," and") ), 'PARENT UPDATE SET NULL -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT UPDATE SET NULL when( -- %%JoinPKPK(deleted,inserted," <> "," or " %JoinPKPK(deleted,inserted," <> "," or ") ) (update %Child set -- %%SetFK(%Child,NULL) %SetFK(%Child,NULL) where -- %%JoinFKPK(%Child,deleted," = "," and") %JoinFKPK(%Child,deleted," = "," and") ), 'PARENT DELETE RESTRICT -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT DELETE RESTRICT when (exists ( select * from %Child where -- %%JoinFKPK(%Child,deleted," = "," and") %JoinFKPK(%Child,deleted," = "," and") )) (execute procedure erwin_raise_except( -746, 'Cannot DELETE %Parent because %Child exists.' )), 'PARENT DELETE CASCADE -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT DELETE CASCADE (delete from %Child where -- %%JoinFKPK(%Child,deleted," = "," and") %JoinFKPK(%Child,deleted," = "," and") ), 'PARENT DELETE SET NULL6 -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT DELETE SET NULL (update %Child set -- %%SetFK(%Child,NULL) %SetFK(%Child,NULL) where -- %%JoinFKPK(%Child,deleted," = "," and") %JoinFKPK(%Child,deleted," = "," and") ), 'CHILD INSERT RESTRICT -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD INSERT RESTRICT when ( -- %%NotnullFK(inserted," is not null and") %NotnullFK(inserted," is not null and") not exists ( select * from %Parent where -- %%JoinFKPK(inserted,%Parent," = "," and") %JoinFKPK(inserted,%Parent," = "," and") ) ) (execute procedure erwin_raise_except( -746, 'Cannot INSERT %Child because %Parent does not exist.' )), 'CHILD INSERT CASCADE -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD INSERT CASCADE (insert into %Parent (%ParentPK(",",)) select %ChildFK(",",) from inserted where -- %%NotnullFK(inserted," is not null and") %NotnullFK(inserted," is not null and") not exists ( select * from %Parent where -- %%JoinFKPK(inserted,%Parent," = "," and") %JoinFKPK(inserted,%Parent," = "," and") ) ), 'CHILD INSERT SETNULL -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD INSERT SET NULL (update %Child set -- %%SetFK(%Child,NULL) %SetFK(%Child,NULL) where -- %%JoinPKPK(inserted,%Child," = "," and") %JoinPKPK(inserted,%Child," = "," and") and not exists ( select * from %Parent where -- %%JoinFKPK(inserted,%Parent," = "," and") %JoinFKPK(inserted,%Parent," = "," and") ) ), 'CHILD UPDATE RESTRICT -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD UPDATE RESTRICT when ( -- %%NotnullFK(inserted," is not null and") %NotnullFK(inserted," is not null and") not exists ( select * from %Parent where -- %%JoinFKPK(inserted,%Parent," = "," and") %JoinFKPK(inserted,%Parent," = "," and") ) ) (execute procedure erwin_raise_except( -746, 'Cannot UPDATE %Child because %Parent does not exist.' )), 'CHILD UPDATE CASCADE -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD UPDATE CASCADE when( -- %%JoinPKPK(deleted,inserted," <> "," or") %JoinPKPK(deleted,inserted," <> "," or") ) (insert into %Parent (%ParentPK(",",)) select %ChildFK(",",) from inserted where -- %%NotnullFK(inserted," is not null and") %NotnullFK(inserted," is not null and") not exists ( select * from %Parent where -- %%JoinFKPK(inserted,%Parent," = "," and") %JoinFKPK(inserted,%Parent," = "," and") ) ), 'CHILD UPDATE SETNULL -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD UPDATE SET NULL when( -- %%JoinPKPK(deleted,inserted," <> "," or") %JoinPKPK(deleted,inserted," <> "," or") ) (update %Child set -- %%SetFK(%Child,NULL) %SetFK(%Child,NULL) where -- %%JoinPKPK(%Child,inserted," = "," and") %JoinPKPK(%Child,inserted," = "," and") and not exists ( select * from %Parent where -- %%JoinFKPK(inserted,%Parent," = "," and") %JoinFKPK(inserted,%Parent," = "," and") ) ), 'CHILD DELETE RESTRICT -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD DELETE RESTRICT when (exists (select * from %Parent where -- %%JoinFKPK(deleted,%Parent," = "," and") %JoinFKPK(deleted,%Parent," = "," and") )) (execute procedure erwin_raise_except( -746, 'Cannot DELETE %Child because %Parent exists.' )) 'CHILD DELETE CASCADE -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD DELETE CASCADE (delete from %Parent where -- %%JoinFKPK(deleted,%Parent," = "," and") %JoinFKPK(deleted,%Parent," = "," and") ), !'PARENT INSERT RESTRICT -- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT INSERT RESTRICT when(not exists ( select * from %Child where -- %%JoinFKPK(%Child,inserted," = "," and") %JoinFKPK(%Child,inserted," = "," and") )) (execute procedure erwin_raise_except( -746, 'Cannot INSERT %Parent because %Child does not.' )), $' UPDATE HEADERcreate trigger t%1Action_%15TableName %Action on %TableName referencing OLD as deleted NEW as inserted for each row -- ERwin Builtin %Datetime -- %Action trigger on %TableName(' UPDATE FOOTER; )' DELETE HEADERcreate trigger t%1Action_%15TableName %Action on %TableName referencing OLD as deleted for each row -- ERwin Builtin %Datetime -- %Action trigger on %TableName*' DELETE FOOTER; +' INSERT HEADERcreate trigger t%1Action_%15TableName %Action on %TableName referencing NEW as inserted for each row -- ERwin Builtin %Datetime -- %Action trigger on %TableName,' INSERT FOOTER; -'CUSTOM TRIGGER HEADERJcreate trigger %TriggerName %Action on %TableName %RefClause %Fire .'CUSTOM TRIGGER FOOTERCUSTOM TRIGGER FOOTER; /'CUSTOM TRIGGER DEFAULT BODYcreate trigger %TriggerName %Action on %TableName %RefClause %Fire -- ERwin Builtin %Datetime -- default body for %TriggerName %ForEachChildRel() { %RelTemplate } %ForEachParentRel() { %RelTemplate } ; 0'PARENT UPDATE SET DEFAULT-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT UPDATE SET DEFAULT -- Application specific. Left out intentionally. 'PARENT DELETE SET DEFAULT-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT DELETE SET DEFAULT -- Application specific. Left out intentionally. 'PARENT INSERT SET DEFAULT-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT INSERT SET DEFAULT -- Application specific. Left out intentionally. ''CHILD INSERT SET DEFAULT-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD INSERT SET DEFAULT -- Application specific. Left out intentionally. --'CHILD UPDATE SET DEFAULT-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD UPDATE SET DEFAULT -- Application specific. Left out intentionally. 'CHILD DELETE SET DEFAULT-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD DELETE SET DEFAULT -- Application specific. Left out intentionally. #'CHILD DELETE SET NULL-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON CHILD DELETE SET NULL -- Application specific. Left out intentionally. "'PARENT INSERT SET NULL-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT INSERT SET NULL -- Application specific. Left out intentionally. &'PARENT INSERT CASCADE-- ERwin Builtin %Datetime -- %Parent %VerbPhrase %Child ON PARENT INSERT CASCADE -- Application specific. Left out intentionally. %'RAISE EXECPTION PROCmcreate procedure erwin_raise_except(err int,msg varchar(255)) raise exception err,0,msg; end procedure; 1' Template Name"Template Handle Purpose Text"PurposeTemplate Handle""CHILD DELETE CASCADE!'!'CHILD DELETE RESTRICT ' 'CHILD DELETE SET DEFAULT#'#'CHILD DELETE SET NULL"'"'CHILD INSERT CASCADE''CHILD INSERT RESTRICT''CHILD INSERT SET DEFAULT''CHILD INSERT SET NULL''CHILD UPDATE CASCADE''CHILD UPDATE RESTRICT''CHILD UPDATE SET DEFAULT''CHILD UPDATE SET NULL''CUSTOM TRIGGER DEFAULT BODY0'0'CUSTOM TRIGGER FOOTER/'/'CUSTOM TRIGGER HEADER.'.'PARENT DELETE CASCADE''PARENT DELETE RESTRICT''PARENT DELETE SET DEFAULT''PARENT DELETE SET NULL''PARENT INSERT CASCADE%'%'PARENT INSERT RESTRICT$'$'PARENT INSERT SET DEFAULT''''PARENT INSERT SET NULL&'&'PARENT UPDATE CASCADE''PARENT UPDATE RESTRICT''PARENT UPDATE SET DEFAULT''PARENT UPDATE SET NULL''RAISE EXCEPTION PROC1'1'TRIGGER DELETE FOOTER+'+'TRIGGER DELETE HEADER*'*'TRIGGER INSERT FOOTER-'-'TRIGGER INSERT HEADER,','TRIGGER UPDATE FOOTER)')'TRIGGER UPDATE HEADER('('#@ unsetudtextnamecreate dba procedure sqlj.unsetUDTExtName(udtSQLName varchar(255)) external name 'informix.jvp.dbapplet.impl.JarHandler.unsetUDTExternalName(java.lang.String)' language java end procedure;unloading_module-- create a function to enable unloading of a module. create dba function informix.unloading_module(varchar(255), varchar(255)) returns int external name '' language C; trigger_colskcreate dba function informix.trigger_cols(int) returns informix.lvarchar external name '' language C;trigger_actionscreate dba function informix.trigger_action (int, int) returns informix.lvarchar external name '' language C; texttoclob-- cast from text to clob create function informix.texttoclob(references text) returns informix.clob external name '(bytetoblob)' language c not variant; texttoclob-- cast from text to clob create function informix.texttoclob(references text) returns informix.clob external name '(bytetoblob)' language c not variant;systdist create dba procedure informix.systdist (table_id int, column_no int) returning int, date, char(1), smallfloat, smallfloat, stat, char(1); define v_tabauth char(8); define v_colauth char(3); define is_allowed int; define search_columns int; define v_colno smallint; define v_seqno int; define v_constructed date; define v_mode char(1); define v_resolution smallfloat; define v_confidence smallfloat; define v_encdat stat; define v_owner char(8); define user procedure; define v_stattype char(1); -- First verify that the current user has select privileges on this column let is_allowed = 0; let search_columns = 0; -- Check sysusers to see if the usertype is 'D', ie., the -- current user has dba privileges and may see any columns. select usertype into v_mode from informix.sysusers where username = user; if v_mode = 'D' then let is_allowed = 1; else -- See if the user owns the table, and therefore can see the columns. select owner into v_owner from informix.systables where tabid = table_id; if v_owner = user then let is_allowed = 1; end if end if if is_allowed = 0 then foreach select tabauth into v_tabauth from informix.systabauth where tabid = table_id and (grantee = user or grantee = 'public') if substr(v_tabauth, 1, 1) = 's' or substr(v_tabauth, 1, 1) = 'S' then let is_allowed = 1; exit foreach; elif substr(v_tabauth, 3, 1) = '*' then let search_columns = 1; end if end foreach end if -- Search syscolauth only if user does not have select -- privileges on all columns. If the user has no select -- privileges on any column, then we need search no further. if is_allowed = 0 and search_columns = 1 then foreach select colauth into v_colauth from informix.syscolauth where tabid = table_id and colno = column_no and (grantee = user or grantee = 'public') if substr(v_colauth, 1, 1) = 's' or substr(v_colauth, 1, 1) = 'S' then let is_allowed = 1; exit foreach; end if end foreach end if -- Return with no rows found if not allowed to select from -- the column designated by (tabid,colno). if is_allowed = 0 then raise exception -272; end if -- Now find the distribution rows foreach select seqno, constructed, mode, resolution, confidence, encdat, type into v_seqno, v_constructed, v_mode, v_resolution, v_confidence, v_encdat, v_stattype from informix.sysdistrib where tabid = table_id and colno = column_no order by seqno return v_seqno, v_constructed, v_mode, v_resolution, v_confidence, v_encdat, v_stattype with resume; end foreach -- Engine will return 100 to user end procedure; sysbldprepare-- Define BladeManager boot function create function informix.sysbldprepare (char(64), char(18)) returns integer external name '$INFORMIXDIR/extend/ifxmngr/ifxmngr.bld(SYSBldCustomPrepare)' language C;statoutcreate dba function informix.statout(informix.stat) returns informix.lvarchar external name '(showstat)' language C not variant;  sha_updatecreate dba function informix.sha_update(informix.pointer, integer, informix.pointer, informix.pointer, informix.pointer) returns int external name '(sha_update)' language C;  sha_scancostcreate dba function informix.sha_scancost(informix.pointer, informix.pointer) returns float external name '(sha_scancost)' language C;  sha_rescantcreate dba function informix.sha_rescan(informix.pointer) returns int external name '(sha_rescan)' language C; sha_openpcreate dba function informix.sha_open(informix.pointer) returns int external name '(sha_open)' language C;  sha_insertcreate dba function informix.sha_insert(informix.pointer, informix.pointer, informix.pointer) returns int external name '(sha_insert)' language C; sha_getnextcreate dba function informix.sha_getnext(informix.pointer, informix.pointer, informix.pointer) returns int external name '(sha_getnext)' language C; sha_getbyidcreate dba function informix.sha_getbyid(informix.pointer, informix.pointer, integer) returns int external name '(sha_getbyid)' language C; sha_delete}create dba function informix.sha_delete(informix.pointer, integer) returns int external name '(sha_delete)' language C; sha_create-- MORE IMPORTANT: MUST READ -- DO NOT ADD ANYTHING IN THIS FILE. ADDING STUFF IN THIS FILE MAY CAUSE -- FAILURE IN CONVERSION/REVERSION PROCESS. USE boot920a.sql. ---Define the hash access method. ---Do not grant execute to public for these functions as ---they are special-cased within the engine with the exception ---of ifx_sha_settrace(). create dba function informix.sha_create(informix.pointer) returns int external name '(sha_create)' language C; sha_closercreate dba function informix.sha_close(informix.pointer) returns int external name '(sha_close)' language C; sha_beginscanzcreate dba function informix.sha_beginscan(informix.pointer) returns int external name '(sha_beginscan)' language C; setudtextnamecreate dba procedure sqlj.setUDTExtName(varchar(255), varchar(255)) external name 'informix.jvp.dbapplet.impl.JarHandler.setUDTExternalName(java.lang.String, java.lang.String)' language java end procedure;sendcreate dba function informix.send(informix.ifx_lo_spec) returns informix.sendrecv external name '(send_ifx_lo_spec)' language c not variant;sendcreate dba function informix.send(informix.ifx_lo_spec) returns informix.sendrecv external name '(send_ifx_lo_spec)' language c not variant;sendcreate dba function informix.send(informix.ifx_lo_spec) returns informix.sendrecv external name '(send_ifx_lo_spec)' language c not variant; rtreerootbb---Rtree root Bounding Box function create dba function informix.rtreeRootBB(informix.lvarchar, informix.lvarchar) returns informix.lvarchar with (variant) external name '(rlt_root_bbox_info)' language C;rtnparamtypes_sendcreate dba function informix.rtnparamtypes_send(informix.rtnparamtypes) returning informix.sendrecv external name '(rtnparamtypes_send)' language C not variant; rtn_param_out-- Let us create the output function for this. We do not need an input function create dba function informix.rtn_param_out(informix.rtnparamtypes) returning informix.lvarchar specific paramtypes_out external name '(rtn_param_out)' language C not variant;rowsend~create dba function informix.rowsend(row) returns informix.sendrecv external name '(rowsend)' language C not variant;rowrecv~create dba function informix.rowrecv(informix.sendrecv) returns row external name '(rowrecv)' language C not variant; rowoutput-- Row Functions create dba function informix.rowoutput(row) returns informix.lvarchar external name '(rowoutput)' language C not variant;rowinputcreate dba function informix.rowinput(informix.lvarchar) returns row external name '(rowinput)' language C not variant; rowimportcreate dba function informix.rowimport(informix.impexp) returns row external name '(rowimport)' language C not variant;  rowexport-- Add rowimport/rowexport functions and casts create dba function informix.rowexport(row) returns informix.impexp external name '(rowexport)' language C not variant;!rowcastpcreate dba function informix.rowcast(row) returns row external name '(rowcast)' language C not variant;" rlt_updatecreate dba function informix.rlt_update(pointer, pointer, pointer, pointer, pointer) returns int external name '(rlt_update)' language C;#rlt_undocreate dba function informix.rlt_undo(pointer, pointer, int, int) returns int external name '(rlt_undo)' language C;$rlt_tracelevel_set---Rtree tracing support create dba function informix.rlt_tracelevel_set(integer) returns integer external name '(rlt_tracelevel_set)' language C;%rlt_tracefile_setcreate dba function informix.rlt_tracefile_set(informix.lvarchar) returns integer external name '(rlt_tracefile_set)' language C;&rlt_stat-- Define optimizer related functions for rtree access method create dba function informix.rlt_stat(pointer, pointer) returns int external name '(rlt_stat)' language C;' rlt_revertpcreate dba function informix.rlt_revert(int) returns int external name '(rlt_revert)' language C;( rlt_rescanucreate dba function informix.rlt_rescan(pointer) returns int external name '(rlt_rescan)' language C;)rlt_redo-- Define recovery related functions for the rtree access method: create dba function informix.rlt_redo(pointer, pointer, int, int) returns int external name '(rlt_redo)' language C;*rlt_openqcreate dba function informix.rlt_open(pointer) returns int external name '(rlt_open)' language C;+ rlt_insertcreate dba function informix.rlt_insert(pointer, pointer, pointer) returns int external name '(rlt_insert)' language C;, rlt_getnextcreate dba function informix.rlt_getnext(pointer, pointer, pointer) returns int external name '(rlt_getnext)' language C;- rlt_endscanwcreate dba function informix.rlt_endscan(pointer) returns int external name '(rlt_endscan)' language C;.rlt_dropqcreate dba function informix.rlt_drop(pointer) returns int external name '(rlt_drop)' language C;/ rlt_deletecreate dba function informix.rlt_delete(pointer, pointer, pointer) returns int external name '(rlt_delete)' language C;0 rlt_create-- Define rtree access method: create dba function informix.rlt_create(pointer) returns int external name '(rlt_create)' language C;1rlt_cost{create dba function informix.rlt_cost(pointer, pointer) returns real external name '(rlt_cost)' language C;2 rlt_convert-- Define conversion and reversion functions for rtree index partitions create dba function informix.rlt_convert(int) returns int external name '(rlt_convert)' language C;3 rlt_commitpcreate dba function informix.rlt_commit(int) returns int external name '(rlt_commit)' language C;4 rlt_closescreate dba function informix.rlt_close(pointer) returns int external name '(rlt_close)' language C;5 rlt_check---Define rtree support function for oncheck create function informix.rlt_check(pointer, integer) returns integer external name '(rlt_check)' language C;6 rlt_beginscan{create dba function informix.rlt_beginscan(pointer) returns int external name '(rlt_beginscan)' language C;7 rlt_abortncreate dba function informix.rlt_abort(int) returns int external name '(rlt_abort)' language C;8 replace_jarcreate dba procedure sqlj.replace_jar(varchar(255), varchar(255)) external name 'informix.jvp.dbapplet.impl.JarHandler.replaceJar(java.lang.String, java.lang.String)' language java end procedure;9remove_jar_undeplo: remove_jarcreate dba procedure sqlj.remove_jar(varchar(255)) external name 'informix.jvp.dbapplet.impl.JarHandler.removeJar(java.lang.String) ' language java end procedure;; remove_jarcreate dba procedure sqlj.remove_jar(varchar(255)) external name 'informix.jvp.dbapplet.impl.JarHandler.removeJar(java.lang.String) ' language java end procedure;< reload_modulecreate dba function informix.reload_module(varchar(255), varchar(255)) returns int external name '' language C;= recv_statcreate dba function informix.recv_stat(informix.sendrecv) returns informix.ifx_lo_stat external name '(recv_ifx_lo_stat)' language c not variant;> recv_speccreate dba function informix.recv_spec(informix.sendrecv) returns informix.ifx_lo_spec external name '(recv_ifx_lo_spec)' language c not variant;?mi_get_typedesccreate dba function informix.mi_get_typedesc(int,int) returns informix.lvarchar external name '(mife_type_typedesc)' language C;@mi_get_typedesccreate dba function informix.mi_get_typedesc(int,int) returns informix.lvarchar external name '(mife_type_typedesc)' language C;A mi_cast_datumcreate dba function informix.mi_cast_datum(informix.sendrecv, int, int, int, int) returns informix.sendrecv external name '(mife_cast_datum)' language C;B mi_cast_datumcreate dba function informix.mi_cast_datum(informix.sendrecv, int, int, int, int) returns informix.sendrecv external name '(mife_cast_datum)' language C;C mi_cast_datumcreate dba function informix.mi_cast_datum(informix.sendrecv, int, int, int, int) returns informix.sendrecv external name '(mife_cast_datum)' language C;D mi_cast_datumcreate dba function informix.mi_cast_datum(informix.sendrecv, int, int, int, int) returns informix.sendrecv external name '(mife_cast_datum)' language C;Elotofilecreate dba function informix.lotofile(informix.blob, informix.lvarchar, char(6)) returns informix.lvarchar external name '(blob_to_file)' language c variant;Flotofilecreate dba function informix.lotofile(informix.blob, informix.lvarchar, char(6)) returns informix.lvarchar external name '(blob_to_file)' language c variant;G lolist_sendcreate dba function informix.lolist_send(informix.lolist) returns informix.sendrecv external name '(lolist_send)' language C not variant;H lolist_recvcreate dba function informix.lolist_recv(informix.sendrecv) returns informix.lolist external name '(lolist_recv)' language C not variant;I lolist_outcreate dba function informix.lolist_out(informix.lolist) returns informix.lvarchar external name '(lolist_out)' language C not variant;J lolist_in-- lolist function and cast definitions create dba function informix.lolist_in(informix.lvarchar) returns informix.lolist external name '(lolist_in)' language C not variant;K lohandlescreate dba function informix.lohandles(informix.blob) returns informix.lolist external name '(blob_handles)' language c not variant;L lohandlescreate dba function informix.lohandles(informix.blob) returns informix.lolist external name '(blob_handles)' language c not variant;Mlocopycreate dba function informix.locopy(informix.blob) returns informix.blob external name '(blob_copy)' language c variant;Nlocopycreate dba function informix.locopy(informix.blob) returns informix.blob external name '(blob_copy)' language c variant;Olocopycreate dba function informix.locopy(informix.blob) returns informix.blob external name '(blob_copy)' language c variant;Plocopycreate dba function informix.locopy(informix.blob) returns informix.blob external name '(blob_copy)' language c variant;Q jvpcontrolcreate dba function informix.jvpcontrol(informix.lvarchar) returns informix.lvarchar with (iterator) external name 'informix.jvp.dbapplet.impl.JVPControl.JVPControlUDR(java.lang.String)' language java end function;Rinstall_jar_deploycreate dba procedure sqlj.install_jar_deploy(varchar(255), varchar(255)) external name 'informix.jvp.dbapplet.impl.JarHandler.installJarDeploy(java.lang.String, java.lang.String)' language java end procedure;S install_jar--- --- Register builtin java UDRs for Krakatoa --- create dba procedure sqlj.install_jar(varchar(255), varchar(255)) external name 'informix.jvp.dbapplet.impl.JarHandler.installJar(java.lang.String, java.lang.String)' language java end procedure;T install_jar--- --- Register builtin java UDRs for Krakatoa --- create dba procedure sqlj.install_jar(varchar(255), varchar(255)) external name 'informix.jvp.dbapplet.impl.JarHandler.installJar(java.lang.String, java.lang.String)' language java end procedure;Uindexkeyarray_sendcreate dba function informix.indexkeyarray_send(informix.indexkeyarray) returning informix.sendrecv external name '(indexkeyarray_send)' language C not variant;Vindexkeyarray_out-- Let us create the output function for this. We do not need an input function create dba function informix.indexkeyarray_out(informix.indexkeyarray) returning informix.lvarchar external name '(indexkeyarray_out)' language C not variant;Wikeyextractcolno-- Used to create the sysindexes view definition create dba function informix.ikeyextractcolno(informix.indexkeyarray, integer) returning smallint external name '(ikeyextractcolno)' language C not variant;Xifx_update_extern--- --- end java UDRs --- create dba function informix.ifx_update_extern(varchar(255), varchar(255), varchar(255) ) returns int external name '' language C;Yifx_unload_modulecreate procedure informix.ifx_unload_module (modulename varchar(255), languagename varchar(255)) returns int define retvalue int; let retvalue = unloading_module(modulename, languagename); if retvalue = 0 then return0; end if; if retvalue = -1 then raise exception -9721; else raise exception -9720; end if; end procedure;Zifx_trigger_colscreate dba procedure informix.ifx_trigger_cols(trigid int) returns informix.lvarchar return (informix.trigger_cols(trigid)); end procedure;[ifx_trigger_actioncreate dba procedure informix.ifx_trigger_action(trigid int, when CHAR(10)) returns informix.lvarchar; define cleanwhen char(10); define intwhen int; let cleanwhen = trim (BOTH FROM when); if (cleanwhen = 'BEFORE' or cleanwhen = 'before') then let intwhen = 1; elif (cleanwhen = 'ROW' or cleanwhen = 'row') then let intwhen = 2; elif (cleanwhen = 'AFTER' or cleanwhen = 'after') then let intwhen = 3; else return NULL; end if; return (informix.trigger_action(trigid, intwhen)); end procedure;\ifx_sha_settrace---Create function to enable trace. create dba function informix.ifx_sha_settrace(integer, lvarchar) returns integer external name '(ifx_sha_settrace)' language C;] ifx_ret_types}create dba function informix.ifx_ret_types(integer) returning informix.lvarchar external name '(spr_ret_types)' language c;^ ifx_ret_idsycreate dba function informix.ifx_ret_ids(integer) returning informix.lvarchar external name '(spr_ret_ids)' language c;_ifx_replace_moduleCcreate dba procedure informix.ifx_replace_module (oldmodulename varchar(255), newmodulename varchar(255), languagename varchar(255)) returns int define retvalue int; let retvalue = ifx_invalid_module(oldmodulename, languagename); if retvalue = 0 then let retvalue = ifx_update_extern( oldmodulename, newmodulename, languagename); update informix.sysprocedures set externalname = ifx_new_external(newmodulename, externalname, languagename) where ifx_match_external(oldmodulename, externalname) = 1; let retvalue = ifx_load_internal(newmodulename, languagename); end if; if retvalue = 0 then return 0; else raise exception -9720; end if; end procedure;`ifx_param_typescreate dba function informix.ifx_param_types(integer) returning informix.lvarchar external name '(spr_param_types)' language c;a ifx_param_ids}create dba function informix.ifx_param_ids(integer) returning informix.lvarchar external name '(spr_param_ids)' language c;bifx_new_externalcreate dba function informix.ifx_new_external(varchar(255), varchar(255), varchar(255)) returns informix.lvarchar external name '' language C;cifx_match_externalcreate dba function informix.ifx_match_external(varchar(255), varchar(255)) returns int external name '' language C;difx_load_moduleQcreate dba procedure informix.ifx_load_module (modulename varchar(255), languagename varchar(255)) returns int define retvalue int; let retvalue = reload_module(modulename, languagename); if retvalue = 0 then return 0; else raise exception -9720; end if; end procedure;eifx_load_internal~create dba function informix.ifx_load_internal(varchar(255), varchar(255)) returns int external name '' language C;f ifx_lo_unlockcreate dba function informix.ifx_lo_unlock(integer, int8, integer, int8) returns integer external name '(sq_lo_unlock)' language c;gifx_lo_truncatecreate dba function informix.ifx_lo_truncate(integer, int8) returns integer external name '(sq_lo_truncate)' language c;hifx_lo_to_filecreate dba function informix.ifx_lo_to_file(informix.blob, informix.lvarchar, int, out int) returns informix.lvarchar external name '(sq_lo_to_file)' language c;i ifx_lo_tell{create dba function informix.ifx_lo_tell(integer, out int8) returns integer external name '(sq_lo_tell)' language c;j ifx_lo_statcreate dba function informix.ifx_lo_stat(integer, out informix.ifx_lo_stat) returns integer external name '(sq_lo_stat)' language c;k ifx_lo_seekcreate dba function informix.ifx_lo_seek(integer, int8, integer, out int8) returns integer external name '(sq_lo_seek)' language c;lifx_lo_releasecreate dba function informix.ifx_lo_release(informix.blob) returns integer external name '(sq_lo_release)' language c -- this is variant;m ifx_lo_opencreate dba function informix.ifx_lo_open(informix.blob, integer) returns integer external name '(sq_lo_open)' language c -- this is variant;n ifx_lo_lock-- fastpath entry points to support client sblob range locking create dba function informix.ifx_lo_lock(integer, int8, integer, int8, integer) returns integer external name '(sq_lo_lock)' language c;oifx_lo_from_filecreate dba function informix.ifx_lo_from_file(int, informix.lvarchar, int, int, int) returns integer external name '(sq_lo_from_file)' language c;pifx_lo_filenamecreate dba function informix.ifx_lo_filename(informix.blob, informix.lvarchar) returns informix.lvarchar external name '(sq_lo_filename)' language c;q ifx_lo_create-- fastpath entry points to support client sblob I/O create dba function informix.ifx_lo_create(ifx_lo_spec, integer, out informix.blob) returns integer external name '(sq_lo_create)' language c -- this is variant;rifx_lo_col_sbinfocreate dba function informix.ifx_lo_col_sbinfo(informix.lvarchar, out informix.ifx_lo_spec) returns integer external name '(sq_lo_col_sblobinfo_by_colname)' language c;s ifx_lo_closescreate dba function informix.ifx_lo_close(integer) returns integer external name '(sq_lo_close)' language c;t ifx_lo_altercreate dba function informix.ifx_lo_alter(informix.blob, informix.ifx_lo_spec) returns integer external name '(sq_lo_alter)' language c;uifx_invalid_modulecreate dba function informix.ifx_invalid_module(varchar(255), varchar(255)) returns int external name '' language C;vifx_file_to_filecreate dba function informix.ifx_file_to_file(informix.lvarchar, int, informix.lvarchar, int) returns informix.lvarchar external name '(sq_file_to_file)' language c;wifx_allow_newlinepcreate dba procedure informix.ifx_allow_newline (informix.boolean); external name '' language C end procedure;xget_cursor_tablecreate dba function informix.get_cursor_table(lvarchar) returns lvarchar external name '(mi_get_cursor_table)' language C;y filetoclobcreate dba function informix.filetoclob(informix.lvarchar, char(6)) returns informix.clob external name '(blob_from_file)' -- yes blob_from_file language c variant;z filetoclobcreate dba function informix.filetoclob(informix.lvarchar, char(6)) returns informix.clob external name '(blob_from_file)' -- yes blob_from_file language c variant;{ filetoblob-- blob and clob user functions create dba function informix.filetoblob(informix.lvarchar, char(6)) returns informix.blob external name '(blob_from_file)' language c variant;| filetoblob-- blob and clob user functions create dba function informix.filetoblob(informix.lvarchar, char(6)) returns informix.blob external name '(blob_from_file)' language c variant;} dosyscastcreate dba function informix.dosyscast(informix.pointer, int, int) returning informix.pointer external name '(dosyscast)' language C not variant;~destroymcreate dba function informix.destroy(row) returns row external name '(rowdestroy)' language C not variant;destroymcreate dba function informix.destroy(row) returns row external name '(rowdestroy)' language C not variant;destroymcreate dba function informix.destroy(row) returns row external name '(rowdestroy)' language C not variant;destroymcreate dba function informix.destroy(row) returns row external name '(rowdestroy)' language C not variant;destroymcreate dba function informix.destroy(row) returns row external name '(rowdestroy)' language C not variant;destroymcreate dba function informix.destroy(row) returns row external name '(rowdestroy)' language C not variant;destroymcreate dba function informix.destroy(row) returns row external name '(rowdestroy)' language C not variant;collectionsend---Add new collectionsend() to handle all collection types create dba function informix.collectionsend(collection) returns informix.sendrecv external name '(collectionsend)' language C not variant;collectionrecv-- Send/recv Collection Functions create dba function informix.collectionrecv(informix.sendrecv) returns set external name '(collectionrecv)' language C not variant;collectionoutput-- Collection function definitions create dba function informix.collectionoutput(set) returns informix.lvarchar external name '(collectionoutput)' language C not variant;collectionoutput-- Collection function definitions create dba function informix.collectionoutput(set) returns informix.lvarchar external name '(collectionoutput)' language C not variant;collectionoutput-- Collection function definitions create dba function informix.collectionoutput(set) returns informix.lvarchar external name '(collectionoutput)' language C not variant;collectionoutput-- Collection function definitions create dba function informix.collectionoutput(set) returns informix.lvarchar external name '(collectionoutput)' language C not variant;collectioninputcreate dba function informix.collectioninput(informix.lvarchar) returns set external name '(collectioninput)' language C not variant;collectionimport-- add collectionimport and collectionexport functions create dba function informix.collectionimport(informix.impexp) returns set external name '(collectionimport)' language C not variant;collectionexportcreate dba function informix.collectionexport(collection) returns informix.impexp external name '(collectionexport)' language C not variant;collectionexportcreate dba function informix.collectionexport(collection) returns informix.impexp external name '(collectionexport)' language C not variant;collectionexportcreate dba function informix.collectionexport(collection) returns informix.impexp external name '(collectionexport)' language C not variant;collectionexportcreate dba function informix.collectionexport(collection) returns informix.impexp external name '(collectionexport)' language C not variant;collcast-- cast function definitions create dba function informix.collcast(set) returns set external name '(collcast)' language C not variant;collcast-- cast function definitions create dba function informix.collcast(set) returns set external name '(collcast)' language C not variant;collcast-- cast function definitions create dba function informix.collcast(set) returns set external name '(collcast)' language C not variant;collcast-- cast function definitions create dba function informix.collcast(set) returns set external name '(collcast)' language C not variant;clobsendcreate dba function informix.clobsend(informix.clob) returns informix.sendrecv external name '(clob_send)' language c not variant;clobrecvcreate dba function informix.clobrecv(informix.sendrecv) returns informix.clob external name '(clob_recv)' language c not variant; cloboutputcreate dba function informix.cloboutput(informix.clob) returns informix.lvarchar external name '(clob_output)' language c not variant; clobinputcreate dba function informix.clobinput(informix.lvarchar) returns informix.clob external name '(clob_input)' language c not variant; clobimportcreate dba function informix.clobimport(informix.impexp) returns informix.clob external name '(clob_import)' language c not variant; clobexportcreate dba function informix.clobexport(informix.clob) returns informix.impexp external name '(clob_export)' language c not variant;clientbinval_sendcreate function informix.clientbinval_send(informix.clientbinval) returns informix.sendrecv external name '(mife_clientbinval_send)' language C;clientbinval_recvcreate function informix.clientbinval_recv(informix.sendrecv) returns informix.clientbinval external name '(mife_clientbinval_recv)' language C; bytetoblob-- cast from byte to blob create function informix.bytetoblob(references byte) returns informix.blob external name '(bytetoblob)' language c not variant; bytetoblob-- cast from byte to blob create function informix.bytetoblob(references byte) returns informix.blob external name '(bytetoblob)' language c not variant;blobsendcreate dba function informix.blobsend(informix.blob) returns informix.sendrecv external name '(blob_send)' language c not variant;blobrecvcreate dba function informix.blobrecv(informix.sendrecv) returns informix.blob external name '(blob_recv)' language c not variant; bloboutputcreate dba function informix.bloboutput(informix.blob) returns informix.lvarchar external name '(blob_output)' language c not variant; blobinput-- blob and clob support functions with informix.their associated casts create dba function informix.blobinput(informix.lvarchar) returns informix.blob external name '(blob_input)' language c not variant; blobimportcreate dba function informix.blobimport(informix.impexp) returns informix.blob external name '(blob_import)' language c not variant; blobexportcreate dba function informix.blobexport(informix.blob) returns informix.impexp external name '(blob_export)' language c not variant;assignmcreate dba function informix.assign(row) returns row external name '(rowassign)' language C not variant;assignmcreate dba function informix.assign(row) returns row external name '(rowassign)' language C not variant;assignmcreate dba function informix.assign(row) returns row external name '(rowassign)' language C not variant;assignmcreate dba function informix.assign(row) returns row external name '(rowassign)' language C not variant;assignmcreate dba function informix.assign(row) returns row external name '(rowassign)' language C not variant;assignmcreate dba function informix.assign(row) returns row external name '(rowassign)' language C not variant;assignmcreate dba function informix.assign(row) returns row external name '(rowassign)' language C not variant;alter_java_pathcreate dba procedure sqlj.alter_java_path(varchar(255), lvarchar) external name 'informix.jvp.dbapplet.impl.JarHandler.alterJavaPath(java.lang.String, java.lang.String)' language java end procedure;#@ @ @ ''''''''''''''''Default Entity Icon ( ƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄADefault Entity Small Iconh(@ƄƄƄƄƄƄƄƄƄDefault Icon((Default String Iconh(@ƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄƄ Default Number Iconh(@Default Datetime Icon(Default Blob Iconh(@(((((char(18)%AttName %AttName:%AttName%AttDef %DomainDef %DomainName %AttDomain%AttDefny! !Blobbyte !Datetimedatetime !Numberinteger !String varchar(20)   UdpKeyList Key ID Key Name Key Flags Key Def Key TypeKey Default Key Seq Key List Key MMId6 DiagDbName5 DiagLogin8 DiagSrvrName7 DiagImpType(((INFORMIX g{  maxdevdocroot1 "Arial        ! " DBMS DPO_CLASSDPO_IDDPO_NAME DPO_LAST_NAMEA DPO_EPP_UDS DPO_CSX_IDDPO_UDPSrootdbs  18p4gl_excel p4gl_excel( char(255)comments comments  char(100)called called char(100)returns returns char(100) parameters parameterschar(50) function_name function_namechar(10) id_process id_processchar(64) module_name module_named module_named id_processd function_named parametersdreturnsdcalleddcomments   dd  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> o  p4gl_excelrootB18p4gl_table_usagep4gl_table_usage( char operation operationchar(50) table_name table_namechar(50) function_name function_namechar(64) module_name module_namechar(64) id_package id_packageserialid_table_usage id_table_usage id_table_usage"d.11.8.1 id_packaged.8.1 module_named.1 function_name d table_named operation   ddPKu110_56YESASC  IN <><> IF1NO IF1ASCPROP IF1ASCPROP IF1ASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> n p4gl_table_usageroot$18p4gl_fun_todo p4gl_fun_todo(  char(255)comments commentssmallintitem_num item_numchar(50) function_name function_namechar(64) module_name module_namechar(64) id_package id_package".11.8.2 id_package.8.2 module_name.2 function_name item_num dcomments   ddPKu109_50YESASC  IN <><> IF2NO IF2ASCPROP IF2ASCPROP IF2ASCPROP PKASCPROP PKASCPROP PKASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> m  p4gl_fun_todoroot'18p4gl_fun_returnp4gl_fun_return( char(255)comments commentschar(64) data_type data_type char(64)var_name var_name!smallintitem_num item_num"char(50) function_name function_name#char(64) module_name module_name$char(64) id_package id_package%".11.8.3 id_package.8.3 module_name.3 function_nameitem_numdvar_named data_type dcomments   ddPKu108_44YESASC  IN <><> IF3NO IF3ASCPROP IF3ASCPROP IF3ASCPROP PKASCPROP PKASCPROP PKASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> l p4gl_fun_returnroot18p4gl_fun_parameterp4gl_fun_parameter( char(255)comments comments&char(64) data_type data_type'char(64)var_name var_name(smallintitem_num item_num)char(50) function_name function_name*char(64) module_name module_name+char(64) id_package id_package,".11.8.4 id_package.8.4 module_name.4 function_nameitem_numdvar_named data_typedcomments   ddPKu107_36YESASC  IN <><> IF4NO IF4ASCPROP IF4ASCPROP IF4ASCPROP PKASCPROP PKASCPROP PKASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> k p4gl_fun_parameterrootC18p4gl_fun_processp4gl_fun_process(char(50) function_name function_name-char(64) module_name module_name.char(64) id_package id_package/char(20) id_process id_process0.6 id_process".11.8.5 id_package.8.5 module_name.5 function_name   ddPKu106_29YESASC  IN <><> IF5NO IF6NO IF5ASCPROP IF5ASCPROP IF5ASCPROP IF6ASCPROP PKASCPROP PKASCPROP PKASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> j p4gl_fun_processroot 818p4gl_process p4gl_process(  varchar(255)comments comments1char(20)sub_process_of sub_process_of2char(64) den_process den_process3char(20) disp_process disp_process4char(20) id_process id_process5 id_processd disp_processd den_processd.7sub_process_ofdcomments   ddPKu105_24YESASC  IN <><> IF7NO IF7ASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> i  p4gl_processroot ,18p4gl_function p4gl_function(  varchar(255)comments comments6char deprecated deprecated7char function_type function_type8char(50) function_name function_name9char(64) module_name module_name:char(64) id_package id_package;".11.8 id_package.8 module_name function_named function_typed deprecateddcomments   ddPKu104_15YESASC  IN <><> IF8NO IF8ASCPROP IF8ASCPROP PKASCPROP PKASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> h  p4gl_functionroot 18p4gl_module_progp4gl_module_prog(char(64) module_name module_name<char(64) id_package id_package=char(64) program_name program_name> .10 program_name".11.9 id_package.9 module_name   ddPKu103_9YESASC  IN <><> IF10NO IF9NO IF10ASCPROP IF9ASCPROP IF9ASCPROP PKASCPROP PKASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> g p4gl_module_progroot 18p4gl_module p4gl_module( varchar(255)comments comments?char(64) module_name module_name@char(64) id_package id_packageA".11 id_package module_namedcomments   ddPKu102_5YESASC  IN <><> IF11NO IF11ASCPROP PKASCPROP PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> f  p4gl_moduleroot *n18p4gl_program p4gl_program( varchar(255)comments commentsBchar(64) program_name program_nameC  program_namedcomments   ddPKu101_3YESASC  IN <><> PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> e  p4gl_programroot 18p4gl_package p4gl_package( varchar(255)comments commentsDchar(64) id_package id_packageE" id_package!dcomments   ddPKu100_1YESASC  IN <><> PKASCPROP  LOCK MODEPAGE EXTENT SIZE16 NEXT SIZE16 IN <><> d  p4gl_packageroot e''$' r110_57r110_57e[[''$'[[ r109_51r109_51e DCq''$'Cq r108_45r108_45e LL''$'LL r107_37r107_37e((''$'(( r106_31r106_31e''$' r106_30r106_30d8(''$'HH r105_25r105_25e $$,''$'$$ r104_16r104_16 e $$''$'$$ r103_11r103_11  e N L''$'NL r103_10r103_10  e ''$' r102_6r102_6 do''''o R/12 d ong''''og R/13 " ~
splay% / %SubjectArebwlxQlPages% -- %%Date%l䡴>䡴>B$'C8 ,     *n      NNL L  $$$$ $$$$, 8HH((  ((((  LLLL  DCCqq [[[[  Display1bw4xQxf4lwwa f4䡴>䡴>3%File% -- %Display% / %SubjectArea%%CurrentPage% / %TotalPages% -- %Time% , %Date%9#winspoolAcrobat PDFWriterLPT1:PCL 6 (MakeTXT)Acrobat PDFWritereries PCL 6 ($ 5d``A4 [210 x 297 mm]H9_ ^ ^Default Option Set      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~