小票自动换行:

select '/*{txt.width=800 txt.height=60 txt.x=10 txt.y=4  txt.height.autosize=yes  DataWindow.detail.height.autosize=yes }*/' from dual

商品漏的加价格组:

declare
begin
  FOR rec IN (SELECT * FROM s_saleprice_group WHERE compid = 2) LOOP
    for rec2 in (select distinct *
                   from t_ware
                  where t_Ware.wareid in
                        (select distinct wareid
                           from t_store_d
                          where wareqty > 0)) loop

      INSERT INTO t_ware_saleprice
        (compid,
         salegroupid,
         wareid,
         saleprice,
         minprice,
         memprice,
         maxsaleprice,
         maxwhlprice,
         stamp,
         memcardflag,
         memminprice,
         memprice2,
         memminprice2,
         memprice3,
         memminprice3,
         memprice4,
         memminprice4,
         memprice5,
         memminprice5,
         memprice6,
         memminprice6,
         memprice7,
         memminprice7,
         pile,
         integral_cash,
         minsaleprice)
        SELECT 2,
               rec.salegroupid,
               rec2.wareid,
               nvl(rec2.advsaleprice, 0),
               0,
               --rec2.minprice,
               nvl(rec2.memadvsaleprice, 0),
               --rec2.memprice,
               nvl(rec2.maxsaleprice, 0),
               nvl(rec2.maxwhlprice, 0),
               seq_stamp.nextval,
               --stamp,
               nvl(rec2.specialflag, 0),
               --memcardflag,2015/7/31 会员特价flag
               --0,
               nvl(rec2.leastsaleprice, 0),
               -- memminprice,
               0,
               --memprice2,
               0,
               --memminprice2,
               0,
               --memprice3,
               0,
               --memminprice3,
               0,
               --memprice4,
               0,
               --memminprice4,
               0,
               --memprice5,
               0,
               --memminprice5,
               0,
               --memprice6,
               0,
               --memminprice6,
               0,
               --memprice7,
               0,
               --memminprice7,
               rec2.pile,
               --pile,
               0,
               rec2.leastsaleprice
          FROM dual
         WHERE NOT EXISTS (SELECT 1
                  FROM t_ware_saleprice s
                 WHERE s.compid = rec2.compid
                   AND s.wareid = rec2.wareid
                   AND s.salegroupid = rec.salegroupid);
    END LOOP;
  end loop;
end;

生成随机库存

DELETE  FROM T_CT_STORE_NEW;

insert into T_CT_STORE_NEW( compid ,batid_type,busno,Vencuscode,Subitemid,Makeno,makedate,Invalidate,stallno,Purprice,Wareqty,
Warecode,Purtax,Buyer,Paytype,Cashtype,old_sys_time,impflag)
SELECT S.compid,'正常批次', s.busno,1080,'0',
DBMS_RANDOM.STRING('A', 5)||'-'||TRUNC(DBMS_RANDOM.VALUE(1000, 9999)),
TO_DATE('2019-01-01', 'YYYY-MM-DD') + DBMS_RANDOM.VALUE(0, 365*5),
TO_DATE('2025-01-01', 'YYYY-MM-DD') + DBMS_RANDOM.VALUE(0, 365*5),  
'11'||S.BUSNO,ROUND(DBMS_RANDOM.VALUE(1, 200), 2) ,
TRUNC(DBMS_RANDOM.VALUE(100, 999)),warecode,'13',168,'01','11201',
 TO_DATE('2023-01-01', 'YYYY-MM-DD') + DBMS_RANDOM.VALUE(0, 365),'0'
FROM  t_ware  cross join s_busi s where s.orgtype in ('30')  AND T_WARE.COMPID =2  AND S.COMPID = 2 
and warecode = '003012';

 begin
  proc_ct_store();
end;