jc_dbc_rebuild.prg

爱师软件工作室的教材管理系统源码

DBSetProp('V_FS.cs_del', 'Field', 'DataType', "L")
ENDFUNC
 
FUNCTION MakeView_V_CS_FOR_FSLR
***************** 建立视图为V_CS_FOR_FSLR ***************

CREATE SQL VIEW "V_CS_FOR_FSLR" ; 
   AS SELECT V_cs.cs_csbs, V_cs.js_isbn, V_cs.js_sm, V_cs.js_zz, V_cs.js_cbs,  V_cs.cs_sycs FROM jc!v_cs WHERE V_cs.cs_sycs > 0 ORDER BY V_cs.cs_csbs

DBSetProp('V_CS_FOR_FSLR', 'View', 'UpdateType', 1)
DBSetProp('V_CS_FOR_FSLR', 'View', 'WhereType', 3)
DBSetProp('V_CS_FOR_FSLR', 'View', 'FetchMemo', .F.)
DBSetProp('V_CS_FOR_FSLR', 'View', 'SendUpdates', .T.)
DBSetProp('V_CS_FOR_FSLR', 'View', 'UseMemoSize', 255)
DBSetProp('V_CS_FOR_FSLR', 'View', 'FetchSize', 100)
DBSetProp('V_CS_FOR_FSLR', 'View', 'MaxRecords', -1)
DBSetProp('V_CS_FOR_FSLR', 'View', 'Tables', 'jc!v_cs')
DBSetProp('V_CS_FOR_FSLR', 'View', 'Prepared', .F.)
DBSetProp('V_CS_FOR_FSLR', 'View', 'CompareMemo', .T.)
DBSetProp('V_CS_FOR_FSLR', 'View', 'FetchAsNeeded', .F.)
DBSetProp('V_CS_FOR_FSLR', 'View', 'FetchSize', 100)
DBSetProp('V_CS_FOR_FSLR', 'View', 'Comment', "为fslr录入，大于0册的记录，从v_cs")
DBSetProp('V_CS_FOR_FSLR', 'View', 'BatchUpdateCount', 1)
DBSetProp('V_CS_FOR_FSLR', 'View', 'ShareConnection', .F.)

*!* Field Level Properties for V_CS_FOR_FSLR
* Props for the V_CS_FOR_FSLR.cs_csbs field.
DBSetProp('V_CS_FOR_FSLR.cs_csbs', 'Field', 'KeyField', .T.)
DBSetProp('V_CS_FOR_FSLR.cs_csbs', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_FOR_FSLR.cs_csbs', 'Field', 'UpdateName', 'jc!v_cs.cs_csbs')
DBSetProp('V_CS_FOR_FSLR.cs_csbs', 'Field', 'DataType', "I")
* Props for the V_CS_FOR_FSLR.js_isbn field.
DBSetProp('V_CS_FOR_FSLR.js_isbn', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_FOR_FSLR.js_isbn', 'Field', 'Updatable', .T.)
DBSetProp('V_CS_FOR_FSLR.js_isbn', 'Field', 'UpdateName', 'jc!v_cs.js_isbn')
DBSetProp('V_CS_FOR_FSLR.js_isbn', 'Field', 'DataType', "C(30)")
* Props for the V_CS_FOR_FSLR.js_sm field.
DBSetProp('V_CS_FOR_FSLR.js_sm', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_FOR_FSLR.js_sm', 'Field', 'Updatable', .T.)
DBSetProp('V_CS_FOR_FSLR.js_sm', 'Field', 'UpdateName', 'jc!v_cs.js_sm')
DBSetProp('V_CS_FOR_FSLR.js_sm', 'Field', 'DataType', "C(60)")
* Props for the V_CS_FOR_FSLR.js_zz field.
DBSetProp('V_CS_FOR_FSLR.js_zz', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_FOR_FSLR.js_zz', 'Field', 'Updatable', .T.)
DBSetProp('V_CS_FOR_FSLR.js_zz', 'Field', 'UpdateName', 'jc!v_cs.js_zz')
DBSetProp('V_CS_FOR_FSLR.js_zz', 'Field', 'DataType', "C(20)")
* Props for the V_CS_FOR_FSLR.js_cbs field.
DBSetProp('V_CS_FOR_FSLR.js_cbs', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_FOR_FSLR.js_cbs', 'Field', 'Updatable', .T.)
DBSetProp('V_CS_FOR_FSLR.js_cbs', 'Field', 'UpdateName', 'jc!v_cs.js_cbs')
DBSetProp('V_CS_FOR_FSLR.js_cbs', 'Field', 'DataType', "C(50)")
* Props for the V_CS_FOR_FSLR.cs_sycs field.
DBSetProp('V_CS_FOR_FSLR.cs_sycs', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_FOR_FSLR.cs_sycs', 'Field', 'Updatable', .T.)
DBSetProp('V_CS_FOR_FSLR.cs_sycs', 'Field', 'UpdateName', 'jc!v_cs.cs_sycs')
DBSetProp('V_CS_FOR_FSLR.cs_sycs', 'Field', 'DataType', "I")
ENDFUNC
 
FUNCTION MakeView_V_CS_DYL
***************** 建立视图为V_CS_DYL ***************

CREATE SQL VIEW "V_CS_DYL" ; 
   AS SELECT Cs.cs_csbs, Js.js_isbn, Js.js_sm, Js.js_zz, Js.js_cbs, Js.js_sdjj,  Cs.cs_sycs FROM  jc!js RIGHT OUTER JOIN jc!cs    ON  Js.js_jsbs = Cs.cs_jsbs WHERE Cs.cs_sycs > 0 ORDER BY Cs.cs_csbs

DBSetProp('V_CS_DYL', 'View', 'UpdateType', 1)
DBSetProp('V_CS_DYL', 'View', 'WhereType', 3)
DBSetProp('V_CS_DYL', 'View', 'FetchMemo', .F.)
DBSetProp('V_CS_DYL', 'View', 'SendUpdates', .T.)
DBSetProp('V_CS_DYL', 'View', 'UseMemoSize', 255)
DBSetProp('V_CS_DYL', 'View', 'FetchSize', 100)
DBSetProp('V_CS_DYL', 'View', 'MaxRecords', -1)
DBSetProp('V_CS_DYL', 'View', 'Tables', 'jc!cs,jc!js')
DBSetProp('V_CS_DYL', 'View', 'Prepared', .F.)
DBSetProp('V_CS_DYL', 'View', 'CompareMemo', .T.)
DBSetProp('V_CS_DYL', 'View', 'FetchAsNeeded', .F.)
DBSetProp('V_CS_DYL', 'View', 'FetchSize', 100)
DBSetProp('V_CS_DYL', 'View', 'Comment', "实有册数大于0")
DBSetProp('V_CS_DYL', 'View', 'BatchUpdateCount', 1)
DBSetProp('V_CS_DYL', 'View', 'ShareConnection', .F.)

*!* Field Level Properties for V_CS_DYL
* Props for the V_CS_DYL.cs_csbs field.
DBSetProp('V_CS_DYL.cs_csbs', 'Field', 'KeyField', .T.)
DBSetProp('V_CS_DYL.cs_csbs', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_DYL.cs_csbs', 'Field', 'UpdateName', 'jc!cs.cs_csbs')
DBSetProp('V_CS_DYL.cs_csbs', 'Field', 'DataType', "I")
* Props for the V_CS_DYL.js_isbn field.
DBSetProp('V_CS_DYL.js_isbn', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_DYL.js_isbn', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_DYL.js_isbn', 'Field', 'UpdateName', 'jc!js.js_isbn')
DBSetProp('V_CS_DYL.js_isbn', 'Field', 'DataType', "C(30)")
* Props for the V_CS_DYL.js_sm field.
DBSetProp('V_CS_DYL.js_sm', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_DYL.js_sm', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_DYL.js_sm', 'Field', 'UpdateName', 'jc!js.js_sm')
DBSetProp('V_CS_DYL.js_sm', 'Field', 'DataType', "C(60)")
* Props for the V_CS_DYL.js_zz field.
DBSetProp('V_CS_DYL.js_zz', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_DYL.js_zz', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_DYL.js_zz', 'Field', 'UpdateName', 'jc!js.js_zz')
DBSetProp('V_CS_DYL.js_zz', 'Field', 'DataType', "C(20)")
* Props for the V_CS_DYL.js_cbs field.
DBSetProp('V_CS_DYL.js_cbs', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_DYL.js_cbs', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_DYL.js_cbs', 'Field', 'UpdateName', 'jc!js.js_cbs')
DBSetProp('V_CS_DYL.js_cbs', 'Field', 'DataType', "C(50)")
* Props for the V_CS_DYL.js_sdjj field.
DBSetProp('V_CS_DYL.js_sdjj', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_DYL.js_sdjj', 'Field', 'Updatable', .T.)
DBSetProp('V_CS_DYL.js_sdjj', 'Field', 'UpdateName', 'jc!js.js_sdjj')
DBSetProp('V_CS_DYL.js_sdjj', 'Field', 'DataType', "N(6,2)")
* Props for the V_CS_DYL.cs_sycs field.
DBSetProp('V_CS_DYL.cs_sycs', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_DYL.cs_sycs', 'Field', 'Updatable', .T.)
DBSetProp('V_CS_DYL.cs_sycs', 'Field', 'UpdateName', 'jc!cs.cs_sycs')
DBSetProp('V_CS_DYL.cs_sycs', 'Field', 'DataType', "I")
ENDFUNC
 
FUNCTION MakeView_V_CS_BBFROMV_CS
***************** 建立视图为V_CS_BBFROMV_CS ***************

CREATE SQL VIEW "V_CS_BBFROMV_CS" ; 
   AS SELECT V_cs_a.js_ysdsdw, V_cs_a.js_sm, V_cs_a.js_isbn, V_cs_a.js_zz,  V_cs_a.js_cbs, V_cs_a.js_zzdscs, V_cs_a.cs_sycs, V_cs_a.js_sddj,  V_cs_a.js_sdjj, V_cs_a.cs_pdr, V_cs_a.cs_pdrq, V_cs_a.js_ysdsrq,  V_cs_a.cs_bz FROM jc!v_cs V_cs_a ORDER BY V_cs_a.js_ysdsdw DESC, V_cs_a.js_cbs, V_cs_a.js_isbn

DBSetProp('V_CS_BBFROMV_CS', 'View', 'UpdateType', 1)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'WhereType', 3)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'FetchMemo', .F.)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'SendUpdates', .F.)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'UseMemoSize', 255)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'FetchSize', 100)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'MaxRecords', -1)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'Tables', 'jc!v_cs')
DBSetProp('V_CS_BBFROMV_CS', 'View', 'Prepared', .F.)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'CompareMemo', .T.)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'FetchAsNeeded', .F.)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'FetchSize', 100)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'Comment', "")
DBSetProp('V_CS_BBFROMV_CS', 'View', 'BatchUpdateCount', 1)
DBSetProp('V_CS_BBFROMV_CS', 'View', 'ShareConnection', .F.)

*!* Field Level Properties for V_CS_BBFROMV_CS
* Props for the V_CS_BBFROMV_CS.js_ysdsdw field.
DBSetProp('V_CS_BBFROMV_CS.js_ysdsdw', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_ysdsdw', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_ysdsdw', 'Field', 'UpdateName', 'jc!v_cs.js_ysdsdw')
DBSetProp('V_CS_BBFROMV_CS.js_ysdsdw', 'Field', 'Caption', "订书单位")
DBSetProp('V_CS_BBFROMV_CS.js_ysdsdw', 'Field', 'DataType', "C(100)")
* Props for the V_CS_BBFROMV_CS.js_sm field.
DBSetProp('V_CS_BBFROMV_CS.js_sm', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_sm', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_sm', 'Field', 'UpdateName', 'jc!v_cs.js_sm')
DBSetProp('V_CS_BBFROMV_CS.js_sm', 'Field', 'Caption', "书名")
DBSetProp('V_CS_BBFROMV_CS.js_sm', 'Field', 'DataType', "C(60)")
* Props for the V_CS_BBFROMV_CS.js_isbn field.
DBSetProp('V_CS_BBFROMV_CS.js_isbn', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_isbn', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_isbn', 'Field', 'UpdateName', 'jc!v_cs.js_isbn')
DBSetProp('V_CS_BBFROMV_CS.js_isbn', 'Field', 'Caption', "书号")
DBSetProp('V_CS_BBFROMV_CS.js_isbn', 'Field', 'DataType', "C(30)")
* Props for the V_CS_BBFROMV_CS.js_zz field.
DBSetProp('V_CS_BBFROMV_CS.js_zz', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_zz', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_zz', 'Field', 'UpdateName', 'jc!v_cs.js_zz')
DBSetProp('V_CS_BBFROMV_CS.js_zz', 'Field', 'Caption', "作者")
DBSetProp('V_CS_BBFROMV_CS.js_zz', 'Field', 'DataType', "C(20)")
* Props for the V_CS_BBFROMV_CS.js_cbs field.
DBSetProp('V_CS_BBFROMV_CS.js_cbs', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_cbs', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_cbs', 'Field', 'UpdateName', 'jc!v_cs.js_cbs')
DBSetProp('V_CS_BBFROMV_CS.js_cbs', 'Field', 'Caption', "出版社")
DBSetProp('V_CS_BBFROMV_CS.js_cbs', 'Field', 'DataType', "C(50)")
* Props for the V_CS_BBFROMV_CS.js_zzdscs field.
DBSetProp('V_CS_BBFROMV_CS.js_zzdscs', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_zzdscs', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_zzdscs', 'Field', 'UpdateName', 'jc!v_cs.js_zzdscs')
DBSetProp('V_CS_BBFROMV_CS.js_zzdscs', 'Field', 'Caption', "应有册数")
DBSetProp('V_CS_BBFROMV_CS.js_zzdscs', 'Field', 'DataType', "I")
* Props for the V_CS_BBFROMV_CS.cs_sycs field.
DBSetProp('V_CS_BBFROMV_CS.cs_sycs', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.cs_sycs', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.cs_sycs', 'Field', 'UpdateName', 'jc!v_cs.cs_sycs')
DBSetProp('V_CS_BBFROMV_CS.cs_sycs', 'Field', 'Caption', "实有册数")
DBSetProp('V_CS_BBFROMV_CS.cs_sycs', 'Field', 'DataType', "I")
* Props for the V_CS_BBFROMV_CS.js_sddj field.
DBSetProp('V_CS_BBFROMV_CS.js_sddj', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_sddj', 'Field', 'Updatable', .T.)
DBSetProp('V_CS_BBFROMV_CS.js_sddj', 'Field', 'UpdateName', 'jc!v_cs.js_sddj')
DBSetProp('V_CS_BBFROMV_CS.js_sddj', 'Field', 'Caption', "书的订价")
DBSetProp('V_CS_BBFROMV_CS.js_sddj', 'Field', 'DataType', "N(6,2)")
* Props for the V_CS_BBFROMV_CS.js_sdjj field.
DBSetProp('V_CS_BBFROMV_CS.js_sdjj', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_sdjj', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_sdjj', 'Field', 'UpdateName', 'jc!v_cs.js_sdjj')
DBSetProp('V_CS_BBFROMV_CS.js_sdjj', 'Field', 'Caption', "进书价格")
DBSetProp('V_CS_BBFROMV_CS.js_sdjj', 'Field', 'DataType', "N(6,2)")
* Props for the V_CS_BBFROMV_CS.cs_pdr field.
DBSetProp('V_CS_BBFROMV_CS.cs_pdr', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.cs_pdr', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.cs_pdr', 'Field', 'UpdateName', 'jc!v_cs.cs_pdr')
DBSetProp('V_CS_BBFROMV_CS.cs_pdr', 'Field', 'Caption', "盘点人")
DBSetProp('V_CS_BBFROMV_CS.cs_pdr', 'Field', 'DataType', "C(20)")
* Props for the V_CS_BBFROMV_CS.cs_pdrq field.
DBSetProp('V_CS_BBFROMV_CS.cs_pdrq', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.cs_pdrq', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.cs_pdrq', 'Field', 'UpdateName', 'jc!v_cs.cs_pdrq')
DBSetProp('V_CS_BBFROMV_CS.cs_pdrq', 'Field', 'Caption', "盘点日期")
DBSetProp('V_CS_BBFROMV_CS.cs_pdrq', 'Field', 'DataType', "D")
* Props for the V_CS_BBFROMV_CS.js_ysdsrq field.
DBSetProp('V_CS_BBFROMV_CS.js_ysdsrq', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_ysdsrq', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.js_ysdsrq', 'Field', 'UpdateName', 'jc!v_cs.js_ysdsrq')
DBSetProp('V_CS_BBFROMV_CS.js_ysdsrq', 'Field', 'Caption', "订书日期")
DBSetProp('V_CS_BBFROMV_CS.js_ysdsrq', 'Field', 'DataType', "D")
* Props for the V_CS_BBFROMV_CS.cs_bz field.
DBSetProp('V_CS_BBFROMV_CS.cs_bz', 'Field', 'KeyField', .F.)
DBSetProp('V_CS_BBFROMV_CS.cs_bz', 'Field', 'Updatable', .F.)
DBSetProp('V_CS_BBFROMV_CS.cs_bz', 'Field', 'UpdateName', 'jc!v_cs.cs_bz')
DBSetProp('V_CS_BBFROMV_CS.cs_bz', 'Field', 'Caption', "备注")
DBSetProp('V_CS_BBFROMV_CS.cs_bz', 'Field', 'DataType', "C(10)")
ENDFUNC
 
FUNCTION MakeView_V_FS_BBFROMV_FS
***************** 建立视图为V_FS_BBFROMV_FS ***************

CREATE SQL VIEW "V_FS_BBFROMV_FS" ; 
   AS SELECT V_fs.fs_fsqx, V_fs.js_sm, V_fs.js_isbn, V_fs.js_zz, V_fs.js_cbs,  V_fs.fs_fscs, V_fs.fs_fsdj, V_fs.fs_fsxq, V_fs.fs_fsrq, V_fs.fs_lsrqm,  V_fs.fs_yfzsk, V_fs.fs_yfsk, V_fs.fs_wqsk, V_fs.fs_bz FROM jc!v_fs ORDER BY V_fs.fs_fsqx, V_fs.fs_fsxq, V_fs.js_isbn

DBSetProp('V_FS_BBFROMV_FS', 'View', 'UpdateType', 1)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'WhereType', 3)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'FetchMemo', .F.)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'SendUpdates', .F.)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'UseMemoSize', 255)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'FetchSize', 100)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'MaxRecords', -1)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'Tables', 'jc!v_fs')
DBSetProp('V_FS_BBFROMV_FS', 'View', 'Prepared', .F.)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'CompareMemo', .T.)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'FetchAsNeeded', .F.)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'FetchSize', 100)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'Comment', "")
DBSetProp('V_FS_BBFROMV_FS', 'View', 'BatchUpdateCount', 1)
DBSetProp('V_FS_BBFROMV_FS', 'View', 'ShareConnection', .F.)

*!* Field Level Properties for V_FS_BBFROMV_FS
* Props for the V_FS_BBFROMV_FS.fs_fsqx field.
DBSetProp('V_FS_BBFROMV_FS.fs_fsqx', 'Field', 'KeyField', .F.)
DBSetProp('V_FS_BBFROMV_FS.fs_fsqx', 'Field', 'Updatable', .F.)
DBSetProp('V_FS_BBFROMV_FS.fs_fsqx', 'Field', 'UpdateName', 'jc!v_fs.fs_fsqx')
DBSetProp('V_FS_BBFROMV_FS.fs_fsqx', 'Field', 'DataType', "C(50)")
* Props for the V_FS_BBFROMV_FS.js_sm field.
DBSetProp('V_FS_BBFROMV_FS.js_sm', 'Field', 'KeyField', .F.)
DBSetProp('V_FS_BBFROMV_FS.js_sm', 'Field', 'Updatable', .F.)
DBSetProp('V_FS_BBFROMV_FS.js_sm', 'Field', 'UpdateName', 'jc!v_fs.js_sm')
DBSetProp('V_FS_BBFROMV_FS.js_sm', 'Field', 'DataType', "C(60)")
* Props for the V_FS_BBFROMV_FS.js_isbn field.