0000: 2f 2f 6d 65 74 61 70 61 72 73 65 72 2e 63 70 70 //metaparser.cpp
0010: 0d 0a 23 69 6e 63 6c 75 64 65 20 22 53 74 64 41 ..#include "StdA
0020: 66 78 2e 68 22 0d 0a 23 69 6e 63 6c 75 64 65 20 fx.h"..#include
0030: 22 6d 65 74 61 70 61 72 73 65 72 2e 68 22 0d 0a "metaparser.h"..
0040: 23 69 6e 63 6c 75 64 65 20 22 76 61 6c 75 65 77 #include "valuew
0050: 6f 72 6b 2e 68 70 70 22 0d 0a 0d 0a 73 74 72 75 ork.hpp"....stru
0060: 63 74 20 70 61 72 73 69 6e 67 44 61 74 61 0d 0a ct parsingData..
0070: 7b 0d 0a 09 70 61 72 73 69 6e 67 44 61 74 61 28 {...parsingData(
0080: 43 53 74 72 69 6e 67 26 20 73 74 72 29 20 3a 20 CString& str) :
0090: 74 65 78 74 28 73 74 72 29 0d 0a 09 7b 0d 0a 09 text(str)...{...
00a0: 09 2f 2f 20 cf e5 f0 e5 e4 e0 ed ed e0 ff 20 f1 .// .......... .
00b0: f2 f0 ee ea e0 20 ec ee e6 e5 f2 20 e1 fb f2 fc ..... ..... ....
00c0: 20 f0 e0 f1 f8 e0 f0 e5 ed e0 2c 20 ed ee 20 f2 ........., .. .
00d0: e0 ea 20 ea e0 ea 20 e1 f3 e4 e5 f2 20 ec ee e4 .. ... ..... ...
00e0: e8 f4 e8 f6 e8 f0 ee e2 e0 f2 fc f1 ff 0d 0a 09 ................
00f0: 09 2f 2f 20 e1 f3 f4 e5 f0 20 f1 f2 f0 ee ea e8 .// ..... ......
0100: 2c 20 f2 ee 20 f4 ee f0 f1 e8 f0 f3 e5 ec 20 f1 , .. ......... .
0110: ee e7 e4 e0 ed e8 e5 20 f1 e2 ee e5 e9 20 ea ee ....... ..... ..
0120: ef e8 e8 20 f1 f2 f0 ee ea e8 0d 0a 09 09 70 57 ... ..........pW
0130: 72 69 74 65 20 3d 20 73 74 72 2e 47 65 74 42 75 rite = str.GetBu
0140: 66 66 65 72 53 65 74 4c 65 6e 67 74 68 28 73 74 fferSetLength(st
0150: 72 2e 47 65 74 4c 65 6e 67 74 68 28 29 29 3b 0d r.GetLength());.
0160: 0a 09 09 70 53 74 61 72 74 41 6c 6c 20 3d 20 70 ...pStartAll = p
0170: 57 72 69 74 65 3b 0d 0a 09 09 70 52 65 61 64 20 Write;....pRead
0180: 3d 20 70 53 74 61 72 74 41 6c 6c 3b 0d 0a 09 09 = pStartAll;....
0190: 70 53 74 61 72 74 4f 66 52 65 61 64 20 3d 20 70 pStartOfRead = p
01a0: 53 74 61 72 74 41 6c 6c 3b 0d 0a 09 09 65 78 74 StartAll;....ext
01b0: 72 61 4c 65 6e 20 3d 20 30 3b 0d 0a 09 09 6d 6f raLen = 0;....mo
01c0: 64 43 6f 75 6e 74 20 3d 20 30 3b 0d 0a 09 7d 0d dCount = 0;...}.
01d0: 0a 0d 0a 09 76 6f 69 64 20 69 6e 73 65 72 74 53 ....void insertS
01e0: 75 62 73 74 28 63 6f 6e 73 74 20 43 53 74 72 69 ubst(const CStri
01f0: 6e 67 26 20 70 61 72 61 6d 29 0d 0a 09 7b 0d 0a ng& param)...{..
0200: 09 09 2f 2f 20 c4 eb ff 20 ed e0 f7 e0 eb e0 20 ..// ... ......
0210: e5 f1 eb e8 20 e5 f1 f2 fc 20 e4 fb f0 e0 20 e2 .... .... .... .
0220: 20 f1 f2 f0 ee ea e5 2c 20 f1 e4 e2 e8 ed e5 ec ......, .......
0230: 20 e1 eb ee ea 20 e2 20 ed e5 e5 2e 0d 0a 09 09 .... . ........
0240: 69 66 28 70 53 74 61 72 74 4f 66 52 65 61 64 20 if(pStartOfRead
0250: 3e 20 70 57 72 69 74 65 29 0d 0a 09 09 7b 0d 0a > pWrite)....{..
0260: 09 09 09 44 57 4f 52 44 20 6c 65 6e 4f 66 42 6c ...DWORD lenOfBl
0270: 6f 63 6b 20 3d 20 70 53 74 61 72 74 4f 66 50 61 ock = pStartOfPa
0280: 72 61 6d 20 2d 20 70 53 74 61 72 74 4f 66 52 65 ram - pStartOfRe
0290: 61 64 3b 0d 0a 09 09 09 6d 65 6d 6d 6f 76 65 28 ad;.....memmove(
02a0: 70 57 72 69 74 65 2c 20 70 53 74 61 72 74 4f 66 pWrite, pStartOf
02b0: 52 65 61 64 2c 20 6c 65 6e 4f 66 42 6c 6f 63 6b Read, lenOfBlock
02c0: 29 3b 0d 0a 09 09 09 70 57 72 69 74 65 20 2b 3d );.....pWrite +=
02d0: 20 6c 65 6e 4f 66 42 6c 6f 63 6b 3b 0d 0a 09 09 lenOfBlock;....
02e0: 7d 0d 0a 09 09 65 6c 73 65 0d 0a 09 09 09 70 57 }....else.....pW
02f0: 72 69 74 65 20 3d 20 28 4c 50 53 54 52 29 70 53 rite = (LPSTR)pS
0300: 74 61 72 74 4f 66 50 61 72 61 6d 3b 0d 0a 0d 0a tartOfParam;....
0310: 09 09 2f 2f 20 d2 e5 ef e5 f0 fc 20 ef ee f1 ec ..// ...... ....
0320: ee f2 f0 e8 ec 2c 20 e5 f1 f2 fc 20 eb e8 20 e2 ....., .... .. .
0330: 20 f1 f2 f0 ee ea e5 20 e4 fb f0 e0 20 f0 e0 e7 ...... .... ...
0340: ec e5 f0 ee ec 20 f1 ee 20 e2 f1 f2 e0 e2 eb ff ..... .. .......
0350: e5 ec fb e9 20 ef e0 f0 e0 ec e5 f2 f0 0d 0a 09 .... ...........
0360: 09 44 57 4f 52 44 20 66 72 65 65 53 70 61 63 65 .DWORD freeSpace
0370: 20 3d 20 70 52 65 61 64 20 2d 20 70 57 72 69 74 = pRead - pWrit
0380: 65 2c 20 70 61 72 61 6d 4c 65 6e 20 3d 20 70 61 e, paramLen = pa
0390: 72 61 6d 2e 47 65 74 4c 65 6e 67 74 68 28 29 3b ram.GetLength();
03a0: 0d 0a 09 09 69 66 28 70 61 72 61 6d 4c 65 6e 20 ....if(paramLen
03b0: 3c 3d 20 66 72 65 65 53 70 61 63 65 29 0d 0a 09 <= freeSpace)...
03c0: 09 7b 0d 0a 09 09 09 6d 65 6d 63 70 79 28 70 57 .{.....memcpy(pW
03d0: 72 69 74 65 2c 20 28 4c 50 43 53 54 52 29 70 61 rite, (LPCSTR)pa
03e0: 72 61 6d 2c 20 70 61 72 61 6d 4c 65 6e 29 3b 0d ram, paramLen);.
03f0: 0a 09 09 09 70 57 72 69 74 65 20 2b 3d 20 70 61 ....pWrite += pa
0400: 72 61 6d 4c 65 6e 3b 0d 0a 09 09 7d 0d 0a 09 09 ramLen;....}....
0410: 65 6c 73 65 0d 0a 09 09 7b 0d 0a 09 09 09 65 78 else....{.....ex
0420: 74 72 61 4c 65 6e 20 2b 3d 20 70 61 72 61 6d 4c traLen += paramL
0430: 65 6e 3b 0d 0a 09 09 09 73 75 62 73 53 74 72 69 en;.....subsStri
0440: 6e 67 73 2e 41 64 64 28 70 61 72 61 6d 29 3b 0d ngs.Add(param);.
0450: 0a 09 09 09 73 75 62 73 4f 66 66 73 65 74 73 2e ....subsOffsets.
0460: 41 64 64 28 70 57 72 69 74 65 20 2d 20 70 53 74 Add(pWrite - pSt
0470: 61 72 74 41 6c 6c 29 3b 0d 0a 09 09 7d 0d 0a 09 artAll);....}...
0480: 09 70 53 74 61 72 74 4f 66 52 65 61 64 20 3d 20 .pStartOfRead =
0490: 70 52 65 61 64 3b 0d 0a 09 7d 0d 0a 09 76 6f 69 pRead;...}...voi
04a0: 64 20 6d 61 6b 65 49 6e 73 65 72 74 73 28 29 0d d makeInserts().
04b0: 0a 09 7b 0d 0a 09 09 69 66 28 70 53 74 61 72 74 ..{....if(pStart
04c0: 4f 66 52 65 61 64 20 3e 20 70 57 72 69 74 65 29 OfRead > pWrite)
04d0: 0d 0a 09 09 7b 0d 0a 09 09 09 6d 65 6d 6d 6f 76 ....{.....memmov
04e0: 65 28 70 57 72 69 74 65 2c 20 70 53 74 61 72 74 e(pWrite, pStart
04f0: 4f 66 52 65 61 64 2c 20 70 52 65 61 64 20 2d 20 OfRead, pRead -
0500: 70 53 74 61 72 74 4f 66 52 65 61 64 29 3b 0d 0a pStartOfRead);..
0510: 09 09 09 70 52 65 61 64 20 2d 3d 20 70 53 74 61 ...pRead -= pSta
0520: 72 74 4f 66 52 65 61 64 20 2d 20 70 57 72 69 74 rtOfRead - pWrit
0530: 65 3b 0d 0a 09 09 7d 0d 0a 09 09 0d 0a 09 09 69 e;....}........i
0540: 6e 74 20 6e 65 77 4c 65 6e 20 3d 20 70 52 65 61 nt newLen = pRea
0550: 64 20 2d 20 70 53 74 61 72 74 41 6c 6c 20 2b 20 d - pStartAll +
0560: 65 78 74 72 61 4c 65 6e 3b 0d 0a 09 09 69 66 28 extraLen;....if(
0570: 6e 65 77 4c 65 6e 20 21 3d 20 74 65 78 74 2e 47 newLen != text.G
0580: 65 74 4c 65 6e 67 74 68 28 29 29 0d 0a 09 09 09 etLength()).....
0590: 74 65 78 74 2e 47 65 74 42 75 66 66 65 72 53 65 text.GetBufferSe
05a0: 74 4c 65 6e 67 74 68 28 6e 65 77 4c 65 6e 29 3b tLength(newLen);
05b0: 0d 0a 09 09 0d 0a 09 09 69 66 28 65 78 74 72 61 ........if(extra
05c0: 4c 65 6e 29 0d 0a 09 09 7b 0d 0a 09 09 09 4c 50 Len)....{.....LP
05d0: 53 54 52 20 70 4e 65 77 57 72 69 74 65 20 3d 20 STR pNewWrite =
05e0: 28 4c 50 53 54 52 29 28 4c 50 43 53 54 52 29 74 (LPSTR)(LPCSTR)t
05f0: 65 78 74 3b 0d 0a 09 09 09 4c 50 53 54 52 20 70 ext;.....LPSTR p
0600: 42 6c 6f 63 6b 45 6e 64 20 3d 20 70 4e 65 77 57 BlockEnd = pNewW
0610: 72 69 74 65 20 2b 20 28 70 52 65 61 64 20 2d 20 rite + (pRead -
0620: 70 53 74 61 72 74 41 6c 6c 29 3b 0d 0a 09 09 09 pStartAll);.....
0630: 44 57 4f 52 44 20 65 6c 20 3d 20 65 78 74 72 61 DWORD el = extra
0640: 4c 65 6e 3b 0d 0a 09 09 09 66 6f 72 28 44 57 4f Len;.....for(DWO
0650: 52 44 20 69 64 78 20 3d 20 73 75 62 73 53 74 72 RD idx = subsStr
0660: 69 6e 67 73 2e 47 65 74 53 69 7a 65 28 29 3b 20 ings.GetSize();
0670: 69 64 78 2d 2d 3b 20 29 0d 0a 09 09 09 7b 0d 0a idx--; ).....{..
0680: 09 09 09 09 4c 50 53 54 52 20 70 53 74 61 72 74 ....LPSTR pStart
0690: 4f 66 42 6c 6f 63 6b 20 3d 20 70 4e 65 77 57 72 OfBlock = pNewWr
06a0: 69 74 65 20 2b 20 73 75 62 73 4f 66 66 73 65 74 ite + subsOffset
06b0: 73 5b 69 64 78 5d 3b 0d 0a 09 09 09 09 63 6f 6e s[idx];......con
06c0: 73 74 20 43 53 74 72 69 6e 67 26 20 70 61 72 61 st CString& para
06d0: 6d 20 3d 20 73 75 62 73 53 74 72 69 6e 67 73 5b m = subsStrings[
06e0: 69 64 78 5d 3b 0d 0a 09 09 09 09 6d 65 6d 6d 6f idx];......memmo
06f0: 76 65 28 70 53 74 61 72 74 4f 66 42 6c 6f 63 6b ve(pStartOfBlock
0700: 20 2b 20 65 6c 2c 20 70 53 74 61 72 74 4f 66 42 + el, pStartOfB
0710: 6c 6f 63 6b 2c 20 70 42 6c 6f 63 6b 45 6e 64 20 lock, pBlockEnd
0720: 2d 20 70 53 74 61 72 74 4f 66 42 6c 6f 63 6b 29 - pStartOfBlock)
0730: 3b 0d 0a 09 09 09 09 44 57 4f 52 44 20 6c 65 6e ;......DWORD len
0740: 20 3d 20 70 61 72 61 6d 2e 47 65 74 4c 65 6e 67 = param.GetLeng
0750: 74 68 28 29 3b 0d 0a 09 09 09 09 65 6c 20 2d 3d th();......el -=
0760: 20 6c 65 6e 3b 0d 0a 09 09 09 09 6d 65 6d 63 70 len;......memcp
0770: 79 28 70 53 74 61 72 74 4f 66 42 6c 6f 63 6b 20 y(pStartOfBlock
0780: 2b 20 65 6c 2c 20 28 4c 50 43 53 54 52 29 70 61 + el, (LPCSTR)pa
0790: 72 61 6d 2c 20 6c 65 6e 29 3b 0d 0a 09 09 09 09 ram, len);......
07a0: 70 42 6c 6f 63 6b 45 6e 64 20 3d 20 70 53 74 61 pBlockEnd = pSta
07b0: 72 74 4f 66 42 6c 6f 63 6b 3b 0d 0a 09 09 09 7d rtOfBlock;.....}
07c0: 0d 0a 09 09 7d 0d 0a 09 7d 0d 0a 09 43 53 74 72 ....}...}...CStr
07d0: 69 6e 67 26 20 74 65 78 74 3b 0d 0a 09 4c 50 43 ing& text;...LPC
07e0: 53 54 52 20 70 53 74 61 72 74 41 6c 6c 2c 20 70 STR pStartAll, p
07f0: 53 74 61 72 74 4f 66 50 61 72 61 6d 2c 20 70 45 StartOfParam, pE
0800: 6e 64 4f 66 50 61 72 61 6d 2c 20 70 52 65 61 64 ndOfParam, pRead
0810: 2c 20 70 53 74 61 72 74 4f 66 52 65 61 64 3b 0d , pStartOfRead;.
0820: 0a 09 4c 50 53 54 52 20 70 57 72 69 74 65 3b 0d ..LPSTR pWrite;.
0830: 0a 09 43 53 74 72 69 6e 67 41 72 72 61 79 20 73 ..CStringArray s
0840: 75 62 73 53 74 72 69 6e 67 73 3b 0d 0a 09 43 44 ubsStrings;...CD
0850: 57 6f 72 64 41 72 72 61 79 20 73 75 62 73 4f 66 WordArray subsOf
0860: 66 73 65 74 73 3b 0d 0a 09 44 57 4f 52 44 20 65 fsets;...DWORD e
0870: 78 74 72 61 4c 65 6e 3b 0d 0a 09 69 6e 74 20 6d xtraLen;...int m
0880: 6f 64 43 6f 75 6e 74 3b 0d 0a 0d 0a 7d 3b 0d 0a odCount;....};..
0890: 0d 0a 73 74 72 75 63 74 20 62 69 6e 64 54 65 78 ..struct bindTex
08a0: 74 50 61 72 61 6d 0d 0a 7b 0d 0a 09 63 6f 6e 73 tParam..{...cons
08b0: 74 20 43 53 74 72 69 6e 67 26 20 70 61 72 61 6d t CString& param
08c0: 4e 61 6d 65 3b 0d 0a 09 43 53 74 72 69 6e 67 20 Name;...CString
08d0: 72 65 73 75 6c 74 3b 0d 0a 09 4d 65 74 61 50 61 result;...MetaPa
08e0: 72 73 65 72 26 20 6d 70 3b 0d 0a 0d 0a 09 62 69 rser& mp;.....bi
08f0: 6e 64 54 65 78 74 50 61 72 61 6d 28 63 6f 6e 73 ndTextParam(cons
0900: 74 20 43 53 74 72 69 6e 67 26 20 70 6e 2c 20 4d t CString& pn, M
0910: 65 74 61 50 61 72 73 65 72 26 20 5f 6d 70 29 20 etaParser& _mp)
0920: 3a 20 70 61 72 61 6d 4e 61 6d 65 28 70 6e 29 2c : paramName(pn),
0930: 20 6d 70 28 5f 6d 70 29 7b 7d 0d 0a 0d 0a 09 76 mp(_mp){}.....v
0940: 6f 69 64 20 65 72 72 6f 72 28 4c 50 43 53 54 52 oid error(LPCSTR
0950: 20 74 65 78 74 29 0d 0a 09 7b 0d 0a 09 09 43 53 text)...{....CS
0960: 74 72 69 6e 67 20 65 72 72 3b 0d 0a 09 09 65 72 tring err;....er
0970: 72 2e 46 6f 72 6d 61 74 28 22 ce f8 e8 e1 ea e0 r.Format("......
0980: 20 ef ee e4 f1 f2 e0 ed ee e2 ea e8 20 f2 e5 ea ........... ...
0990: f1 f2 ee e2 ee e3 ee 20 ef e0 f0 e0 ec e5 f2 f0 ....... ........
09a0: e0 20 25 73 20 2d 20 25 73 22 2c 20 28 4c 50 43 . %s - %s", (LPC
09b0: 53 54 52 29 70 61 72 61 6d 4e 61 6d 65 2c 20 74 STR)paramName, t
09c0: 65 78 74 29 3b 0d 0a 09 09 43 42 4c 4d 6f 64 75 ext);....CBLModu
09d0: 6c 65 3a 3a 52 61 69 73 65 45 78 74 52 75 6e 74 le::RaiseExtRunt
09e0: 69 6d 65 45 72 72 6f 72 28 65 72 72 2c 20 46 41 imeError(err, FA
09f0: 4c 53 45 29 3b 0d 0a 09 7d 0d 0a 0d 0a 09 76 6f LSE);...}.....vo
0a00: 69 64 20 62 69 6e 64 54 65 78 74 28 63 6f 6e 73 id bindText(cons
0a10: 74 20 43 53 74 72 69 6e 67 26 20 74 65 78 74 29 t CString& text)
0a20: 0d 0a 09 7b 0d 0a 09 09 43 53 74 72 69 6e 67 20 ...{....CString
0a30: 74 6d 70 28 74 65 78 74 29 3b 0d 0a 09 09 74 6d tmp(text);....tm
0a40: 70 2e 52 65 70 6c 61 63 65 28 22 27 22 2c 20 22 p.Replace("'", "
0a50: 27 27 22 29 3b 0d 0a 09 09 44 57 4f 52 44 20 6c ''");....DWORD l
0a60: 65 6e 20 3d 20 74 6d 70 2e 47 65 74 4c 65 6e 67 en = tmp.GetLeng
0a70: 74 68 28 29 3b 0d 0a 09 09 4c 50 53 54 52 20 70 th();....LPSTR p
0a80: 74 72 20 3d 20 72 65 73 75 6c 74 2e 47 65 74 42 tr = result.GetB
0a90: 75 66 66 65 72 53 65 74 4c 65 6e 67 74 68 28 6c ufferSetLength(l
0aa0: 65 6e 20 2b 20 32 29 3b 0d 0a 09 09 2a 70 74 72 en + 2);....*ptr
0ab0: 20 3d 20 27 5c 27 27 3b 0d 0a 09 09 6d 65 6d 63 = '\'';....memc
0ac0: 70 79 28 70 74 72 20 2b 20 31 2c 20 28 4c 50 43 py(ptr + 1, (LPC
0ad0: 53 54 52 29 74 6d 70 2c 20 6c 65 6e 29 3b 0d 0a STR)tmp, len);..
0ae0: 09 09 70 74 72 5b 6c 65 6e 20 2b 20 31 5d 20 3d ..ptr[len + 1] =
0af0: 20 27 5c 27 27 3b 0d 0a 09 7d 0d 0a 09 0d 0a 09 '\'';...}......
0b00: 76 6f 69 64 20 62 69 6e 64 4e 75 6d 65 72 69 63 void bindNumeric
0b10: 28 63 6f 6e 73 74 20 43 56 61 6c 75 65 2a 20 70 (const CValue* p
0b20: 56 61 6c 75 65 29 0d 0a 09 7b 0d 0a 09 09 72 65 Value)...{....re
0b30: 73 75 6c 74 20 3d 20 70 56 61 6c 75 65 2d 3e 47 sult = pValue->G
0b40: 65 74 53 74 72 69 6e 67 28 29 3b 0d 0a 09 7d 0d etString();...}.
0b50: 0a 09 0d 0a 09 76 6f 69 64 20 62 69 6e 64 4e 75 .....void bindNu
0b60: 6c 6c 28 29 0d 0a 09 7b 0d 0a 09 09 72 65 73 75 ll()...{....resu
0b70: 6c 74 20 3d 20 22 4e 55 4c 4c 22 3b 0d 0a 09 7d lt = "NULL";...}
0b80: 0d 0a 0d 0a 09 76 6f 69 64 20 62 69 6e 64 46 72 .....void bindFr
0b90: 61 67 6d 65 6e 74 28 63 6f 6e 73 74 20 43 53 74 agment(const CSt
0ba0: 72 69 6e 67 26 20 73 74 72 29 0d 0a 09 7b 0d 0a ring& str)...{..
0bb0: 09 09 72 65 73 75 6c 74 20 3d 20 73 74 72 3b 0d ..result = str;.
0bc0: 0a 09 09 6d 70 2e 70 72 6f 63 65 73 73 53 71 6c ...mp.processSql
0bd0: 28 72 65 73 75 6c 74 29 3b 0d 0a 09 7d 0d 0a 0d (result);...}...
0be0: 0a 09 76 6f 69 64 20 62 69 6e 64 4d 44 49 44 33 ..void bindMDID3
0bf0: 36 28 43 4d 65 74 61 44 61 74 61 4f 62 6a 2a 20 6(CMetaDataObj*
0c00: 70 4f 62 6a 2c 20 69 6e 74 20 6d 6f 64 29 0d 0a pObj, int mod)..
0c10: 09 7b 0d 0a 09 09 69 66 28 21 70 4f 62 6a 29 0d .{....if(!pObj).
0c20: 0a 09 09 09 65 72 72 6f 72 28 22 ce e1 fa e5 ea ....error(".....
0c30: f2 20 ed e5 20 ed e0 e9 e4 e5 ed 22 29 3b 0d 0a . .. ......");..
0c40: 09 09 73 77 69 74 63 68 28 6d 6f 64 29 0d 0a 09 ..switch(mod)...
0c50: 09 7b 0d 0a 09 09 63 61 73 65 20 30 3a 0d 0a 09 .{....case 0:...
0c60: 09 09 7b 0d 0a 09 09 09 09 42 59 54 45 2a 20 70 ..{......BYTE* p
0c70: 74 72 20 3d 20 28 42 59 54 45 2a 29 72 65 73 75 tr = (BYTE*)resu
0c80: 6c 74 2e 47 65 74 42 75 66 66 65 72 53 65 74 4c lt.GetBufferSetL
0c90: 65 6e 67 74 68 28 36 29 3b 0d 0a 09 09 09 09 70 ength(6);......p
0ca0: 74 72 5b 30 5d 20 3d 20 27 5c 27 27 3b 0d 0a 09 tr[0] = '\'';...
0cb0: 09 09 09 2a 28 44 57 4f 52 44 2a 29 28 70 74 72 ...*(DWORD*)(ptr
0cc0: 20 2b 20 31 29 20 3d 20 27 20 20 20 20 27 3b 0d + 1) = ' ';.
0cd0: 0a 09 09 09 09 69 64 32 73 74 72 28 70 4f 62 6a .....id2str(pObj
0ce0: 2d 3e 6d 5f 49 44 2c 20 70 74 72 20 2b 20 31 2c ->m_ID, ptr + 1,
0cf0: 20 34 29 3b 0d 0a 09 09 09 09 70 74 72 5b 35 5d 4);......ptr[5]
0d00: 20 3d 20 27 5c 27 27 3b 0d 0a 09 09 09 7d 0d 0a = '\'';.....}..
0d10: 09 09 09 62 72 65 61 6b 3b 0d 0a 09 09 63 61 73 ...break;....cas
0d20: 65 20 31 3a 0d 0a 09 09 09 72 65 73 75 6c 74 2e e 1:.....result.
0d30: 46 6f 72 6d 61 74 28 22 25 69 22 2c 20 70 4f 62 Format("%i", pOb
0d40: 6a 2d 3e 6d 5f 49 44 29 3b 0d 0a 09 09 09 62 72 j->m_ID);.....br
0d50: 65 61 6b 3b 0d 0a 09 09 64 65 66 61 75 6c 74 3a eak;....default:
0d60: 0d 0a 09 09 09 65 72 72 6f 72 28 22 cd e5 e2 e5 .....error("....
0d70: f0 ed fb e9 20 ec ee e4 e8 f4 e8 ea e0 f2 ee f0 .... ...........
0d80: 22 29 3b 0d 0a 09 09 7d 0d 0a 09 7d 0d 0a 7d 3b ");....}...}..};
0d90: 0d 0a 0d 0a 43 4d 65 74 61 44 61 74 61 4f 62 6a ....CMetaDataObj
0da0: 2a 20 66 69 6e 64 43 6f 6e 73 74 61 6e 74 28 63 * findConstant(c
0db0: 6f 6e 73 74 20 43 53 74 72 69 6e 67 26 20 6e 61 onst CString& na
0dc0: 6d 65 29 09 09 7b 72 65 74 75 72 6e 20 70 4d 65 me)..{return pMe
0dd0: 74 61 44 61 74 61 43 6f 6e 74 2d 3e 47 65 74 43 taDataCont->GetC
0de0: 6f 6e 73 74 44 65 66 28 6e 61 6d 65 29 3b 7d 0d onstDef(name);}.
0df0: 0a 43 4d 65 74 61 44 61 74 61 4f 62 6a 2a 20 66 .CMetaDataObj* f
0e00: 69 6e 64 52 65 66 65 72 65 6e 63 65 28 63 6f 6e indReference(con
0e10: 73 74 20 43 53 74 72 69 6e 67 26 20 6e 61 6d 65 st CString& name
0e20: 29 09 7b 72 65 74 75 72 6e 20 70 4d 65 74 61 44 ).{return pMetaD
0e30: 61 74 61 43 6f 6e 74 2d 3e 47 65 74 53 54 79 70 ataCont->GetSTyp
0e40: 65 44 65 66 28 6e 61 6d 65 29 3b 7d 0d 0a 43 4d eDef(name);}..CM
0e50: 65 74 61 44 61 74 61 4f 62 6a 2a 20 66 69 6e 64 etaDataObj* find
0e60: 44 6f 63 75 6d 65 6e 74 28 63 6f 6e 73 74 20 43 Document(const C
0e70: 53 74 72 69 6e 67 26 20 6e 61 6d 65 29 09 09 7b String& name)..{
0e80: 72 65 74 75 72 6e 20 70 4d 65 74 61 44 61 74 61 return pMetaData
0e90: 43 6f 6e 74 2d 3e 47 65 74 44 6f 63 44 65 66 28 Cont->GetDocDef(
0ea0: 6e 61 6d 65 29 3b 7d 0d 0a 43 4d 65 74 61 44 61 name);}..CMetaDa
0eb0: 74 61 4f 62 6a 2a 20 66 69 6e 64 45 6e 75 6d 28 taObj* findEnum(
0ec0: 63 6f 6e 73 74 20 43 53 74 72 69 6e 67 26 20 6e const CString& n
0ed0: 61 6d 65 29 09 09 09 7b 72 65 74 75 72 6e 20 70 ame)...{return p
0ee0: 4d 65 74 61 44 61 74 61 43 6f 6e 74 2d 3e 47 65 MetaDataCont->Ge
0ef0: 74 45 6e 75 6d 44 65 66 28 6e 61 6d 65 29 3b 7d tEnumDef(name);}
0f00: 0d 0a 43 4d 65 74 61 44 61 74 61 4f 62 6a 2a 20 ..CMetaDataObj*
0f10: 66 69 6e 64 4a 6f 75 72 6e 61 6c 28 63 6f 6e 73 findJournal(cons
0f20: 74 20 43 53 74 72 69 6e 67 26 20 6e 61 6d 65 29 t CString& name)
0f30: 09 09 7b 72 65 74 75 72 6e 20 70 4d 65 74 61 44 ..{return pMetaD
0f40: 61 74 61 43 6f 6e 74 2d 3e 47 65 74 4a 6f 75 72 ataCont->GetJour
0f50: 6e 61 6c 44 65 66 28 6e 61 6d 65 29 3b 7d 0d 0a nalDef(name);}..
0f60: 43 4d 65 74 61 44 61 74 61 4f 62 6a 2a 20 66 69 CMetaDataObj* fi
0f70: 6e 64 53 65 6c 43 6f 6c 28 63 6f 6e 73 74 20 43 ndSelCol(const C
0f80: 53 74 72 69 6e 67 26 20 6e 61 6d 65 29 09 09 7b String& name)..{
0f90: 72 65 74 75 72 6e 20 70 4d 65 74 61 44 61 74 61 return pMetaData
0fa0: 43 6f 6e 74 2d 3e 47 65 6e 44 6f 63 53 65 6c 52 Cont->GenDocSelR
0fb0: 65 66 73 28 29 2d 3e 47 65 74 49 74 65 6d 28 6e efs()->GetItem(n
0fc0: 61 6d 65 29 3b 7d 0d 0a 43 4d 65 74 61 44 61 74 ame);}..CMetaDat
0fd0: 61 4f 62 6a 2a 20 66 69 6e 64 43 61 6c 65 6e 64 aObj* findCalend
0fe0: 61 72 28 63 6f 6e 73 74 20 43 53 74 72 69 6e 67 ar(const CString
0ff0: 26 20 6e 61 6d 65 29 09 09 7b 72 65 74 75 72 6e & name)..{return
1000: 20 70 4d 65 74 61 44 61 74 61 43 6f 6e 74 2d 3e pMetaDataCont->
1010: 47 65 74 43 61 6c 65 6e 64 61 72 54 79 70 65 44 GetCalendarTypeD
1020: 65 66 28 6e 61 6d 65 29 3b 7d 0d 0a 43 4d 65 74 ef(name);}..CMet
1030: 61 44 61 74 61 4f 62 6a 2a 20 66 69 6e 64 43 61 aDataObj* findCa
1040: 6c 63 4a 6f 75 72 6e 61 6c 28 63 6f 6e 73 74 20 lcJournal(const
1050: 43 53 74 72 69 6e 67 26 20 6e 61 6d 65 29 09 7b CString& name).{
1060: 72 65 74 75 72 6e 20 70 4d 65 74 61 44 61 74 61 return pMetaData
1070: 43 6f 6e 74 2d 3e 47 65 74 43 4a 44 65 66 28 6e Cont->GetCJDef(n
1080: 61 6d 65 29 3b 7d 0d 0a 43 4d 65 74 61 44 61 74 ame);}..CMetaDat
1090: 61 4f 62 6a 2a 20 66 69 6e 64 41 6c 67 6f 72 69 aObj* findAlgori
10a0: 74 68 6d 28 63 6f 6e 73 74 20 43 53 74 72 69 6e thm(const CStrin
10b0: 67 26 20 6e 61 6d 65 29 09 7b 72 65 74 75 72 6e g& name).{return
10c0: 20 70 4d 65 74 61 44 61 74 61 43 6f 6e 74 2d 3e pMetaDataCont->
10d0: 47 65 74 41 6c 67 6f 72 69 74 68 6d 44 65 66 28 GetAlgorithmDef(
10e0: 6e 61 6d 65 29 3b 7d 0d 0a 43 4d 65 74 61 44 61 name);}..CMetaDa
10f0: 74 61 4f 62 6a 2a 20 66 69 6e 64 53 62 63 6e 74 taObj* findSbcnt
1100: 4b 69 6e 64 28 63 6f 6e 73 74 20 43 53 74 72 69 Kind(const CStri
1110: 6e 67 26 20 6e 61 6d 65 29 0d 0a 7b 0d 0a 09 43 ng& name)..{...C
1120: 42 75 68 44 65 66 2a 20 70 42 75 68 20 3d 20 70 BuhDef* pBuh = p
1130: 4d 65 74 61 44 61 74 61 43 6f 6e 74 2d 3e 47 65 MetaDataCont->Ge
1140: 74 42 75 68 44 65 66 28 29 3b 0d 0a 09 69 66 28 tBuhDef();...if(
1150: 70 42 75 68 29 0d 0a 09 09 72 65 74 75 72 6e 20 pBuh)....return
1160: 70 42 75 68 2d 3e 47 65 74 53 62 4b 69 6e 64 44 pBuh->GetSbKindD
1170: 65 66 73 28 29 2d 3e 47 65 74 49 74 65 6d 28 6e efs()->GetItem(n
1180: 61 6d 65 29 3b 0d 0a 09 72 65 74 75 72 6e 20 4e ame);...return N
1190: 55 4c 4c 3b 0d 0a 7d 0d 0a 43 4d 65 74 61 44 61 ULL;..}..CMetaDa
11a0: 74 61 4f 62 6a 2a 20 66 69 6e 64 43 68 61 72 74 taObj* findChart
11b0: 4f 66 41 63 63 73 28 63 6f 6e 73 74 20 43 53 74 OfAccs(const CSt
11c0: 72 69 6e 67 26 20 6e 61 6d 65 29 0d 0a 7b 0d 0a ring& name)..{..
11d0: 09 43 42 75 68 44 65 66 2a 20 70 42 75 68 20 3d .CBuhDef* pBuh =
11e0: 20 70 4d 65 74 61 44 61 74 61 43 6f 6e 74 2d 3e pMetaDataCont->
11f0: 47 65 74 42 75 68 44 65 66 28 29 3b 0d 0a 09 69 GetBuhDef();...i
1200: 66 28 70 42 75 68 29 0d 0a 09 09 72 65 74 75 72 f(pBuh)....retur
1210: 6e 20 70 42 75 68 2d 3e 47 65 74 50 6c 61 6e 44 n pBuh->GetPlanD
1220: 65 66 28 6e 61 6d 65 29 3b 0d 0a 09 72 65 74 75 ef(name);...retu
1230: 72 6e 20 4e 55 4c 4c 3b 0d 0a 7d 0d 0a 0d 0a 74 rn NULL;..}....t
1240: 65 6d 70 6c 61 74 65 3c 74 79 70 65 6e 61 6d 65 emplate<typename
1250: 20 4f 70 3e 0d 0a 76 6f 69 64 20 62 69 6e 64 4d Op>..void bindM
1260: 65 74 61 4e 61 6d 65 4f 62 6a 28 62 69 6e 64 54 etaNameObj(bindT
1270: 65 78 74 50 61 72 61 6d 26 20 62 69 6e 64 65 72 extParam& binder
1280: 2c 20 69 6e 74 20 6d 6f 64 2c 20 43 53 74 72 69 , int mod, CStri
1290: 6e 67 41 72 72 61 79 26 20 70 61 72 74 73 2c 20 ngArray& parts,
12a0: 4f 70 20 6f 70 29 0d 0a 7b 0d 0a 09 69 66 28 70 Op op)..{...if(p
12b0: 61 72 74 73 2e 47 65 74 53 69 7a 65 28 29 20 3d arts.GetSize() =
12c0: 3d 20 32 29 0d 0a 09 09 62 69 6e 64 65 72 2e 62 = 2)....binder.b
12d0: 69 6e 64 4d 44 49 44 33 36 28 6f 70 28 70 61 72 indMDID36(op(par
12e0: 74 73 5b 31 5d 29 2c 20 6d 6f 64 29 3b 0d 0a 7d ts[1]), mod);..}
12f0: 0d 0a 0d 0a 0d 0a 69 6e 6c 69 6e 65 20 73 74 61 ......inline sta
1300: 74 69 63 20 76 6f 69 64 20 62 69 6e 64 48 69 73 tic void bindHis
1310: 74 6f 72 79 50 72 6f 70 28 62 69 6e 64 54 65 78 toryProp(bindTex
1320: 74 50 61 72 61 6d 26 20 62 69 6e 64 65 72 2c 20 tParam& binder,
1330: 69 6e 74 20 6d 6f 64 2c 20 43 53 74 72 69 6e 67 int mod, CString
1340: 41 72 72 61 79 26 20 70 61 72 74 73 29 0d 0a 7b Array& parts)..{
1350: 0d 0a 09 69 66 28 70 61 72 74 73 2e 47 65 74 53 ...if(parts.GetS
1360: 69 7a 65 28 29 20 3d 3d 20 33 29 0d 0a 09 7b 0d ize() == 3)...{.
1370: 0a 09 09 43 53 62 43 6e 74 54 79 70 65 44 65 66 ...CSbCntTypeDef
1380: 2a 20 70 52 65 66 20 3d 20 70 4d 65 74 61 44 61 * pRef = pMetaDa
1390: 74 61 43 6f 6e 74 2d 3e 47 65 74 53 54 79 70 65 taCont->GetSType
13a0: 44 65 66 28 70 61 72 74 73 5b 31 5d 29 3b 0d 0a Def(parts[1]);..
13b0: 09 09 69 66 28 70 52 65 66 29 0d 0a 09 09 7b 0d ..if(pRef)....{.
13c0: 0a 09 09 09 43 53 62 43 6e 74 50 61 72 61 6d 44 ....CSbCntParamD
13d0: 65 66 2a 20 70 50 72 6f 70 20 3d 20 70 52 65 66 ef* pProp = pRef
13e0: 2d 3e 47 65 74 50 61 72 61 6d 44 65 66 28 70 61 ->GetParamDef(pa
13f0: 72 74 73 5b 32 5d 29 3b 0d 0a 09 09 09 69 66 28 rts[2]);.....if(
1400: 70 50 72 6f 70 20 26 26 20 70 50 72 6f 70 2d 3e pProp && pProp->
1410: 49 73 44 61 74 65 44 65 70 28 29 29 0d 0a 09 09 IsDateDep())....
1420: 09 09 62 69 6e 64 65 72 2e 62 69 6e 64 4d 44 49 ..binder.bindMDI
1430: 44 33 36 28 70 50 72 6f 70 2c 20 6d 6f 64 29 3b D36(pProp, mod);
1440: 0d 0a 09 09 7d 0d 0a 09 7d 0d 0a 7d 0d 0a 0d 0a ....}...}..}....
1450: 76 6f 69 64 20 69 73 4d 65 74 61 4e 61 6d 65 28 void isMetaName(
1460: 62 69 6e 64 54 65 78 74 50 61 72 61 6d 26 20 62 bindTextParam& b
1470: 69 6e 64 65 72 2c 20 69 6e 74 20 6d 6f 64 29 0d inder, int mod).
1480: 0a 7b 0d 0a 09 73 74 61 74 69 63 20 73 74 72 75 .{...static stru
1490: 63 74 20 70 72 65 66 69 78 5f 66 69 6e 64 65 72 ct prefix_finder
14a0: 0d 0a 09 7b 0d 0a 09 09 65 6e 75 6d 7b 0d 0a 09 ...{....enum{...
14b0: 09 09 6d 6e 43 6f 6e 73 74 2c 20 6d 6e 52 65 66 ..mnConst, mnRef
14c0: 4b 69 6e 64 2c 20 6d 6e 44 6f 63 4b 69 6e 64 2c Kind, mnDocKind,
14d0: 20 6d 6e 45 6e 75 6d 4b 69 6e 64 2c 20 6d 6e 50 mnEnumKind, mnP
14e0: 65 72 69 6f 64 69 63 2c 0d 0a 09 09 09 6d 6e 4a eriodic,.....mnJ
14f0: 6f 75 72 6e 61 6c 2c 20 6d 6e 53 65 6c 43 6f 6c ournal, mnSelCol
1500: 2c 20 6d 6e 43 61 6c 65 6e 64 61 72 2c 20 6d 6e , mnCalendar, mn
1510: 48 6f 6c 69 64 61 79 73 2c 20 6d 6e 43 61 6c 63 Holidays, mnCalc
1520: 4a 6f 75 72 6e 61 6c 2c 20 6d 6e 41 6c 67 6f 72 Journal, mnAlgor
1530: 69 74 68 6d 2c 0d 0a 09 09 09 6d 6e 45 6d 70 74 ithm,.....mnEmpt
1540: 79 49 44 2c 20 6d 6e 45 6d 70 74 79 49 44 31 33 yID, mnEmptyID13
1550: 2c 20 6d 6e 45 6e 75 6d 2c 20 6d 6e 53 75 62 63 , mnEnum, mnSubc
1560: 4b 69 6e 64 2c 20 6d 6e 43 68 61 72 74 4f 66 41 Kind, mnChartOfA
1570: 63 63 73 2c 0d 0a 09 09 7d 3b 0d 0a 09 09 70 72 ccs,....};....pr
1580: 65 66 69 78 5f 66 69 6e 64 65 72 28 29 0d 0a 09 efix_finder()...
1590: 09 7b 0d 0a 09 09 09 73 74 61 74 69 63 20 73 74 .{.....static st
15a0: 72 75 63 74 20 7b 4c 50 43 53 54 52 20 6e 61 6d ruct {LPCSTR nam
15b0: 65 31 2c 20 6e 61 6d 65 32 3b 20 69 6e 74 20 69 e1, name2; int i
15c0: 64 78 3b 7d 20 70 72 65 66 69 78 65 73 5b 5d 20 dx;} prefixes[]
15d0: 3d 20 7b 0d 0a 09 09 09 09 7b 22 ca ee ed f1 f2 = {......{".....
15e0: e0 ed f2 e0 22 2c 09 09 09 22 43 6f 6e 73 74 61 ....",..."Consta
15f0: 6e 74 22 2c 20 6d 6e 43 6f 6e 73 74 7d 2c 0d 0a nt", mnConst},..
1600: 09 09 09 09 7b 22 c2 e8 e4 d1 ef f0 e0 e2 ee f7 ....{"..........
1610: ed e8 ea e0 22 2c 09 09 22 52 65 66 65 72 65 6e ....",.."Referen
1620: 63 65 4b 69 6e 64 22 2c 20 6d 6e 52 65 66 4b 69 ceKind", mnRefKi
1630: 6e 64 7d 2c 0d 0a 09 09 09 09 7b 22 c2 e8 e4 c4 nd},......{"....
1640: ee ea f3 ec e5 ed f2 e0 22 2c 09 09 22 44 6f 63 ........",.."Doc
1650: 75 6d 65 6e 74 4b 69 6e 64 22 2c 20 6d 6e 44 6f umentKind", mnDo
1660: 63 4b 69 6e 64 7d 2c 0d 0a 09 09 09 09 7b 22 c2 cKind},......{".
1670: e8 e4 cf e5 f0 e5 f7 e8 f1 eb e5 ed e8 ff 22 2c ..............",
1680: 09 09 22 45 6e 75 6d 4b 69 6e 64 22 2c 20 6d 6e .."EnumKind", mn
1690: 45 6e 75 6d 4b 69 6e 64 7d 2c 0d 0a 09 09 09 09 EnumKind},......
16a0: 7b 22 c8 f1 f2 ee f0 e8 ff d0 e5 ea e2 e8 e7 e8 {"..............
16b0: f2 e0 22 2c 09 22 50 72 6f 70 65 72 74 79 48 69 ..",."PropertyHi
16c0: 73 74 6f 72 79 22 2c 20 6d 6e 50 65 72 69 6f 64 story", mnPeriod
16d0: 69 63 7d 2c 0d 0a 09 09 09 09 7b 22 c6 f3 f0 ed ic},......{"....
16e0: e0 eb c4 ee ea f3 ec e5 ed f2 ee e2 22 2c 09 22 ............",."
16f0: 44 6f 63 73 4a 6f 75 72 6e 61 6c 22 2c 20 6d 6e DocsJournal", mn
1700: 4a 6f 75 72 6e 61 6c 7d 2c 0d 0a 09 09 09 09 7b Journal},......{
1710: 22 c3 f0 e0 f4 e0 ce f2 e1 ee f0 e0 22 2c 09 09 "...........",..
1720: 09 22 53 65 6c 65 63 74 69 6f 6e 43 6f 6c 75 6d ."SelectionColum
1730: 6e 22 2c 20 6d 6e 53 65 6c 43 6f 6c 7d 2c 0d 0a n", mnSelCol},..
1740: 09 09 09 09 7b 22 ca e0 eb e5 ed e4 e0 f0 fc 22 ....{"........."
1750: 2c 09 09 09 22 43 61 6c 65 6e 64 61 72 22 2c 20 ,..."Calendar",
1760: 6d 6e 43 61 6c 65 6e 64 61 72 7d 2c 0d 0a 09 09 mnCalendar},....
1770: 09 09 7b 22 cf f0 e0 e7 e4 ed e8 ea e8 22 2c 09 ..{".........",.
1780: 09 09 22 48 6f 6c 69 64 61 79 73 22 2c 20 6d 6e .."Holidays", mn
1790: 48 6f 6c 69 64 61 79 73 7d 2c 0d 0a 09 09 09 09 Holidays},......
17a0: 7b 22 c2 e8 e4 c6 f3 f0 ed e0 eb e0 d0 e0 f1 f7 {"..............
17b0: e5 f2 ee e2 22 2c 09 22 43 61 6c 63 4a 6f 75 72 ....",."CalcJour
17c0: 6e 61 6c 4b 69 6e 64 22 2c 20 6d 6e 43 61 6c 63 nalKind", mnCalc
17d0: 4a 6f 75 72 6e 61 6c 7d 2c 0d 0a 09 09 09 09 7b Journal},......{
17e0: 22 c2 e8 e4 d0 e0 f1 f7 e5 f2 e0 22 2c 09 09 09 "..........",...
17f0: 22 41 6c 67 6f 72 69 74 68 6d 22 2c 20 6d 6e 41 "Algorithm", mnA
1800: 6c 67 6f 72 69 74 68 6d 7d 2c 0d 0a 09 09 09 09 lgorithm},......
1810: 7b 22 cf f3 f1 f2 ee e9 c8 c4 22 2c 09 09 09 22 {"........",..."
1820: 45 6d 70 74 79 49 44 22 2c 20 6d 6e 45 6d 70 74 EmptyID", mnEmpt
1830: 79 49 44 7d 2c 0d 0a 09 09 09 09 7b 22 cf f3 f1 yID},......{"...
1840: f2 ee e9 c8 c4 31 33 22 2c 09 09 09 22 45 6d 70 .....13",..."Emp
1850: 74 79 49 44 31 33 22 2c 20 6d 6e 45 6d 70 74 79 tyID13", mnEmpty
1860: 49 44 31 33 7d 2c 0d 0a 09 09 09 09 7b 22 cf e5 ID13},......{"..
1870: f0 e5 f7 e8 f1 eb e5 ed e8 e5 22 2c 09 09 22 45 ..........",.."E
1880: 6e 75 6d 65 72 61 74 69 6f 6e 22 2c 20 6d 6e 45 numeration", mnE
1890: 6e 75 6d 7d 2c 0d 0a 09 09 09 09 7b 22 c2 e8 e4 num},......{"...
18a0: d1 f3 e1 ea ee ed f2 ee 22 2c 09 09 09 22 53 75 ........",..."Su
18b0: 62 63 4b 69 6e 64 22 2c 20 6d 6e 53 75 62 63 4b bcKind", mnSubcK
18c0: 69 6e 64 7d 2c 0d 0a 09 09 09 09 7b 22 cf eb e0 ind},......{"...
18d0: ed d1 f7 e5 f2 ee e2 22 2c 09 09 09 22 43 68 61 .......",..."Cha
18e0: 72 74 4f 66 41 63 63 6f 75 6e 74 73 22 2c 20 6d rtOfAccounts", m
18f0: 6e 43 68 61 72 74 4f 66 41 63 63 73 7d 2c 0d 0a nChartOfAccs},..
1900: 09 09 09 7d 3b 0d 0a 09 09 09 66 6f 72 28 44 57 ...};.....for(DW
1910: 4f 52 44 20 69 20 3d 20 30 3b 20 69 20 3c 20 73 ORD i = 0; i < s
1920: 69 7a 65 6f 66 28 70 72 65 66 69 78 65 73 29 20 izeof(prefixes)
1930: 2f 20 73 69 7a 65 6f 66 28 70 72 65 66 69 78 65 / sizeof(prefixe
1940: 73 5b 30 5d 29 3b 20 69 2b 2b 29 0d 0a 09 09 09 s[0]); i++).....
1950: 7b 0d 0a 09 09 09 09 70 72 65 66 4d 61 70 5b 70 {......prefMap[p
1960: 72 65 66 69 78 65 73 5b 69 5d 2e 6e 61 6d 65 31 refixes[i].name1
1970: 5d 20 3d 20 70 72 65 66 69 78 65 73 5b 69 5d 2e ] = prefixes[i].
1980: 69 64 78 3b 0d 0a 09 09 09 09 70 72 65 66 4d 61 idx;......prefMa
1990: 70 5b 70 72 65 66 69 78 65 73 5b 69 5d 2e 6e 61 p[prefixes[i].na
19a0: 6d 65 32 5d 20 3d 20 70 72 65 66 69 78 65 73 5b me2] = prefixes[
19b0: 69 5d 2e 69 64 78 3b 0d 0a 09 09 09 7d 0d 0a 09 i].idx;.....}...
19c0: 09 7d 0d 0a 09 09 69 6e 74 20 66 69 6e 64 28 63 .}....int find(c
19d0: 6f 6e 73 74 20 43 53 74 72 69 6e 67 26 20 6e 61 onst CString& na
19e0: 6d 65 29 0d 0a 09 09 7b 0d 0a 09 09 09 69 6e 74 me)....{.....int
19f0: 20 69 64 78 20 3d 20 2d 31 3b 0d 0a 09 09 09 70 idx = -1;.....p
1a00: 72 65 66 4d 61 70 2e 4c 6f 6f 6b 75 70 28 6e 61 refMap.Lookup(na
1a10: 6d 65 2c 20 69 64 78 29 3b 0d 0a 09 09 09 72 65 me, idx);.....re
1a20: 74 75 72 6e 20 69 64 78 3b 0d 0a 09 09 7d 0d 0a turn idx;....}..
1a30: 09 09 43 4e 6f 43 61 73 65 4d 61 70 3c 69 6e 74 ..CNoCaseMap<int
1a40: 3e 20 70 72 65 66 4d 61 70 3b 0d 0a 09 7d 66 69 > prefMap;...}fi
1a50: 6e 64 65 72 3b 0d 0a 0d 0a 09 43 53 74 72 69 6e nder;.....CStrin
1a60: 67 41 72 72 61 79 20 70 61 72 74 73 3b 0d 0a 09 gArray parts;...
1a70: 53 70 6c 69 74 53 74 72 32 41 72 72 61 79 28 62 SplitStr2Array(b
1a80: 69 6e 64 65 72 2e 70 61 72 61 6d 4e 61 6d 65 2c inder.paramName,
1a90: 20 70 61 72 74 73 2c 20 27 2e 27 29 3b 0d 0a 09 parts, '.');...
1aa0: 0d 0a 09 69 6e 74 20 63 6f 75 6e 74 4f 66 50 61 ...int countOfPa
1ab0: 72 74 73 20 3d 20 70 61 72 74 73 2e 47 65 74 53 rts = parts.GetS
1ac0: 69 7a 65 28 29 3b 0d 0a 09 69 66 28 21 63 6f 75 ize();...if(!cou
1ad0: 6e 74 4f 66 50 61 72 74 73 29 0d 0a 09 09 62 69 ntOfParts)....bi
1ae0: 6e 64 65 72 2e 65 72 72 6f 72 28 22 cf eb ee f5 nder.error("....
1af0: ee e5 20 e8 ec ff 20 ef e0 f0 e0 ec e5 f2 f0 e0 .. ... .........
1b00: 22 29 3b 0d 0a 09 0d 0a 09 73 77 69 74 63 68 28 ");......switch(
1b10: 66 69 6e 64 65 72 2e 66 69 6e 64 28 70 61 72 74 finder.find(part
1b20: 73 5b 30 5d 29 29 0d 0a 09 7b 0d 0a 09 63 61 73 s[0]))...{...cas
1b30: 65 20 70 72 65 66 69 78 5f 66 69 6e 64 65 72 3a e prefix_finder:
1b40: 3a 6d 6e 43 6f 6e 73 74 3a 0d 0a 09 09 62 69 6e :mnConst:....bin
1b50: 64 4d 65 74 61 4e 61 6d 65 4f 62 6a 28 62 69 6e dMetaNameObj(bin
1b60: 64 65 72 2c 20 6d 6f 64 2c 20 70 61 72 74 73 2c der, mod, parts,
1b70: 20 66 69 6e 64 43 6f 6e 73 74 61 6e 74 29 3b 0d findConstant);.
1b80: 0a 09 09 62 72 65 61 6b 3b 0d 0a 09 63 61 73 65 ...break;...case
1b90: 20 70 72 65 66 69 78 5f 66 69 6e 64 65 72 3a 3a prefix_finder::
1ba0: 6d 6e 52 65 66 4b 69 6e 64 3a 0d 0a 09 09 62 69 mnRefKind:....bi
1bb0: 6e 64 4d 65 74 61 4e 61 6d 65 4f 62 6a 28 62 69 ndMetaNameObj(bi
1bc0: 6e 64 65 72 2c 20 6d 6f 64 2c 20 70 61 72 74 73 nder, mod, parts
1bd0: 2c 20 66 69 6e 64 52 65 66 65 72 65 6e 63 65 29 , findReference)
1be0: 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a 09 63 61 ;....break;...ca
1bf0: 73 65 20 70 72 65 66 69 78 5f 66 69 6e 64 65 72 se prefix_finder
1c00: 3a 3a 6d 6e 44 6f 63 4b 69 6e 64 3a 0d 0a 09 09 ::mnDocKind:....
1c10: 62 69 6e 64 4d 65 74 61 4e 61 6d 65 4f 62 6a 28 bindMetaNameObj(
1c20: 62 69 6e 64 65 72 2c 20 6d 6f 64 2c 20 70 61 72 binder, mod, par
1c30: 74 73 2c 20 66 69 6e 64 44 6f 63 75 6d 65 6e 74 ts, findDocument
1c40: 29 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a 09 63 );....break;...c
1c50: 61 73 65 20 70 72 65 66 69 78 5f 66 69 6e 64 65 ase prefix_finde
1c60: 72 3a 3a 6d 6e 45 6e 75 6d 4b 69 6e 64 3a 0d 0a r::mnEnumKind:..
1c70: 09 09 62 69 6e 64 4d 65 74 61 4e 61 6d 65 4f 62 ..bindMetaNameOb
1c80: 6a 28 62 69 6e 64 65 72 2c 20 6d 6f 64 2c 20 70 j(binder, mod, p
1c90: 61 72 74 73 2c 20 66 69 6e 64 45 6e 75 6d 29 3b arts, findEnum);
1ca0: 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a 09 63 61 73 ....break;...cas
1cb0: 65 20 70 72 65 66 69 78 5f 66 69 6e 64 65 72 3a e prefix_finder:
1cc0: 3a 6d 6e 50 65 72 69 6f 64 69 63 3a 0d 0a 09 09 :mnPeriodic:....
1cd0: 62 69 6e 64 48 69 73 74 6f 72 79 50 72 6f 70 28 bindHistoryProp(
1ce0: 62 69 6e 64 65 72 2c 20 6d 6f 64 2c 20 70 61 72 binder, mod, par
1cf0: 74 73 29 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a ts);....break;..
1d00: 09 63 61 73 65 20 70 72 65 66 69 78 5f 66 69 6e .case prefix_fin
1d10: 64 65 72 3a 3a 6d 6e 4a 6f 75 72 6e 61 6c 3a 0d der::mnJournal:.
1d20: 0a 09 09 62 69 6e 64 4d 65 74 61 4e 61 6d 65 4f ...bindMetaNameO
1d30: 62 6a 28 62 69 6e 64 65 72 2c 20 6d 6f 64 2c 20 bj(binder, mod,
1d40: 70 61 72 74 73 2c 20 66 69 6e 64 4a 6f 75 72 6e parts, findJourn
1d50: 61 6c 29 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a al);....break;..
1d60: 09 63 61 73 65 20 70 72 65 66 69 78 5f 66 69 6e .case prefix_fin
1d70: 64 65 72 3a 3a 6d 6e 53 65 6c 43 6f 6c 3a 0d 0a der::mnSelCol:..
1d80: 09 09 62 69 6e 64 4d 65 74 61 4e 61 6d 65 4f 62 ..bindMetaNameOb
1d90: 6a 28 62 69 6e 64 65 72 2c 20 6d 6f 64 2c 20 70 j(binder, mod, p
1da0: 61 72 74 73 2c 20 66 69 6e 64 53 65 6c 43 6f 6c arts, findSelCol
1db0: 29 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a 09 63 );....break;...c
1dc0: 61 73 65 20 70 72 65 66 69 78 5f 66 69 6e 64 65 ase prefix_finde
1dd0: 72 3a 3a 6d 6e 43 61 6c 65 6e 64 61 72 3a 0d 0a r::mnCalendar:..
1de0: 09 09 62 69 6e 64 4d 65 74 61 4e 61 6d 65 4f 62 ..bindMetaNameOb
1df0: 6a 28 62 69 6e 64 65 72 2c 20 6d 6f 64 2c 20 70 j(binder, mod, p
1e00: 61 72 74 73 2c 20 66 69 6e 64 43 61 6c 65 6e 64 arts, findCalend
1e10: 61 72 29 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a ar);....break;..
1e20: 09 63 61 73 65 20 70 72 65 66 69 78 5f 66 69 6e .case prefix_fin
1e30: 64 65 72 3a 3a 6d 6e 48 6f 6c 69 64 61 79 73 3a der::mnHolidays:
1e40: 0d 0a 09 09 69 66 28 63 6f 75 6e 74 4f 66 50 61 ....if(countOfPa
1e50: 72 74 73 20 3d 3d 20 31 29 0d 0a 09 09 09 62 69 rts == 1).....bi
1e60: 6e 64 65 72 2e 62 69 6e 64 4d 44 49 44 33 36 28 nder.bindMDID36(
1e70: 70 4d 65 74 61 44 61 74 61 43 6f 6e 74 2d 3e 47 pMetaDataCont->G
1e80: 65 74 48 6f 6c 69 64 61 79 73 44 65 66 28 29 2c etHolidaysDef(),
1e90: 20 6d 6f 64 29 3b 0d 0a 09 09 62 72 65 61 6b 3b mod);....break;
1ea0: 0d 0a 09 63 61 73 65 20 70 72 65 66 69 78 5f 66 ...case prefix_f
1eb0: 69 6e 64 65 72 3a 3a 6d 6e 43 61 6c 63 4a 6f 75 inder::mnCalcJou
1ec0: 72 6e 61 6c 3a 0d 0a 09 09 62 69 6e 64 4d 65 74 rnal:....bindMet
1ed0: 61 4e 61 6d 65 4f 62 6a 28 62 69 6e 64 65 72 2c aNameObj(binder,
1ee0: 20 6d 6f 64 2c 20 70 61 72 74 73 2c 20 66 69 6e mod, parts, fin
1ef0: 64 43 61 6c 63 4a 6f 75 72 6e 61 6c 29 3b 0d 0a dCalcJournal);..
1f00: 09 09 62 72 65 61 6b 3b 0d 0a 09 63 61 73 65 20 ..break;...case
1f10: 70 72 65 66 69 78 5f 66 69 6e 64 65 72 3a 3a 6d prefix_finder::m
1f20: 6e 41 6c 67 6f 72 69 74 68 6d 3a 0d 0a 09 09 62 nAlgorithm:....b
1f30: 69 6e 64 4d 65 74 61 4e 61 6d 65 4f 62 6a 28 62 indMetaNameObj(b
1f40: 69 6e 64 65 72 2c 20 6d 6f 64 2c 20 70 61 72 74 inder, mod, part
1f50: 73 2c 20 66 69 6e 64 41 6c 67 6f 72 69 74 68 6d s, findAlgorithm
1f60: 29 3b 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a 09 63 );....break;...c
1f70: 61 73 65 20 70 72 65 66 69 78 5f 66 69 6e 64 65 ase prefix_finde
1f80: 72 3a 3a 6d 6e 45 6d 70 74 79 49 44 3a 0d 0a 09 r::mnEmptyID:...
1f90: 09 69 66 28 63 6f 75 6e 74 4f 66 50 61 72 74 73 .if(countOfParts
1fa0: 20 3d 3d 20 31 29 0d 0a 09 09 09 62 69 6e 64 65 == 1).....binde
1fb0: 72 2e 72 65 73 75 6c 74 20 3d 20 22 27 20 20 20 r.result = "'
1fc0: 20 20 30 20 20 20 27 22 3b 0d 0a 09 09 62 72 65 0 '";....bre
1fd0: 61 6b 3b 0d 0a 09 63 61 73 65 20 70 72 65 66 69 ak;...case prefi
1fe0: 78 5f 66 69 6e 64 65 72 3a 3a 6d 6e 45 6d 70 74 x_finder::mnEmpt
1ff0: 79 49 44 31 33 3a 0d 0a 09 09 69 66 28 63 6f 75 yID13:....if(cou
2000: 6e 74 4f 66 50 61 72 74 73 20 3d 3d 20 31 29 0d ntOfParts == 1).
2010: 0a 09 09 09 62 69 6e 64 65 72 2e 72 65 73 75 6c ....binder.resul
2020: 74 20 3d 20 22 27 20 20 20 30 20 20 20 20 20 30 t = "' 0 0
2030: 20 20 20 27 22 3b 0d 0a 09 09 62 72 65 61 6b 3b '";....break;
2040: 0d 0a 09 63 61 73 65 20 70 72 65 66 69 78 5f 66 ...case prefix_f
2050: 69 6e 64 65 72 3a 3a 6d 6e 45 6e 75 6d 3a 0d 0a inder::mnEnum:..
2060: 09 09 69 66 28 63 6f 75 6e 74 4f 66 50 61 72 74 ..if(countOfPart
2070: 73 20 3d 3d 20 33 29 0d 0a 09 09 7b 0d 0a 09 09 s == 3)....{....
2080: 09 43 45 6e 75 6d 44 65 66 2a 20 70 44 65 66 20 .CEnumDef* pDef
2090: 3d 20 70 4d 65 74 61 44 61 74 61 43 6f 6e 74 2d = pMetaDataCont-
20a0: 3e 47 65 74 45 6e 75 6d 44 65 66 28 70 61 72 74 >GetEnumDef(part
20b0: 73 5b 31 5d 29 3b 0d 0a 09 09 09 69 66 28 70 44 s[1]);.....if(pD
20c0: 65 66 29 0d 0a 09 09 09 7b 0d 0a 09 09 09 09 43 ef).....{......C
20d0: 45 6e 75 6d 56 61 6c 44 65 66 2a 20 70 56 61 6c EnumValDef* pVal
20e0: 20 3d 20 70 44 65 66 2d 3e 47 65 74 56 61 6c 44 = pDef->GetValD
20f0: 65 66 28 70 61 72 74 73 5b 32 5d 29 3b 0d 0a 09 ef(parts[2]);...
2100: 09 09 09 69 66 28 70 56 61 6c 29 0d 0a 09 09 09 ...if(pVal).....
2110: 09 7b 0d 0a 09 09 09 09 09 75 6e 73 69 67 6e 65 .{.......unsigne
2120: 64 20 63 68 61 72 2a 20 70 74 72 20 3d 20 28 75 d char* ptr = (u
2130: 6e 73 69 67 6e 65 64 20 63 68 61 72 2a 29 62 69 nsigned char*)bi
2140: 6e 64 65 72 2e 72 65 73 75 6c 74 2e 47 65 74 42 nder.result.GetB
2150: 75 66 66 65 72 53 65 74 4c 65 6e 67 74 68 28 31 ufferSetLength(1
2160: 31 29 3b 0d 0a 09 09 09 09 09 2a 70 74 72 20 3d 1);.......*ptr =
2170: 20 27 5c 27 27 3b 0d 0a 09 09 09 09 09 2a 28 44 '\'';.......*(D
2180: 57 4f 52 44 2a 29 28 70 74 72 20 2b 20 31 29 20 WORD*)(ptr + 1)
2190: 3d 20 27 20 20 20 20 27 3b 0d 0a 09 09 09 09 09 = ' ';.......
21a0: 2a 28 44 57 4f 52 44 2a 29 28 70 74 72 20 2b 20 *(DWORD*)(ptr +
21b0: 35 29 20 3d 20 27 20 20 20 20 27 3b 0d 0a 09 09 5) = ' ';....
21c0: 09 09 09 2a 28 57 4f 52 44 2a 29 28 70 74 72 20 ...*(WORD*)(ptr
21d0: 2b 20 39 29 20 3d 20 27 5c 27 20 27 3b 0d 0a 09 + 9) = '\' ';...
21e0: 09 09 09 09 69 64 32 73 74 72 28 70 56 61 6c 2d ....id2str(pVal-
21f0: 3e 6d 5f 49 44 2c 20 70 74 72 20 2b 20 31 2c 20 >m_ID, ptr + 1,
2200: 36 29 3b 0d 0a 09 09 09 09 7d 0d 0a 09 09 09 7d 6);......}.....}
2210: 0d 0a 09 09 7d 0d 0a 09 09 62 72 65 61 6b 3b 0d ....}....break;.
2220: 0a 09 63 61 73 65 20 70 72 65 66 69 78 5f 66 69 ..case prefix_fi
2230: 6e 64 65 72 3a 3a 6d 6e 53 75 62 63 4b 69 6e 64 nder::mnSubcKind
2240: 3a 0d 0a 09 09 62 69 6e 64 4d 65 74 61 4e 61 6d :....bindMetaNam
2250: 65 4f 62 6a 28 62 69 6e 64 65 72 2c 20 6d 6f 64 eObj(binder, mod
2260: 2c 20 70 61 72 74 73 2c 20 66 69 6e 64 53 62 63 , parts, findSbc
2270: 6e 74 4b 69 6e 64 29 3b 0d 0a 09 09 62 72 65 61 ntKind);....brea
2280: 6b 3b 0d 0a 09 63 61 73 65 20 70 72 65 66 69 78 k;...case prefix
2290: 5f 66 69 6e 64 65 72 3a 3a 6d 6e 43 68 61 72 74 _finder::mnChart
22a0: 4f 66 41 63 63 73 3a 0d 0a 09 09 62 69 6e 64 4d OfAccs:....bindM
22b0: 65 74 61 4e 61 6d 65 4f 62 6a 28 62 69 6e 64 65 etaNameObj(binde
22c0: 72 2c 20 6d 6f 64 2c 20 70 61 72 74 73 2c 20 66 r, mod, parts, f
22d0: 69 6e 64 43 68 61 72 74 4f 66 41 63 63 73 29 3b indChartOfAccs);
22e0: 0d 0a 09 09 62 72 65 61 6b 3b 0d 0a 09 7d 0d 0a ....break;...}..
22f0: 09 69 66 28 62 69 6e 64 65 72 2e 72 65 73 75 6c .if(binder.resul
2300: 74 2e 49 73 45 6d 70 74 79 28 29 29 0d 0a 09 09 t.IsEmpty())....
2310: 62 69 6e 64 65 72 2e 65 72 72 6f 72 28 22 cd e5 binder.error("..
2320: e8 e7 e2 e5 f1 f2 ed fb e9 20 ef e0 f0 e0 ec e5 ......... ......
2330: f2 f0 22 29 3b 0d 0a 7d 0d 0a 0d 0a 76 6f 69 64 ..");..}....void
2340: 20 4d 65 74 61 50 61 72 73 65 72 3a 3a 70 72 6f MetaParser::pro
2350: 63 65 73 73 50 61 72 61 6d 28 70 61 72 73 69 6e cessParam(parsin
2360: 67 44 61 74 61 26 20 70 64 29 0d 0a 7b 0d 0a 09 gData& pd)..{...
2370: 43 53 74 72 69 6e 67 20 70 61 72 61 6d 4e 61 6d CString paramNam
2380: 65 28 70 64 2e 70 53 74 61 72 74 4f 66 50 61 72 e(pd.pStartOfPar
2390: 61 6d 20 2b 20 31 2c 20 70 64 2e 70 45 6e 64 4f am + 1, pd.pEndO
23a0: 66 50 61 72 61 6d 20 2d 20 70 64 2e 70 53 74 61 fParam - pd.pSta
23b0: 72 74 4f 66 50 61 72 61 6d 20 2d 20 31 29 3b 0d rtOfParam - 1);.
23c0: 0a 09 0d 0a 09 62 69 6e 64 54 65 78 74 50 61 72 .....bindTextPar
23d0: 61 6d 20 62 74 28 70 61 72 61 6d 4e 61 6d 65 2c am bt(paramName,
23e0: 20 2a 74 68 69 73 29 3b 0d 0a 09 0d 0a 09 69 66 *this);......if
23f0: 28 74 65 78 74 50 61 72 61 6d 73 2e 49 73 45 78 (textParams.IsEx
2400: 69 73 74 28 70 61 72 61 6d 4e 61 6d 65 29 29 0d ist(paramName)).
2410: 0a 09 09 62 69 6e 64 56 61 6c 75 65 28 62 74 2c ...bindValue(bt,
2420: 20 26 74 65 78 74 50 61 72 61 6d 73 5b 70 61 72 &textParams[par
2430: 61 6d 4e 61 6d 65 5d 2c 20 70 64 2e 6d 6f 64 43 amName], pd.modC
2440: 6f 75 6e 74 29 3b 0d 0a 09 65 6c 73 65 0d 0a 09 ount);...else...
2450: 09 69 73 4d 65 74 61 4e 61 6d 65 28 62 74 2c 20 .isMetaName(bt,
2460: 70 64 2e 6d 6f 64 43 6f 75 6e 74 29 3b 0d 0a 09 pd.modCount);...
2470: 70 64 2e 69 6e 73 65 72 74 53 75 62 73 74 28 62 pd.insertSubst(b
2480: 74 2e 72 65 73 75 6c 74 29 3b 0d 0a 7d 0d 0a 0d t.result);..}...
2490: 0a 76 6f 69 64 20 4d 65 74 61 50 61 72 73 65 72 .void MetaParser
24a0: 3a 3a 70 72 6f 63 65 73 73 53 71 6c 28 43 53 74 ::processSql(CSt
24b0: 72 69 6e 67 26 20 73 71 6c 29 0d 0a 7b 0d 0a 09 ring& sql)..{...
24c0: 65 6e 75 6d 20 53 74 61 74 65 73 7b 0d 0a 09 09 enum States{....
24d0: 73 74 4e 6f 6e 65 2c 0d 0a 09 09 73 74 4d 69 6e stNone,....stMin
24e0: 75 73 2c 0d 0a 09 09 73 74 4c 69 6e 65 52 65 6d us,....stLineRem
24f0: 61 72 6b 2c 0d 0a 09 09 73 74 44 69 76 2c 0d 0a ark,....stDiv,..
2500: 09 09 73 74 4d 75 6c 74 69 52 65 6d 61 72 6b 2c ..stMultiRemark,
2510: 0d 0a 09 09 73 74 4d 75 6c 74 69 52 65 6d 61 72 ....stMultiRemar
2520: 6b 4d 75 6c 74 2c 0d 0a 09 09 73 74 51 75 6f 74 kMult,....stQuot
2530: 65 2c 0d 0a 09 09 73 74 42 72 61 6b 65 74 2c 0d e,....stBraket,.
2540: 0a 09 09 73 74 50 61 72 61 6d 2c 0d 0a 09 09 73 ...stParam,....s
2550: 74 50 61 72 61 6d 4d 6f 64 2c 0d 0a 09 7d 3b 0d tParamMod,...};.
2560: 0a 09 2f 2f 20 d1 ea e0 ed e8 f0 f3 e5 ec 20 e2 ..// ......... .
2570: e5 f1 fc 20 f2 e5 ea f1 f2 20 e7 e0 ef f0 ee f1 ... ..... ......
2580: e0 2c 20 ef f0 ee ef f3 f1 ea e0 ff 0d 0a 09 2f ., ............/
2590: 2f 20 ea ee ec ec e5 ed f2 e0 f0 e8 e8 20 2d 2d / ........... --
25a0: 2c 20 2f 2a 2a 2f 0d 0a 09 2f 2f 20 eb e8 f2 e5 , /**/...// ....
25b0: f0 e0 eb fb 20 27 27 20 5b 5d 0d 0a 09 2f 2f 20 .... '' []...//
25c0: c4 eb ff 20 ea e0 e6 e4 ee e3 ee 20 ed e0 e9 e4 ... ....... ....
25d0: e5 ed ed ee e3 ee 20 3a 20 e2 fb f7 e8 f1 eb ff ...... : .......
25e0: e5 ec 20 e8 ec ff 20 ef e0 f0 e0 ec e5 f2 f0 e0 .. ... .........
25f0: 20 e8 20 ec ee e4 e8 f4 e8 ea e0 f2 ee f0 0d 0a . .............
2600: 09 2f 2f 20 c5 f1 eb e8 20 e4 eb ff 20 ef e0 f0 .// .... ... ...
2610: e0 ec e5 f2 f0 e0 20 e5 f1 f2 fc 20 f2 e5 ea f1 ...... .... ....
2620: f2 ee e2 e0 ff 20 ef ee e4 f1 f2 e0 ed ee e2 ea ..... ..........
2630: e0 2c 20 e2 fb f7 e8 f1 eb ff e5 ec 20 f1 f2 f0 ., ......... ...
2640: ee ea f3 0d 0a 09 2f 2f 20 e4 eb ff 20 ef ee e4 ......// ... ...
2650: f1 f2 e0 ed ee e2 ea e8 2c 20 ef f0 e8 e1 e0 e2 ........, ......
2660: eb ff e5 ec 20 ea 20 e4 ee ef 2d f0 e0 e7 ec e5 .... . ...-.....
2670: f0 f3 2c 20 e7 e0 ef ee ec e8 ed e0 e5 ec 20 f1 .., .......... .
2680: ec e5 f9 e5 ed e8 e5 2e 0d 0a 09 70 61 72 73 69 ...........parsi
2690: 6e 67 44 61 74 61 20 70 64 28 73 71 6c 29 3b 0d ngData pd(sql);.
26a0: 0a 09 53 74 61 74 65 73 20 73 74 61 74 65 20 3d ..States state =
26b0: 20 73 74 4e 6f 6e 65 3b 0d 0a 09 0d 0a 09 66 6f stNone;......fo
26c0: 72 28 3b 3b 29 0d 0a 09 7b 0d 0a 09 09 44 57 4f r(;;)...{....DWO
26d0: 52 44 20 73 20 3d 20 28 44 57 4f 52 44 29 28 42 RD s = (DWORD)(B
26e0: 59 54 45 29 2a 70 64 2e 70 52 65 61 64 3b 0d 0a YTE)*pd.pRead;..
26f0: 09 09 0d 0a 09 09 73 77 69 74 63 68 28 73 74 61 ......switch(sta
2700: 74 65 29 0d 0a 09 09 7b 0d 0a 09 09 63 61 73 65 te)....{....case
2710: 20 73 74 4e 6f 6e 65 3a 0d 0a 09 09 09 69 66 28 stNone:.....if(
2720: 27 2d 27 20 3d 3d 20 73 29 0d 0a 09 09 09 09 73 '-' == s)......s
2730: 74 61 74 65 20 3d 20 73 74 4d 69 6e 75 73 3b 0d tate = stMinus;.
2740: 0a 09 09 09 65 6c 73 65 20 69 66 28 27 2f 27 20 ....else if('/'
2750: 3d 3d 20 73 29 0d 0a 09 09 09 09 73 74 61 74 65 == s)......state
2760: 20 3d 20 73 74 44 69 76 3b 0d 0a 09 09 09 65 6c = stDiv;.....el
2770: 73 65 20 69 66 28 27 5c 27 27 20 3d 3d 20 73 29 se if('\'' == s)
2780: 0d 0a 09 09 09 09 73 74 61 74 65 20 3d 20 73 74 ......state = st
2790: 51 75 6f 74 65 3b 0d 0a 09 09 09 65 6c 73 65 20 Quote;.....else
27a0: 69 66 28 27 5b 27 20 3d 3d 20 73 29 0d 0a 09 09 if('[' == s)....
27b0: 09 09 73 74 61 74 65 20 3d 20 73 74 42 72 61 6b ..state = stBrak
27c0: 65 74 3b 0d 0a 09 09 09 65 6c 73 65 20 69 66 28 et;.....else if(
27d0: 27 3a 27 20 3d 3d 20 73 29 0d 0a 09 09 09 7b 0d ':' == s).....{.
27e0: 0a 09 09 09 09 70 64 2e 70 53 74 61 72 74 4f 66 .....pd.pStartOf
27f0: 50 61 72 61 6d 20 3d 20 70 64 2e 70 52 65 61 64 Param = pd.pRead
2800: 3b 0d 0a 09 09 09 09 73 74 61 74 65 20 3d 20 73 ;......state = s
2810: 74 50 61 72 61 6d 3b 0d 0a 09 09 09 7d 0d 0a 09 tParam;.....}...
2820: 09 09 62 72 65 61 6b 3b 0d 0a 09 09 63 61 73 65 ..break;....case
2830: 20 73 74 4d 69 6e 75 73 3a 0d 0a 09 09 09 69 66 stMinus:.....if
2840: 28 27 2d 27 20 3d 3d 20 73 29 0d 0a 09 09 09 09 ('-' == s)......
2850: 73 74 61 74 65 20 3d 20 73 74 4c 69 6e 65 52 65 state = stLineRe
2860: 6d 61 72 6b 3b 0d 0a 09 09 09 65 6c 73 65 20 69 mark;.....else i
2870: 66 28 27 2f 27 20 3d 3d 20 73 29 0d 0a 09 09 09 f('/' == s).....
2880: 09 73 74 61 74 65 20 3d 20 73 74 44 69 76 3b 0d .state = stDiv;.
2890: 0a 09 09 09 65 6c 73 65 20 69 66 28 27 5c 27 27 ....else if('\''
28a0: 20 3d 3d 20 73 29 0d 0a 09 09 09 09 73 74 61 74 == s)......stat
28b0: 65 20 3d 20 73 74 51 75 6f 74 65 3b 0d 0a 09 09 e = stQuote;....
28c0: 09 65 6c 73 65 20 69 66 28 27 5b 27 20 3d 3d 20 .else if('[' ==
28d0: 73 29 0d 0a 09 09 09 09 73 74 61 74 65 20 3d 20 s)......state =
28e0: 73 74 42 72 61 6b 65 74 3b 0d 0a 09 09 09 65 6c stBraket;.....el
28f0: 73 65 20 69 66 28 27 3a 27 20 3d 3d 20 73 29 0d se if(':' == s).
2900: 0a 09 09 09 7b 0d 0a 09 09 09 09 70 64 2e 70 53 ....{......pd.pS
2910: 74 61 72 74 4f 66 50 61 72 61 6d 20 3d 20 70 64 tartOfParam = pd
2920: 2e 70 52 65 61 64 3b 0d 0a 09 09 09 09 73 74 61 .pRead;......sta
2930: 74 65 20 3d 20 73 74 50 61 72 61 6d 3b 0d 0a 09 te = stParam;...
2940: 09 09 7d 0d 0a 09 09 09 65 6c 73 65 0d 0a 09 09 ..}.....else....
2950: 09 09 73 74 61 74 65 20 3d 20 73 74 4e 6f 6e 65 ..state = stNone
2960: 3b 0d 0a 09 09 09 62 72 65 61 6b 3b 0d 0a 09 09 ;.....break;....
2970: 63 61 73 65 20 73 74 4c 69 6e 65 52 65 6d 61 72 case stLineRemar
2980: 6b 3a 0d 0a 09 09 09 69 66 28 27 5c 6e 27 20 3d k:.....if('\n' =
2990: 3d 20 73 29 0d 0a 09 09 09 09 73 74 61 74 65 20 = s)......state
29a0: 3d 20 73 74 4e 6f 6e 65 3b 0d 0a 09 09 09 62 72 = stNone;.....br
29b0: 65 61 6b 3b 0d 0a 09 09 63 61 73 65 20 73 74 44 eak;....case stD
29c0: 69 76 3a 0d 0a 09 09 09 69 66 28 27 2a 27 20 3d iv:.....if('*' =
29d0: 3d 20 73 29 0d 0a 09 09 09 09 73 74 61 74 65 20 = s)......state
29e0: 3d 20 73 74 4d 75 6c 74 69 52 65 6d 61 72 6b 3b = stMultiRemark;
29f0: 0d 0a 09 09 09 65 6c 73 65 20 69 66 28 27 5c 27 .....else if('\'
2a00: 27 20 3d 3d 20 73 29 0d 0a 09 09 09 09 73 74 61 ' == s)......sta
2a10: 74 65 20 3d 20 73 74 51 75 6f 74 65 3b 0d 0a 09 te = stQuote;...
2a20: 09 09 65 6c 73 65 20 69 66 28 27 5b 27 20 3d 3d ..else if('[' ==
2a30: 20 73 29 0d 0a 09 09 09 09 73 74 61 74 65 20 3d s)......state =
2a40: 20 73 74 42 72 61 6b 65 74 3b 0d 0a 09 09 09 65 stBraket;.....e
2a50: 6c 73 65 20 69 66 28 27 3a 27 20 3d 3d 20 73 29 lse if(':' == s)
2a60: 0d 0a 09 09 09 7b 0d 0a 09 09 09 09 70 64 2e 70 .....{......pd.p
2a70: 53 74 61 72 74 4f 66 50 61 72 61 6d 20 3d 20 70 StartOfParam = p
2a80: 64 2e 70 52 65 61 64 3b 0d 0a 09 09 09 09 73 74 d.pRead;......st
2a90: 61 74 65 20 3d 20 73 74 50 61 72 61 6d 3b 0d 0a ate = stParam;..
2aa0: 09 09 09 7d 0d 0a 09 09 09 65 6c 73 65 20 69 66 ...}.....else if
2ab0: 28 27 2d 27 20 3d 3d 20 73 29 0d 0a 09 09 09 09 ('-' == s)......
2ac0: 73 74 61 74 65 20 3d 20 73 74 4d 69 6e 75 73 3b state = stMinus;
2ad0: 0d 0a 09 09 09 65 6c 73 65 20 69 66 28 27 2f 27 .....else if('/'
2ae0: 20 21 3d 20 73 29 0d 0a 09 09 09 09 73 74 61 74 != s)......stat
2af0: 65 20 3d 20 73 74 4e 6f 6e 65 3b 0d 0a 09 09 09 e = stNone;.....
2b00: 62 72 65 61 6b 3b 0d 0a 09 09 63 61 73 65 20 73 break;....case s
2b10: 74 4d 75 6c 74 69 52 65 6d 61 72 6b 3a 0d 0a 09 tMultiRemark:...
2b20: 09 09 69 66 28 27 2a 27 20 3d 3d 20 73 29 0d 0a ..if('*' == s)..
2b30: 09 09 09 09 73 74 61 74 65 20 3d 20 73 74 4d 75 ....state = stMu
2b40: 6c 74 69 52 65 6d 61 72 6b 4d 75 6c 74 3b 0d 0a ltiRemarkMult;..
2b50: 09 09 09 62 72 65 61 6b 3b 0d 0a 09 09 63 61 73 ...break;....cas
2b60: 65 20 73 74 4d 75 6c 74 69 52 65 6d 61 72 6b 4d e stMultiRemarkM
2b70: 75 6c 74 3a 0d 0a 09 09 09 69 66 28 27 2f 27 20 ult:.....if('/'
2b80: 3d 3d 20 73 29 0d 0a 09 09 09 09 73 74 61 74 65 == s)......state
2b90: 20 3d 20 73 74 4e 6f 6e 65 3b 0d 0a 09 09 09 65 = stNone;.....e
2ba0: 6c 73 65 20 69 66 28 27 2a 27 20 21 3d 20 73 29 lse if('*' != s)
2bb0: 0d 0a 09 09 09 09 73 74 61 74 65 20 3d 20 73 74 ......state = st
2bc0: 4d 75 6c 74 69 52 65 6d 61 72 6b 3b 0d 0a 09 09 MultiRemark;....
2bd0: 09 62 72 65 61 6b 3b 0d 0a 09 09 63 61 73 65 20 .break;....case
2be0: 73 74 51 75 6f 74 65 3a 0d 0a 09 09 09 69 66 28 stQuote:.....if(
2bf0: 27 5c 27 27 20 3d 3d 20 73 29 0d 0a 09 09 09 09 '\'' == s)......
2c00: 73 74 61 74 65 20 3d 20 73 74 4e 6f 6e 65 3b 0d state = stNone;.
2c10: 0a 09 09 09 62 72 65 61 6b 3b 0d 0a 09 09 63 61 ....break;....ca
2c20: 73 65 20 73 74 42 72 61 6b 65 74 3a 0d 0a 09 09 se stBraket:....
2c30: 09 69 66 28 27 5d 27 20 3d 3d 20 73 29 0d 0a 09 .if(']' == s)...
2c40: 09 09 09 73 74 61 74 65 20 3d 20 73 74 4e 6f 6e ...state = stNon
2c50: 65 3b 0d 0a 09 09 09 62 72 65 61 6b 3b 0d 0a 09 e;.....break;...
2c60: 09 63 61 73 65 20 73 74 50 61 72 61 6d 3a 0d 0a .case stParam:..
2c70: 09 09 09 69 66 28 27 7e 27 20 3d 3d 20 73 29 0d ...if('~' == s).
2c80: 0a 09 09 09 7b 0d 0a 09 09 09 09 70 64 2e 70 45 ....{......pd.pE
2c90: 6e 64 4f 66 50 61 72 61 6d 20 3d 20 70 64 2e 70 ndOfParam = pd.p
2ca0: 52 65 61 64 3b 0d 0a 09 09 09 09 70 64 2e 6d 6f Read;......pd.mo
2cb0: 64 43 6f 75 6e 74 20 3d 20 31 3b 0d 0a 09 09 09 dCount = 1;.....
2cc0: 09 73 74 61 74 65 20 3d 20 73 74 50 61 72 61 6d .state = stParam
2cd0: 4d 6f 64 3b 0d 0a 09 09 09 7d 0d 0a 09 09 09 65 Mod;.....}.....e
2ce0: 6c 73 65 20 69 66 28 27 2a 27 20 3d 3d 20 73 29 lse if('*' == s)
2cf0: 0d 0a 09 09 09 7b 0d 0a 09 09 09 09 70 64 2e 70 .....{......pd.p
2d00: 45 6e 64 4f 66 50 61 72 61 6d 20 3d 20 70 64 2e EndOfParam = pd.
2d10: 70 52 65 61 64 3b 0d 0a 09 09 09 09 70 64 2e 6d pRead;......pd.m
2d20: 6f 64 43 6f 75 6e 74 20 3d 20 2d 31 3b 0d 0a 09 odCount = -1;...
2d30: 09 09 09 70 64 2e 70 52 65 61 64 2b 2b 3b 0d 0a ...pd.pRead++;..
2d40: 09 09 09 09 70 72 6f 63 65 73 73 50 61 72 61 6d ....processParam
2d50: 28 70 64 29 3b 0d 0a 09 09 09 09 70 64 2e 70 52 (pd);......pd.pR
2d60: 65 61 64 2d 2d 3b 0d 0a 09 09 09 09 73 74 61 74 ead--;......stat
2d70: 65 20 3d 20 73 74 4e 6f 6e 65 3b 0d 0a 09 09 09 e = stNone;.....
2d80: 7d 0d 0a 09 09 09 65 6c 73 65 20 69 66 28 21 20 }.....else if(!
2d90: 28 73 20 3e 3d 20 31 32 39 20 7c 7c 20 28 73 20 (s >= 129 || (s
2da0: 3e 3d 20 27 30 27 20 26 26 20 73 20 3c 3d 20 27 >= '0' && s <= '
2db0: 39 27 29 20 7c 7c 20 73 20 3d 3d 20 27 2e 27 20 9') || s == '.'
2dc0: 7c 7c 20 73 20 3d 3d 20 27 5f 27 20 7c 7c 20 28 || s == '_' || (
2dd0: 73 20 3e 3d 20 27 41 27 20 26 26 20 73 20 3c 3d s >= 'A' && s <=
2de0: 20 27 5a 27 29 20 7c 7c 0d 0a 09 09 09 09 28 73 'Z') ||......(s
2df0: 20 3e 3d 20 27 61 27 20 26 26 20 73 20 3c 3d 20 >= 'a' && s <=
2e00: 27 7a 27 29 29 29 0d 0a 09 09 09 7b 0d 0a 09 09 'z'))).....{....
2e10: 09 09 70 64 2e 70 45 6e 64 4f 66 50 61 72 61 6d ..pd.pEndOfParam
2e20: 20 3d 20 70 64 2e 70 52 65 61 64 3b 0d 0a 09 09 = pd.pRead;....
2e30: 09 09 70 64 2e 6d 6f 64 43 6f 75 6e 74 20 3d 20 ..pd.modCount =
2e40: 30 3b 0d 0a 09 09 09 09 70 72 6f 63 65 73 73 50 0;......processP
2e50: 61 72 61 6d 28 70 64 29 3b 0d 0a 09 09 09 09 73 aram(pd);......s
2e60: 74 61 74 65 20 3d 20 73 74 4e 6f 6e 65 3b 0d 0a tate = stNone;..
2e70: 09 09 09 7d 0d 0a 09 09 09 62 72 65 61 6b 3b 0d ...}.....break;.
2e80: 0a 09 09 63 61 73 65 20 73 74 50 61 72 61 6d 4d ...case stParamM
2e90: 6f 64 3a 0d 0a 09 09 09 69 66 28 27 7e 27 20 3d od:.....if('~' =
2ea0: 3d 20 73 29 0d 0a 09 09 09 09 70 64 2e 6d 6f 64 = s)......pd.mod
2eb0: 43 6f 75 6e 74 2b 2b 3b 0d 0a 09 09 09 65 6c 73 Count++;.....els
2ec0: 65 0d 0a 09 09 09 7b 0d 0a 09 09 09 09 70 72 6f e.....{......pro
2ed0: 63 65 73 73 50 61 72 61 6d 28 70 64 29 3b 0d 0a cessParam(pd);..
2ee0: 09 09 09 09 73 74 61 74 65 20 3d 20 73 74 4e 6f ....state = stNo
2ef0: 6e 65 3b 0d 0a 09 09 09 7d 0d 0a 09 09 09 62 72 ne;.....}.....br
2f00: 65 61 6b 3b 0d 0a 09 09 7d 0d 0a 09 09 69 66 28 eak;....}....if(
2f10: 21 73 29 0d 0a 09 09 09 62 72 65 61 6b 3b 0d 0a !s).....break;..
2f20: 09 09 70 64 2e 70 52 65 61 64 2b 2b 3b 0d 0a 09 ..pd.pRead++;...
2f30: 7d 0d 0a 09 70 64 2e 6d 61 6b 65 49 6e 73 65 72 }...pd.makeInser
2f40: 74 73 28 29 3b 0d 0a 7d 0d 0a ts();..}..