CREATE OR REPLACE PROCEDURE SFIS1.accy_input_keypart (
   sn         IN       VARCHAR2,--输入参数 VARCHAR2类型
   DATA       IN       VARCHAR2,
   mygroup    IN       VARCHAR2,
   res        OUT      VARCHAR2,--输出参数
   datetime   IN       DATE,
   emp        IN       VARCHAR2
)
AS 
   kpc     VARCHAR2 (25);--存储过程变量
   ok      VARCHAR2 (25);
   c_ver   VARCHAR2 (25);
BEGIN
   SELECT compal_part_no, version--取数据
     INTO kpc, c_ver
     FROM sfism4.r_part_map_t
    WHERE compal_sn = DATA AND ROWNUM = 1;   check_sn_sps (DATA, sn, 'A', '%', ok);--检查(应该是一个函数吧。)   IF ok = 'OK'
   THEN
      insert_r108 (emp, sn, kpc, DATA, mygroup, datetime, c_ver);--插入数据
   END IF;   res := ok;
EXCEPTION--错误处理。
   WHEN OTHERS
   THEN
      res := 'ACCY_INPUT_KEYPA';
END;