我试图在文件中搜索特定模式并将其逐个移动到新文件中。我尝试过，sed -n 's/CREATE PROCEDURE/,/END ;/p' File它再次打印相同的文件。下面给出的是文件内容。
SET PATH "QSYS","QSYS2","JOES" ;
CREATE PROCEDURE JOES.CANCELORDERLINE (
IN ORDERID INTEGER ,
IN ORDERLINEID INTEGER ,
IN NEWORDLINESTATUSCODE VARCHAR(10) ,
IN NAME VARCHAR(50) ,
OUT O_RESULT CHAR(5) )
LANGUAGE SQL
SPECIFIC JOES.CANCELORDERLINE
NOT DETERMINISTIC
MODIFIES SQL DATA
CALLED ON NULL INPUT
SET OPTION ALWBLK = *ALLREAD ,
ALWCPYDTA = *OPTIMIZE ,
COMMIT = *NONE ,
DECRESULT = (31, 31, 00) ,
DFTRDBCOL = *NONE ,
DYNDFTCOL = *NO ,
DYNUSRPRF = *USER ,
SRTSEQ = *HEX
BEGIN ATOMIC
DECLARE V_ORDLINENUMFORDSP VARCHAR ( 16 ) ;
DECLARE V_ORDLINENUMSTR VARCHAR ( 3 ) ;
DECLARE V_ORDLINENUM INT ;
DECLARE V_RESULT CHAR ( 5 ) DEFAULT '00000' ;
DECLARE SQLSTATE CHAR ( 5 ) DEFAULT '00000' ;
DECLARE V_ORDLNSTATUSHISTID INT ;
DECLARE V_ORDERID INT DEFAULT 0 ;
DECLARE V_ORDERLINEID INT DEFAULT 0 ;
DECLARE V_NEWORDLINESTATUSCODE VARCHAR ( 10 ) DEFAULT '' ;
DECLARE V_OLDSTATUS VARCHAR ( 100 ) DEFAULT '' ;
DECLARE EXIT HANDLER FOR SQLEXCEPTION
SET O_RESULT = SQLSTATE ;
SET O_RESULT = V_RESULT ;
SET V_ORDERID = ORDERID ;
SET V_ORDERLINEID = ORDERLINEID ;
SET V_NEWORDLINESTATUSCODE = NEWORDLINESTATUSCODE ;
/* Insert a new record for the new line OrdLineStatusHist*/
SET V_OLDSTATUS = ( SELECT OLSH . ORDLNSTATUSTYPECD FROM JOES . ORDERLINESTATUSHIST OLSH WHERE OLSH . CLIENTORDERID = V_ORDERID AND OLSH . CLIENTORDERLINEID = V_ORDERLINEID AND OLSH . STATUSENDDATETIME IS NULL ) ;
IF ( ( V_OLDSTATUS IS NULL ) OR ( V_OLDSTATUS <> V_NEWORDLINESTATUSCODE ) ) THEN
IF ( EXISTS ( SELECT ORDLNSTATUSHISTID FROM JOES . ORDERLINESTATUSHIST WHERE CLIENTORDERID = V_ORDERID AND CLIENTORDERLINEID = V_ORDERLINEID ) )
THEN
SET V_ORDLNSTATUSHISTID = ( SELECT MAX ( ORDLNSTATUSHISTID ) FROM JOES . ORDERLINESTATUSHIST WHERE CLIENTORDERID = V_ORDERID AND CLIENTORDERLINEID = V_ORDERLINEID ) ;
ELSE
SET V_ORDLNSTATUSHISTID = 0 ;
END IF ;
IF ( V_ORDLNSTATUSHISTID > 0 ) THEN
UPDATE JOES . ORDERLINESTATUSHIST SET STATUSENDDATETIME = CURRENT TIMESTAMP , LASTUPDATENAME = NAME , UPDTIMESTAMP = CURRENT TIMESTAMP WHERE
CLIENTORDERID = V_ORDERID AND CLIENTORDERLINEID = V_ORDERLINEID AND ORDLNSTATUSHISTID = V_ORDLNSTATUSHISTID ;
END IF ;
SET V_ORDLNSTATUSHISTID = V_ORDLNSTATUSHISTID + 1 ;
INSERT INTO JOES . ORDERLINESTATUSHIST ( CLIENTORDERID , CLIENTORDERLINEID , ORDLNSTATUSHISTID , ORDLNSTATUSTYPECD , STATUSSTARTDATETIME , STATUSENDDATETIME ,
CREATENAME , CREATETIMESTAMP ) VALUES ( V_ORDERID , V_ORDERLINEID , V_ORDLNSTATUSHISTID , V_NEWORDLINESTATUSCODE , CURRENT TIMESTAMP , CURRENT TIMESTAMP , NAME , CURRENT TIMESTAMP ) ;
UPDATE JOES . CLIENTORDERLINE SET
ORDLNSTATUSTYPECD = V_NEWORDLINESTATUSCODE , UPDTIMESTAMP = CURRENT TIMESTAMP WHERE CLIENTORDERID = V_ORDERID AND CLIENTORDERLINEID = V_ORDERLINEID ;
END IF ;
END ;
SET PATH "QSYS","QSYS2","JOES" ;
CREATE PROCEDURE JOES.CANCELTRANSFERNUMBER (
IN TRANSFERNUMBER INTEGER ,
OUT O_RETURNCODE CHAR(10) ,
OUT O_RETURNMESSAGE CHAR(50) ,
OUT O_RESULT CHAR(5) )
LANGUAGE SQL
SPECIFIC JOES.CANCELTRANSFERNUMBER
NOT DETERMINISTIC
MODIFIES SQL DATA
CALLED ON NULL INPUT
SET OPTION ALWBLK = *ALLREAD ,
ALWCPYDTA = *OPTIMIZE ,
COMMIT = *NONE ,
DECRESULT = (31, 31, 00) ,
DFTRDBCOL = *NONE ,
DYNDFTCOL = *NO ,
DYNUSRPRF = *USER ,
SRTSEQ = *HEX
BEGIN
DECLARE V_SYNONRTNCD CHAR ( 7 ) DEFAULT '' ;
DECLARE V_RETURMESSAGE CHAR ( 50 ) DEFAULT 'SUCCESS' ;
DECLARE V_RETURNCODE CHAR ( 10 ) DEFAULT '' ;
DECLARE V_TRANSFERNUMBER INTEGER ;
DECLARE V_CHARTRANSFERBATCHNUMBER CHAR ( 15 ) ;
DECLARE V_TRANSFERBATCHNUMBER INTEGER ;
DECLARE V_RESULT CHAR ( 5 ) DEFAULT '00000' ;
DECLARE SQLSTATE CHAR ( 5 ) DEFAULT '00000' ;
SET O_RESULT = SQLSTATE ;
SET O_RESULT = V_RESULT ;
SET V_TRANSFERNUMBER = TRANSFERNUMBER ;
SET V_TRANSFERBATCHNUMBER = ( SELECT MAX ( TRANSFERBATCH ) FROM JOES . TRANSFERREQHEADER WHERE TRANSFERNUMBER = V_TRANSFERNUMBER ) ;
SET V_CHARTRANSFERBATCHNUMBER = CHAR ( V_TRANSFERBATCHNUMBER ) ;
CALL MWWPROD . BAERXFR ( V_SYNONRTNCD , V_CHARTRANSFERBATCHNUMBER , V_RETURNCODE , V_RETURMESSAGE ) ;
DELETE FROM JOES . TRANSFERREQHEADER WHERE TRANSFERBATCH = V_TRANSFERBATCHNUMBER ;
DELETE FROM JOES . TRANSFERREQLINE WHERE TRANSFERBATCH = V_TRANSFERBATCHNUMBER ;
SET O_RETURNCODE = V_RETURNCODE ;
SET O_RETURNMESSAGE = V_RETURMESSAGE ;
END ;
我正在尝试编写一个脚本来帮助我将上述文件拆分为单独的文件。每个文件应该以
设置路径......
并结束于
结尾 ;
所以输出应该是这样的
文件1中的内容：
SET PATH "QSYS","QSYS2","JOES" ;
CREATE PROCEDURE JOES.CANCELORDERLINE (
IN ORDERID INTEGER ,
IN ORDERLINEID INTEGER ,
IN NEWORDLINESTATUSCODE VARCHAR(10) ,
IN NAME VARCHAR(50) ,
OUT O_RESULT CHAR(5) )
LANGUAGE SQL
SPECIFIC JOES.CANCELORDERLINE
NOT DETERMINISTIC
MODIFIES SQL DATA
CALLED ON NULL INPUT
SET OPTION ALWBLK = *ALLREAD ,
ALWCPYDTA = *OPTIMIZE ,
COMMIT = *NONE ,
DECRESULT = (31, 31, 00) ,
DFTRDBCOL = *NONE ,
DYNDFTCOL = *NO ,
DYNUSRPRF = *USER ,
SRTSEQ = *HEX
BEGIN ATOMIC
DECLARE V_ORDLINENUMFORDSP VARCHAR ( 16 ) ;
DECLARE V_ORDLINENUMSTR VARCHAR ( 3 ) ;
DECLARE V_ORDLINENUM INT ;
DECLARE V_RESULT CHAR ( 5 ) DEFAULT '00000' ;
DECLARE SQLSTATE CHAR ( 5 ) DEFAULT '00000' ;
DECLARE V_ORDLNSTATUSHISTID INT ;
DECLARE V_ORDERID INT DEFAULT 0 ;
DECLARE V_ORDERLINEID INT DEFAULT 0 ;
DECLARE V_NEWORDLINESTATUSCODE VARCHAR ( 10 ) DEFAULT '' ;
DECLARE V_OLDSTATUS VARCHAR ( 100 ) DEFAULT '' ;
DECLARE EXIT HANDLER FOR SQLEXCEPTION
SET O_RESULT = SQLSTATE ;
SET O_RESULT = V_RESULT ;
SET V_ORDERID = ORDERID ;
SET V_ORDERLINEID = ORDERLINEID ;
SET V_NEWORDLINESTATUSCODE = NEWORDLINESTATUSCODE ;
/* Insert a new record for the new line OrdLineStatusHist*/
SET V_OLDSTATUS = ( SELECT OLSH . ORDLNSTATUSTYPECD FROM JOES . ORDERLINESTATUSHIST OLSH WHERE OLSH . CLIENTORDERID = V_ORDERID AND OLSH . CLIENTORDERLINEID = V_ORDERLINEID AND OLSH . STATUSENDDATETIME IS NULL ) ;
IF ( ( V_OLDSTATUS IS NULL ) OR ( V_OLDSTATUS <> V_NEWORDLINESTATUSCODE ) ) THEN
IF ( EXISTS ( SELECT ORDLNSTATUSHISTID FROM JOES . ORDERLINESTATUSHIST WHERE CLIENTORDERID = V_ORDERID AND CLIENTORDERLINEID = V_ORDERLINEID ) )
THEN
SET V_ORDLNSTATUSHISTID = ( SELECT MAX ( ORDLNSTATUSHISTID ) FROM JOES . ORDERLINESTATUSHIST WHERE CLIENTORDERID = V_ORDERID AND CLIENTORDERLINEID = V_ORDERLINEID ) ;
ELSE
SET V_ORDLNSTATUSHISTID = 0 ;
END IF ;
IF ( V_ORDLNSTATUSHISTID > 0 ) THEN
UPDATE JOES . ORDERLINESTATUSHIST SET STATUSENDDATETIME = CURRENT TIMESTAMP , LASTUPDATENAME = NAME , UPDTIMESTAMP = CURRENT TIMESTAMP WHERE
CLIENTORDERID = V_ORDERID AND CLIENTORDERLINEID = V_ORDERLINEID AND ORDLNSTATUSHISTID = V_ORDLNSTATUSHISTID ;
END IF ;
SET V_ORDLNSTATUSHISTID = V_ORDLNSTATUSHISTID + 1 ;
INSERT INTO JOES . ORDERLINESTATUSHIST ( CLIENTORDERID , CLIENTORDERLINEID , ORDLNSTATUSHISTID , ORDLNSTATUSTYPECD , STATUSSTARTDATETIME , STATUSENDDATETIME ,
CREATENAME , CREATETIMESTAMP ) VALUES ( V_ORDERID , V_ORDERLINEID , V_ORDLNSTATUSHISTID , V_NEWORDLINESTATUSCODE , CURRENT TIMESTAMP , CURRENT TIMESTAMP , NAME , CURRENT TIMESTAMP ) ;
UPDATE JOES . CLIENTORDERLINE SET
ORDLNSTATUSTYPECD = V_NEWORDLINESTATUSCODE , UPDTIMESTAMP = CURRENT TIMESTAMP WHERE CLIENTORDERID = V_ORDERID AND CLIENTORDERLINEID = V_ORDERLINEID ;
END IF ;
END ;
文件2中的内容：
SET PATH "QSYS","QSYS2","JOES" ;
CREATE PROCEDURE JOES.CANCELTRANSFERNUMBER (
IN TRANSFERNUMBER INTEGER ,
OUT O_RETURNCODE CHAR(10) ,
OUT O_RETURNMESSAGE CHAR(50) ,
OUT O_RESULT CHAR(5) )
LANGUAGE SQL
SPECIFIC JOES.CANCELTRANSFERNUMBER
NOT DETERMINISTIC
MODIFIES SQL DATA
CALLED ON NULL INPUT
SET OPTION ALWBLK = *ALLREAD ,
ALWCPYDTA = *OPTIMIZE ,
COMMIT = *NONE ,
DECRESULT = (31, 31, 00) ,
DFTRDBCOL = *NONE ,
DYNDFTCOL = *NO ,
DYNUSRPRF = *USER ,
SRTSEQ = *HEX
BEGIN
DECLARE V_SYNONRTNCD CHAR ( 7 ) DEFAULT '' ;
DECLARE V_RETURMESSAGE CHAR ( 50 ) DEFAULT 'SUCCESS' ;
DECLARE V_RETURNCODE CHAR ( 10 ) DEFAULT '' ;
DECLARE V_TRANSFERNUMBER INTEGER ;
DECLARE V_CHARTRANSFERBATCHNUMBER CHAR ( 15 ) ;
DECLARE V_TRANSFERBATCHNUMBER INTEGER ;
DECLARE V_RESULT CHAR ( 5 ) DEFAULT '00000' ;
DECLARE SQLSTATE CHAR ( 5 ) DEFAULT '00000' ;
SET O_RESULT = SQLSTATE ;
SET O_RESULT = V_RESULT ;
SET V_TRANSFERNUMBER = TRANSFERNUMBER ;
SET V_TRANSFERBATCHNUMBER = ( SELECT MAX ( TRANSFERBATCH ) FROM JOES . TRANSFERREQHEADER WHERE TRANSFERNUMBER = V_TRANSFERNUMBER ) ;
SET V_CHARTRANSFERBATCHNUMBER = CHAR ( V_TRANSFERBATCHNUMBER ) ;
CALL MWWPROD . BAERXFR ( V_SYNONRTNCD , V_CHARTRANSFERBATCHNUMBER , V_RETURNCODE , V_RETURMESSAGE ) ;
DELETE FROM JOES . TRANSFERREQHEADER WHERE TRANSFERBATCH = V_TRANSFERBATCHNUMBER ;
DELETE FROM JOES . TRANSFERREQLINE WHERE TRANSFERBATCH = V_TRANSFERBATCHNUMBER ;
SET O_RETURNCODE = V_RETURNCODE ;
SET O_RETURNMESSAGE = V_RETURMESSAGE ;
END ;
可以采取什么措施来实现这一目标？我在这里感到震惊。
答案1
我提供的解决方案以“SET PATH”开头每个文件。它不会在该部分的末尾检查“END”（但是您没有解释如果后续的“SET PATH”发生而没有前面的“END”会发生什么，所以我假设这不是一个困难的问题）要求）。
csplit -kz source.sql '/^SET PATH /' '{*}'
该csplit命令source.sql使用与锚定到行开头的字符串“SET PATH”相对应的正则表达式分割文件。有各种标志控制输出文件的名称，但默认情况下示例的输出被放入文件xx00和xx01.