藥店管理論文正文-資料下載頁
2025-08-05 16:10本頁面
【正文】 ary key (PRO_BARCODE))。/*==============================================================*//* Table: SALE *//*==============================================================*/create table SALE ( SALE_ID VARCHAR2(19) not null, STAFF_ID VARCHAR2(7), SALE_DATE DATE, PAY_SUM NUMBER(8,2), REAL_SUM NUMBER(8,2), CHANGE NUMBER(8,2), constraint PK_SALE primary key (SALE_ID))。/*==============================================================*//* Table: SALE_DETAIL *//*==============================================================*/create table SALE_DETAIL ( DETAIL_ID INT not null, SALE_ID VARCHAR2(19), PRO_BARCODE VARCHAR2(9), DETAIL_NUM INT, SALE_PRICE NUMBER(4,2), constraint PK_SALE_DETAIL primary key (DETAIL_ID))。/*==============================================================*//* Table: STAFF *//*==============================================================*/create table STAFF ( STAFF_ID VARCHAR2(7) not null, STAFF_NAME VARCHAR2(11), STAFF_PASS VARCHAR2(7), STAFF_TYPE INT, FLAG INT, REMARK VARCHAR2(30) not null, constraint PK_STAFF primary key (STAFF_ID))。alter table SALE add constraint FK_SALE_STAF foreign key (STAFF_ID) references STAFF (STAFF_ID)。alter table SALE_DETAIL add constraint FK_SALDET_SALE foreign key (SALE_ID) references SALE (SALE_ID)。alter table SALE_DETAIL add constraint FK_SALE_PROD foreign key (PRO_BARCODE) references PRODUCT (PRO_BARCODE)。int db_import(){ db_connect(system,manager,orcl)。 EXEC SQL EXECUTE IMMEDIATE drop user pos cascade。 EXEC SQL EXECUTE IMMEDIATE create user pos identified by pos。 EXEC SQL EXECUTE IMMEDIATE grant connect,resource to pos。 db_disconnect()。 system(imp pos/pos file=)。 return 0。}int db_connect(char* user,char* pass,char* db){ EXEC SQL WHENEVER SQLERROR goto error。 EXEC SQL CONNECT :user IDENTIFIED BY :pass USING :db。 makelog(,db_connect succ)。 return 0。 error: makelog(,db_connect failed)。 makelog(,)。 EXEC SQL WHENEVER SQLERROR CONTINUE。 return 1。}int db_disconnect(){ EXEC SQL WHENEVER SQLERROR CONTINUE。 EXEC SQL COMMIT WORK RELEASE。 return 0。}int main(){ int ret。 char n[1024]。 read_config(ISFIRST,n)。 if (strcmp(n,1)==0) { db_import()。 set_config(ISFIRST,0)。 } ret = db_connect(pos,pos,orcl)。 if (ret==1) { exit(0)。 } do { initcolor()。 if (get_login_window()==1) { if (manage_window()==1) { continue。 } } else { if (pro_print()==1) { continue。 } } }while (1)。 return 0。}29
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號-1