µ±Ç°Î»ÖãºÊ×Ò³ > K3 BOS¿ª·¢°ÙÎʰٴð
¿Í»§»¯¿ª·¢¼¼Êõ×ÊÁÏ¡ª¡ªK/3 BOS¿ª·¢°ÙÎʰٴð
¡¾ÎÊÌâ33¡¿ ÎÒÃÇÔÚʹÓÃK/3 BOS+VB6ΪиÛÍ忪·¢Ò»¸öÍêÈ«¸öÐÔµÄÏîÄ¿¹ÜÀíϵͳ£¬ÊÇʹÓÃÒ»Ì×Õʵķ½Ê½ÊµÏֵģ¬ÕÊÌ×ÀíÃæ½«»á´´½¨¼¸Ê®»ò¸ü¶àµÄ¹¤³ÌÏîÄ¿£¬Õâ¾ÍÉæ¼°µ½»ù´¡×ÊÁÏ¡¢ÏîÄ¿¼Æ»®¡¢ÏîĿʩ¹¤¼Ç¼¡¢ÏîÄ¿Óйص¥¾ÝµÈÖî¶àÐÅÏ¢Òª¸ú¾ßÌåµÄÏîÄ¿°î¶¨ÆðÀ´£¬Óû§Ò»µ©Ñ¡¶¨µ±Ç°ÏîÄ¿ºó£¬ËùÓеÄÊý¾Ýά»¤¡¢²éѯ¼°±¨±í¶¼Ö»Õë¶Ôµ±Ç°ÏîÄ¿²Ù×÷£¬ÏÖÔÚ¼Èëʱ¸úÏîÄ¿°î¶¨µÄÎÊÌâÎÒÒѽâ¾ö£¬¿É²éѯ£¨Ö÷ÒªÊÇÐòʱ±¡£¬°üÀ¨»ù´¡×ÊÁÏÐòʱ±¡ÓëÒµÎñµ¥¾ÝÐòʱ±¡ÈçºÎÓ뵱ǰѡ¶¨ÏîÄ¿°î¶¨£¬¼´Ðòʱ±¡Ö»ÏÔʾÊôÓÚµ±Ç°Ñ¡¶¨ÏîÄ¿µÄÊý¾Ý£©µÄÎÊÌ⻹û½â¾ö£¬Õâ¾ÍÊÇÎÒÌá³öÎÊÌâµÄ±³¾°£¬¸ÃÎÊÌâÈô½â¾ö²»ÁË£¬Õû¸öʹÓÃK/3 BOS½øÐпª·¢µÄ½â¾ö·½°¸½«Ðв»Í¨£¬ÃæÁÙ¼¸Ê®ÍòÔªÍË¿îËðʧµÄ·çÏÕ£¬¹ÊÊ®·ÖÖØÒª¡£ÐèÇóÈçÏÂ(¾Ù¸öÀý):
ÈçÓÃBOS¶¨ÒåÁËÒ»¸öÃûΪ\ÏîÄ¿ÈÎÎñ\µÄ»ù´¡×ÊÁÏ,°üº¬¹¤³ÌÏîÄ¿¡¢ÈÎÎñ´úÂë¡¢ÈÎÎñÃû³ÆµÈ×ֶΣ¬ÈçÏÂËùʾ£º
¹¤³ÌÏîÄ¿ ÈÎÎñ´úÂë ÈÎÎñÃû³Æ ------------------------------- 00000001 01 ½ø³¡×¼±¸ 00000001 02 ½ø³¡
00000002 01 ½ø³¡×¼±¸ 00000002 02 ½ø³¡ ........ .. ........
д²å¼þʱ£¬ÇëÎÊÏëÒª´ïµ½½øÈë¸Ã»ù´¡×ÊÁÏÐòʱ±¡Ê±Ö»ÏÔʾijһ¸ö¹¤³ÌÏîÄ¿µÄÏà¹Ø»ù´¡×ÊÁϼǼ¸ÃÈçºÎ±àÂë
£¨ÔÚÄǸöʼþÈë¿Ú´¦Àí¡¢ÔõÑù´¦Àí£©£¬Í¬Ñù£¬Èç¹ûÊÇÒµÎñµ¥¾ÝÐòʱ±¡£¬ÓÖ¸ÃÈçºÎÉèÖùýÂËÌõ¼þ£¨ÔÚÄǸöÊÂ
¼þÈë¿Ú´¦Àí£¬ÔõÑù´¦Àí£©,±¾ÈË¿´¹ý¿ª·¢ÊֲᣬºÃÏóûÓкÏÊʵÄʼþÈë¿Ú£¬¸üûÓи÷½ÃæµÄÀý×Ó¡£ ¡¾½â´ð¡¿
ÔÚK/310.2+SP1µÄ»·¾³Ï£¬»ù´¡×ÊÁÏÐòʱ²¾ºÍµ¥¾ÝÐòʱ²¾ÓС°ListFilterString¡±Ó¦¿ÉÒÔʵÏÖ¡£µ«ÔÚÖØÐ²éѯ£¬¹ýÂËÌõ¼þʧЧ£¬ÔÚSP2½â¾ö´ËÎÊÌâ
¡¾ÎÊÌâ34¡¿ÔõôÕÒÿ¸ö×ֶεÄË÷Òý ¡¾½â´ð¡¿
²Î¿¼ÏÂÁдúÂë '±íÍ·
THeadCtl = m_BillTransfer.HeadCtl For i = 1 To UBound(THeadCtl)
If UCase(THeadCtl(i).FieldName) = \ m_BillTransfer.head(i).text = \ÕÅÈý\ Exit For End If Next '±íÌå
EntryCtl = m_BillTransfer.EntryCtl
For i = 1 To UBound(m_BillTransfer.EntryCtl)
µÚ17Ò³
¿Í»§»¯¿ª·¢¼¼Êõ×ÊÁÏ¡ª¡ªK/3 BOS¿ª·¢°ÙÎʰٴð
If UCase(EntryCtl(i).FieldName) = \ Exit For End If
Next
¡¾ÎÊÌâ35¡¿BOS ¿ª·¢Ò»ÕÅеĵ¥¾Ý. ÔÚÑ¡µ¥·µ»ØÊ±, Ï£ÍûÄÜÔÚ±íÌå×Ô¶¯Ìí¼ÓÒ»ÐзÖ¼.
ʼþ²âÊÔ´úÂëÈçÏÂ:
Private Sub m_BillInterface_AfterSelBillBeforeFillData(ByVal dcData As KFO.IDictionary, ByVal dctLink As KFO.IDictionary)
Dim CoDict As KFO.Dictionary
Set CoDict = dcData(\¿½±´µÚÒ»Ìõ·Ö¼Êý¾Ý dcData(\Ìí¼Óµ½ dcData
dcData(\= dcData(\//¸ü¸Ä·Ö¼ºÅ 'Stop
set CoDict=Nothing End Sub
ÎÒÓà watch ²é¿´ DcData µÄÖµ. DcData(\Ò²ÓÐÔö¼ÓÒ»Ìõ, µ«·µ»Øºó,ÐÂÌí¼ÓµÄ·Ö¼²¢Î´´øµ½Ä¿±êµ¥¾ÝÉÏ? ÇëÎÊÎÒ»¹ÒªÐÞ¸ÄÄÄЩµØ·½?
¡¾½â´ð¡¿
´Ë·½·¨ÔÚµ÷ÊÔ״̬ÏÂÊDz»ÄܰÑÖµ´«¹ýÈ¥µÄ,±àÒëÖ®ºó¾Í¿ÉÒÔÁË. ÄãµÄ´úÂëÓÐÒÔÏÂÎÊÌâ:
1¡¢È¡·Ö¼ºÅʹÓÃdcData(\2¡¢VectµÄ×î´óÖµÓÃUBound£¬¶ø²»ÊÇcount.
3¡¢È¥×ֶεÄkeyֵʹÓÃm_BillInterface.TableInfo(\ÊÇ×Ö¶ÎÃû¡£ ÕýÈ·µÄ´úÂëÊÇ£º
Dim CoDict As KFO.Dictionary
¡¯dcData(\Set CoDict = dcData(\¿½±´µÚÒ»Ìõ·Ö¼Êý¾Ý dcData(\Ìí¼Óµ½ dcData
dcData(\¸ü¸Ä·Ö¼ºÅ 'Stop
Set CoDict = Nothing
µÚ18Ò³
¿Í»§»¯¿ª·¢¼¼Êõ×ÊÁÏ¡ª¡ªK/3 BOS¿ª·¢°ÙÎʰٴð
¡¾ÎÊÌâ18¡¿BOSµ¥¾Ý²å¼þÀïµÄBusinessCheckʼþÓкÎÓÃ;£¿Ð´ÔÚBusinessCheckÀïÃæµÄ´úÂëÒ²²»Ö´ÐУ¬²»ÖªµÀÕâ¸öʼþµ½µ×ÊÇʲôʱºò´¥·¢µÄ¡£ÔÚAfterBusinessCheckʼþÖÐдµÄ´úÂëÔÚ´òÁË10.2SP1Ö®ºó¾Í²»Ö´ÐÐÁË£¬ÎÒ°Ñ´úÂë·Åµ½BusinessCheckʼþÖÐÒ²²»Ö´ÐУ¬²»ÖªµÀʲôÔÒò£¬µ«AfterUnBusinessCheckÖеĴúÂëÈ´Ö´ÐÐÁË¡£ÎÒÖ»×öÁËÒ»¼¶ÉóºË¡£AfterBusinessCheckʼþºÍBusinessCheckʼþ´¥·¢Ê±µãµÄÎÊÌ⣬ÒԲ鿴״̬´ò¿ªµ¥¾Ý½øÐÐÉóºËʱ£¬ÕâÁ½¸öʼþ²»´¥·¢£¬Ö»ÓÐÔÚÐÞ¸Ä״̬´ò¿ªµ¥¾Ý²¢½øÐÐÉóºË£¬ÕâÁ½¸öʼþ²Å»á±»´¥·¢¡£Ö®Ç°Ã»ÓдòSP1µÄʱºòÊÇûÓÐÕâ¸öÎÊÌâµÄ¡£ÒòÎªÇ¿ÖÆÉóºËÈ˱ØÐëÒª´ò¿ªµ¥¾Ý¼ì²éºóÔÙ½øÐÐÉóºË£¬ËùÒÔÎÒÔڸõ¥¾ÝµÄÐòʱ²¾ÖаÑÉóºË²Ëµ¥È¥µôÁË£¬Ö»ÄÜ´ò¿ªµ¥¾ÝÉóºË¡£²»ÖªµÀÓÐûÓÐÈËÓöµ½Õâ¸öÎÊÌâ¡£ ¡¾½â´ð¡¿
1. ¾¼ì²é£¬ÒԲ鿴״̬´ò¿ªµ¥¾Ý£¬½øÐж༶ÉóºË£¬ÔÚÒµÎñÉóºË¼¶´Î±»ÉóºËʱ£¬Äܹ»´¥·¢ÒµÎñÉóºËʼþ£¬
ÁíÍ⣬×òÌì·¢ÏÖµÄÒµÎñÉóºËʼþÔÚijÌõ¼þÏ»á¶à´Î´¥·¢µÄBUGÒѾÐ޸쬽«»áËæ8.31ÈÕÐëÍê³ÉµÄ¹¦ÄܵãÒ»Æð·¢·Å¡£¹À¼Æ»¹ÊÇÒòΪÓû§Ã»ÓÐÕë¶Ôµ¥¾Ý²å¼þ½øÐбàÂ룬ËùÒÔûÓв¶×½µ½Ê¼þ¡£
µÚ19Ò³
¿Í»§»¯¿ª·¢¼¼Êõ×ÊÁÏ¡ª¡ªK/3 BOS¿ª·¢°ÙÎʰٴð
¶þ¡¢·½°¸Æª
¡¾ÎÊÌâ1¡¿¿Í»§µÄ²úÆ·ÊÇͨ¹ýͼֽÀ´ÖÆÔìµÄ£¬Í¼Ö½ÓÐЩÊǿͻ§×Ô¼ºÌṩ±ê׼ͼֽ£¬ÓÐЩÊǿͻ§µÄÐèÇó×Ô¼º¸ù¾ÝÐèÇó»³öÀ´µÄ£¬±¨¼Ûµ¥ºÜ´óµÄ²¿·ÖÊǸù¾ÝͼֽÀ´µÄ£¬¶øÇÒͼֽÊǹ«Ë¾µÄ»úÃÜ¡£ÏÖÔÚÓû§ÐèÇóÊÇͼֽÐèÒªÓÐÑϸñµÄȨÏÞ¿ØÖÆ£¬×îºÃÄܹ»·ÅÔÚÊý¾Ý¿âÀïÃæÍ³Ò»¹ÜÀí£¬ÓÐͼֽµ¥¾ÝÓУº±¨¼Ûµ¥£¬ÏúÊÛ¶¨µ¥£¬ºÏͬ£»ÏÖÔÚÎÒÃǵÄK/3v10.2µÄ¸½¼þµÄȨÏÞ²»ºÃ¹ÜÀí²»ÄÜÂú×ã¿Í»§µÄÐèÇó¡£ÈçºÎÌṩ½â¾ö·½°¸£¿ ¡¾½â´ð¡¿
1.
ÕâÑùµÄ»°¿ÉÒÔ¶Ôͼֽ¹ÜÀí½øÐпª·¢£¨Èç¹û¶Ô·½ÓÐPDMϵͳ¾Í²»ÐèÒª£©£¬Í¼Ö½´æ·Å¿ÉÒÔÓþÖÓòÍøFTP»òÊý¾Ý¿â´æ´¢½â¾ö£¬ºóÕ߱ȽÏÈÝÒ×½øÐÐȨÏÞ¿ØÖÆ£¬×Ô¼ºÉ趨ȨÏÞ¿ØÖÆ£¬ÏÂÔØ¡¢ä¯ÀÀ¡¢¸üС¢É¾³ý£¬¶¼ÄܽøÐпØÖÆ£»¶øÇÒ¹ØÓÚͼֽ¹ÜÀíÒ²±È½ÏÈÝÒ×½â¾ö£¬ÈçͼֽµÄ°æ±¾¿ØÖÆ¡£ 2.
K/3 BOS½â¾ö²»ÁË¡£
¡¾ÎÊÌâ2¡¿¿Í»§ÐèÒª¿ª·¢Ò»ÕÅÍâ󱨼۵¥£¬ÀïÃæÉæ¼°µ½ÎïÁ϶ÔÓ¦±íµÄÄÚÈÝ£¬¶ÔÓ¦´úÂë¾ßÌåÄÜʵÏֵŦÄܸúÏÖÓеı¨¼Ûµ¥µÄÒ»Ö£¬ÏÖÔÚ²»ÖªµÀÔõôÑùÄܹ»¾ßÌåµÄʵÏÖÕâÑùµÄ¹¦ÄÜ£¬ÒòΪBOSµÄ»ù´¡×ÊÁÏÀïÃæÃ»ÓÐÎïÁ϶ÔÓ¦±í£¬¿ÉÒÔÐÂÔöBOS»ù´¡×ÊÁϺÍÎïÁ϶ÔÓ¦±í¹²ÓÃÒ»¸ö±íÃû£¬µ«ÊÇÔõô¿ÉÒÔ×öµ½¸úÔÓеı¨¼Ûµ¥ÔÚÎïÁ϶ÔÓ¦ÕâÒ»¿éµÄÒ»ÃþÒ»ÑùµÄ¹¦ÄÜ¡£ ¡¾½â´ð¡¿
²»¿ÉÄܾßÓÐÔÀ´Ò»Ä£Ò»ÑùµÄ¹¦ÄÜ£¬¡°BOSÐÂÔö»ù´¡×ÊÁÏ¡¢Ó³Éäµ½ÔÓеÄÊý¾Ý±í»òÊÓͼ¡±·½Ê½Ö»ÄÜÌṩÊý¾ÝÓ³É书ÄÜ£¬±£Ö¤ÄÜͨ¹ýF7Ñ¡ÔñÔÓеÄÊý¾Ý¡£µ«ÓÉÓÚÔÓÐÊý¾ÝµÄÒµÎñÂß¼ÉϵIJ»¿É¿Ø£¬Òò´ËÔÚʵ¼Ê²Ù×÷¹ý³ÌÖн¨Òé¶ÔÕâÖÖ»ù´¡×ÊÁÏÒþ²ØÔö¼Ó¡¢É¾³ý¡¢Ð޸ĵȹ¦ÄÜ£¬À´±£Ö¤ÏµÍ³µÄÎȶ¨ÐÔ¡£
ÔÚÕâÀïµÄÎïÁ϶ÔÓ¦±íûÓлùÓÚBOS¿ª·¢£¬Òò´Ë²»ÄÜÔÚÍâ󱨼۵¥ÉÏÖ±½ÓÒýÓÃÎïÁ϶ÔÓ¦±í£¬¿ÉÒÔͨ¹ýÓ³ÉäÎïÁ϶ÔÓ¦±íµÄÎïÀí±í·½Ê½Âú×ã¿Í»§ÐèÇó¡£
¾ßÌå²Ù×÷£º
1¡¢ÐÂÔöÒ»¸öBOS»ù´¡×ÊÁÏ£¬°ÑÖ÷±íÓ³Éäµ½±íICItemMapping¡£±íICItemMappingÀïÃæÒѾÓÐÊý¾Ý¡£ 2¡¢°ÑBOS»ù´¡×ÊÁÏÀï´úÂë×Ö¶ÎÓ³Éäµ½FMapNumber×ֶΣ¬Ãû³Æ×Ö¶ÎÓ³Éäµ½FMapName£¬±£´æ¡£ 3¡¢BOSµ¥¾ÝÐòʱ±¡²âÊÔµÄʱºò²¢²»ÄܰѱíICItemMappingÀïÃæÒÑÓÐ×ֶεÄÄÚÈÝÏÔʾ³öÀ´£¬Ðòʱ±¡Îª¿Õ¡£
¡¾ÎÊÌâ3¡¿ÄÜ·ñÔÚаæBOSÖÐÌṩһ¸öûÓÐÊý¾Ý,Ö»Óй¤¾ßÌõ¼°²Ëµ¥À¸µÄä¯ÀÀÊý¾Ý´°¿Ú,¹©×ö²å¼þ¼¯³É²Ù×÷´°¿ÚÓÃ,ÏÖÔÚÖ»ÄÜÓõ¥¾Ý´°¿ÚʵÏÖ,´ò¿ªÊ±»¹³öÏÖ¹ýÂË´°¿Ú,ºÜ±ðŤ¡£ ¡¾½â´ð¡¿
BOSÖÐÓÐÒ»¸ö×Ô¶¨ÒåÐòʲ¾Áª²é½Ó¿Ú£¬¿ÉÒÔÖ¸¶¨µ¥¾ÝÀàÐͺ͹ýÂËÌõ¼þÁª²éËùÓÐÐÂÀϵ¥Ðòʲ¾£¬²»Óõ¯³ö¹ýÂËÌõ¼þ¡£
¡¾ÎÊÌâ4¡¿Ðµ¥ÏÂÍÆ£¨¹³»ü£©Àϵ¥Ê±£¬ÔÚе¥Ðòʱ²¾Àï¿ÉÒÔÑ¡ÖжàÕŵ¥¾ÝÏÂÍÆÉú³ÉÀϵ¥£¬µ«ÔÚÀϵ¥µ¥¾ÝÖÐѡȡе¥ÊDz»ÄÜѡȡ¶àÕŵ¥¾Ý£¬ÔõÑù½â¾ö£¿ ¡¾½â´ð¡¿
ÔÚICClassLink.FRemarkÖмÓÉÏ¡°
µÚ20Ò³
¹²·ÖÏí92ƪÏà¹ØÎĵµ