ࡱ> 1i/0  !"#$%&'()*+,-./;3456789:=M?@ABCDEFGHIJKL<NOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~Root Entry FcbĔɨϑ2rWorkbook/@Z_VBA_PROJECT_CUR"-,б6Xp6XVBAб6X:6X (ɀ\p Kobayashi Ba= ThisWorkbook=x-B,8X@"1 -3 000001 -3 000001 -3 000001 -3 000001 -3 000001 x-3 000001-3 0fg1 -3 0fg1-3 00001-3 00001-3 00001-3 00001-3 0000"\"#,##0;"\"\-#,##0"\"#,##0;[Red]"\"\-#,##0"\"#,##0.00;"\"\-#,##0.00#"\"#,##0.00;[Red]"\"\-#,##0.007*2_ "\"* #,##0_ ;_ "\"* \-#,##0_ ;_ "\"* "-"_ ;_ @_ .))_ * #,##0_ ;_ * \-#,##0_ ;_ * "-"_ ;_ @_ ?,:_ "\"* #,##0.00_ ;_ "\"* \-#,##0.00_ ;_ "\"* "-"??_ ;_ @_ 6+1_ * #,##0.00_ ;_ * \-#,##0.00_ ;_ * "-"??_ ;_ @_ \$#,##0_);\(\$#,##0\)\$#,##0_);[Red]\(\$#,##0\) \$#,##0.00_);\(\$#,##0.00\)% \$#,##0.00_);[Red]\(\$#,##0.00\)%[$-411]ge"t^"m"g"-[$-411]ge"t^"m"g"d"e"0_ "Yes";"Yes";"No""True";"True";"False""On";"On";"Off"],[$ -2]\ #,##0.00_);[Red]\([$ -2]\ #,##0.00\)                  & (    @ @ `@ @  h@ @ 9   x@ @ /   x@ @/     8@ @   x@@    8 @   x@ @    8@@   x @    x@ @     x@ @   8@ @        x@ @ ,  x@ @ *  x@ @ /  h@ @ -  (@ @   x @    x @  (@ @   ` iBX2 00000000000 6ASORTJB 00000gP}gUjnS[_P}gV print_logX error_log,Y debug_logQQT so'; substr0trimI{0QRP}gK00xg0M000n0k0d0D0f0o00 W0j0D000000xelXLu$P~0_0o0agNF; 000000n0IIF0000000000000000n0000000000 g!q00000I{00000L0+T~0000n0k0d0D0f00000 Y0005000AF; 0000k0d0D0f00QRP}gK00w}P~0_0o0xb$PL0hQf0xg0M0_00n0o00xelk0 0QRP}g 0h0 0]00NYo0vg0ckW0D0S0h00xY00050000A000 T 5No. 5w 000000000000 T 5f0 &=*=PUSH >^=/=;<=\MOD|=%==  >=+=pe(  iEQ-=..iNE<<=<=={^^LIKE>>===>}ABS&+= ^~=cast   ( )XS50000()XS*/+-<ANDORNAMEAND 5|| 5OR 5CONCAT 5MR 5*/ 50+- 50CONCAT 50<= 50== 50AND 50OR 50, 50NAME 50_  50# 5njn0005000$njn T 5000000000eBf5000Workflow 50Mapping/Session/Worklet 50Type 50Parameter Name 50DataType 50IsExp 50 Initial Value 50&Rro00REUSABLEg0j0D0S0h00:yY00"5000000?V̀ofrNQ0o00Mapping\Session/Workletkn0Session/Worklet0%R Tg0O(uW0f0D00S0h00:yY00R5000000000000000000 0 3<= 5@<> 5@NOT 5@IN 5i$SQL000g00INn0v_n0"()"0"{}"h0j0Y00 500000 xP}g 5r =qe%RJ~.Jcc (ɀ 'W0r2  dMbP?_*+%M* HP ENVY 5000 seriesLC 4dXXA4 DINU"8iG^1 SMTJ8MSDX" dXXMb?Mb?U} @}  } `} }  '     ! B$@4@>@D@I@N@Q@T@V@ ~ ?      M N     ~ @     O     ~ @         ~ @       ! ~ @ " # $ i  %  &  '  m~ @ ( ) j  *  +  ,~ @ - . / 0  1 2~  @ 3  k 4 /l  5 6~ "@  7 8 ! 9  :  ;~ $@ " < = . > P  ? #T##?#@#@#@#@#@#@# @#"@#$@#&@#(@ #Q ##Z#$X@%@%%@%@%@%@%@%@%@%@%%? #@#? DT%$@%@%@%@%@%@%@%@%@%@%@%? #A#@ LT%%$%%%%%%%%%% #B#@T%@%@%@$@%@%@%@%@%@%@%@%@%? #C#@T%@%@%@%@$@%@%@%@%@%@%@%@%? #R#@T%@%@%@%@%@$@%@%@%@%@%@%@%? &S#@T%@%@%@%@%@%@$@%@%@%@%@%@%? 'T#@T%@%@%@%@%@%@%@$@%@%@%@%@%? #U# @T%@%@%@%@%@%@%@%@$@%@%@%@%? &V#"@T%@%@%@%@%@%@%@%@%@$@%@%@%? #W#$@T%@%@%@%@%@%@%@%@%@%@$@%@%? #X#&@T%@%@%@%@%@%@%@%@%@%@%@$@%? #Y#(@t$KT%%%%%%%%%%%%$ #Z #[# #D #E #F #G #H 'T #I  &V  #J  #K  'Y  'L6##?#@#@#@#@#@#@<00000000< ?00000000@<!@000@0@0@000@@DPptt~l:@@" # $ % & <"@000@0@0@000@<#@000@0@0@000@<$@00000000@<%@00000000@<&@00@0@0@0@0@0@0@P@@@@>@5 Sheet4 (ɀ <@  dMbP?_*+%M* HP ENVY 5000 seriesLC 4dXXA4 DINU"8iG^1 SMTJ8MSDX" dXXMb?Mb?U} @} } } @$} } }       @                      n     $,000p>@5 Sheet1 (ɀ A  dMbP?_*+%"Mb?Mb?U>@5 Sheet2 (ɀ 4LU  dMbP?_*+%M* HP ENVY 5000 seriesLC 4dXXA4 DINU"8iG^1 SMTJ8MSDX" dXXMb?Mb?U} (}  (} )(}  (}  (} (} (} @ (} (} (} `(} (} `(} (} (} (}  (}  ( @      (g (h )\ )] )^ )_ *` *a +b +c +d  +e  +f ,,,,,,,,,-------------------,-------------------,-------------------,-------------------, -------------------, -------------------, -------------------, -------------------, -------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------,-------------------<000000000000000000000000>@5 Sheet3 (ɀ XV  dMbP?_*+%"Mb?Mb?-U>@5 Sheet8 (ɀ pWW  dMbP?_*+%"Mb?Mb?-U~ @1@>@5 Sheet7 (ɀ X  dMbP?_*+%"Mb?Mb?-U>@5 Sheet6 (ɀ Y  dMbP?_*+%"Mb?Mb?-U>@5 Sheet5 ThisWorkbookiSheet1Sheet2$"Sheet32  !#$%&'()*+,-./013456789:;<=>?@ACDEGHIJKLMNOPQRSTUVWXY[\^_`abcdefgiklmnpqstuvwxy{}~Tr[ZV#܏Cw]EKP*F{Įi#I->YuxME (SLSS<N0{00020819-0000-0000-C000-000000000046}(%Hh % %8p@malxAttribute VB_Name = "ThisWorkbook" Bas0{00020P819-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2GZVn#xME (SLSS<N0{00020820-0000-0000-C000-000000000046}`(%H80H@PmalxAttribute VB_Name = "She@et1" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2GZV[#xME (SLSS<N0{00020820-0000-0000-C000-000000000046}`(%H80H@PmalxAttribute VB_Name = "She@et2" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2GZV#xME (SLSS<N0{00020820-0000-0000-C000-000000000046}`(%H80H@PmalxAttribute VB_Name = "She@et3" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2rU~|      MErU $`$`(mk_ins_link >\__SRP_2 B__SRP_3Fchk_connect:d (08HX `hpx "   0 @ Php  x     "     8@ H  Pp   "    "  &yZVxRRddME (@" 046 <"h$0h&Hh(`h*x h,(.(0::% %h8%<(@d-p@%@H@)D0P@H8X @JX\ @N @- - T``$`V l` pH`(ir n`HH)u%id`v`x`z`|`~````$` jx`)u (%iHi`x`z```` (``$`&  `)u%ii`v`x`z`|`~`````````$`````  `( ""iH i````+@ `  i`z  `  )u %i )L    `H 11)uh p %i )L  `z`|`````$`` 0 ` 44)u%i0)Lh P`z`|`````$`  `p 22)3%i)L `x``````&`$+ ` )7 %i`z````+ ` "")u %i@i`i`z```<` @`8)uX`%iiii`z`|``+P`33i$iV`z`````+`)7%iii `z`<``` `i i `3h@78@8@:@@>0@BL@FT @L`d @P@R@x@ 0 H @@808hP@X `  x@ 0 H @@808hP@X ` 8@5mal*\R1*#284$*\Rffff*OH616dbd5e(*\Rffff*OH616dbd5e\0!  (@ X `hp  .   ( ,8h "p     (0@`    , @HPX ,`   " (08  @PX`x $(8 HPh    0 F  8 H P ` h     "    &0 X ` p "    &     0 @  <H  ,          0 @ H LP J    H(  p             ` hx ( 40h     8 HPdX \  D(p       0 F8&&  "  (08@HPX`hpx  , (8 @PX`h px   .   ,0` h    $(P X ` p (    0H` px    .( 0 8 ,Hx       $0 8 H `   F DX`hp  B BPX`2h   "  (0H h x   0 @HP Xh   B      "   (@X`x  "     (08@ X hp F B "h          ! !8!X!p!!!!!!!! ! " """" "("0"8"@" H"P"p" " """ "" "" " " # 0# $P# *x# $# # # #$$ $ ($@$H$`$x$ $ ,$ $$$%% % 0% B 8%@%H%P%X%`%h%p%x% % %%%"% % & F(& p&&& J&:'@'H'`'x''' ''''(''(( (8(H(`( h(p(( ((( ( B (((((( (() () 8) H)X) `) h))))) ) ))))) * B *** *(*0* 8*@*H*`* x* ,* ***++ +(+ 0+ N8+ + (+ 2+ <, *H, <x, *, *, B- N`-" ----- - - . (. &H. p. . . .. . / " / H/ h/ /B /////// /// /00 (0 80 P0`0h0p0x00 00 000 00000 11 1(1 01 N81 $1 J1 :2 0@2 6p2 @2 B2 &03 *X3 3 N3B4(344 4(404 84@4H4`4h4 444 44 4 4 44 5 5 (50585H5P5 X5 " `5h5 p55 5 5x^^0^H^`^x^^p ]@]h]],]@](]]]]0]]8]X],`],]8]x]AXAZA\ `$^ |k$b.2 2G|j.6XMLt@C̐ݒ$h$f'd 2AjoAZA\ `$^ |k.6XMLt@C̐ݒ$h$f'd ` dAno`.6oHH]]]]]0]H]`]x]].6'|b | t%h'  *** ENDPROC |'Fxk | '|x'|'~b` | t%h'  *** ENDPROCG|j ~ !@@@@@@@@@@ START CHECK EXPRESSION'~k ~e @@@@@@@@@@ END CHECK EXPRESSIONx  $ ##### START e  $''~k@ ~e  ##### END '~d | t%h'   ' | 'B |  t%h'  *** INSTANCEGxj'~'Rkhk` ~e | t%h'  $ ##### END    | 'D t  Aj  $ ##### END '~d'~k   Mapplete  R+N R 'RkHk@ | '|(o ]h]]]]]]]0]H]` .6'R t $ 'B t B$ 'D D'Fk` move_line1 = end_line + 5 F 'H H D B  'J B+L D+L H+L J+L+L'8 `  A 8G|j 6SORT'$* Set wsix = GetActiveWorksheet(nam)@ If wsix Is Nothing Then Set wsix = GetThisWorksheet(nam)SORT $P$.6 6G|jk 8 '8'< z 8 6 < A z$:!$ < 6,h < '< 6 < A  z$:!*  z$:%.' $:!$ <  6,h < '< 6 < A  z$:!,  z$:%0' $:!$ <  6,h < '< 6 <$'z < '< <'6NĂȂgXtH[[VړB z 8 z$:!* z$:!, & < 6,h z$:!$'$ $ < 6,h t $ LA < '<kE"Qualifier"n܂鉺ʃÑgXtH[[VړBC"Joiner"or"Union"ꂽAX^bNÃN̓XgbvB'@ z 8 z$:!&'& & Qualifier &Sequence &Input  & < 6,h z$:!$'$ $ < 6,h t $ LA < '< t z L$'xkYX^bNꂽ"Joiner"or"Union"n܂鉺ʃÑgXtH[[VړB @ b @ '@ @$>' $:!& < 6,h $:!$'$ $ < 6,h t $ LA < '< t  L$'x.SgXtH[[Vړ𒲂ׂ$'  ړĂȂ̂$L''& z R z$N'$ $ & $ '&*** $  t,h  'kGmake_inst_link|ړĂȂȉ̃gXtH[[V܂B  &AV MsgBox "ړĂȂȉ̃gXtH[[V܂B" & vbLf & typd=rňړɒljsړɒljړɔf$L'  $L  tA H  'J J  'J$L  +L$L  +L$L  +Lk @ړSgXtH[[V̐擪ʒuȍ~ɈړB t B H$L H $'z t z J$L J $'zk( o x] ]8]P]h]]]]]]] ]( ]@ ]X ]p ] ] ] ]  t%h'$ $.'z z G $ z $'$j'x' $$' mplt_MAPPLET'd MAPPING'k d '$k '|'v'~ vb | t%h'  *** ENDPROCG|j ~ !@@@@@@@@@@ START CHECK EXPRESSION'~k ~e @@@@@@@@@@ END CHECK EXPRESSIONx  ##### START e'~kh ~e  ##### END '~d( | t%h'  $   |  t%h'  *** INSTANCEG'~jk k ~e | t%h'  ##### END   '~  *** INSTANCEe | t%h 8$:($ | t%h 8$:(& | t%h 8$:(( 8$:(* 8$:(, 8 '8kk | '|h'~ vb | t%h'  *** ENDPROCG|j ~ !@@@@@@@@@@ START CHECK CONNECTION'~k ~e @@@@@@@@@@ END CHECK CONNECTIONx  ##### START e'~kP ~e  ##### END '~d | t%h'  $  G'~jk ~e | t%h'  ##### END '~dp  ' $' 'make_inst_link_subInot found from_nam=[ ]A> Call MsgBox("Error not found from_nam=1" & from_nam & "]")|kk | t%h'  ' $' %make_inst_link_subInot found to nam=[ A; Call MsgBox ("Error not found to nam=[" & to_nam & "]")|kk        AkHk@k8 | '| o ]h ] ] ] $:!,''    $:%0   'ykxp    $:,0  $:(,k( $:!*''    $:%.   'yk    $:,. $!*  A@kXoP ]( z 8 z$:!$  z'zk'i@ t! `! t  LAd t  LAkox ] ] ] ] ]0 ]H ]` ]x ] ' |$L$L | t%h  |'yk G|j $$'$b If nam = "FIL" Or nam = "RTR" Or nam = "SOL" Or nam = "LKP" Or nam = "SOL" Or nam = "AMG" Then? If instr_list("/FIL/RTR/SQL/LKP/SQ_AMG/RNK/", nam) > 0 Then< If instr_list("/FIL/RTR/SQL/SQ_/AMG/RNK/", nam) > 0 Then SQL/SQ_/AMG/ $$ 'd`'kP $L'  t%h'$ $ $'z $' $ b  t%h'  t%h'  Gxj $  t,h   t,h   t,h  '  '  t%h'$'  +Lo ]p]]]]]]]' |$L$L | t%h  |'y`kXP' $L'  $'z z   t,h z$:!&  t,h   t,h--NAME--   t,h --DataType --   t,h*** END   t,h  '  +L$L +Lk|k  $'z'$ $*** ENDb  t%h'$    t%h' $'G' 'j    t,h  '  '  +Lo0]]](]@]X]p]] $:!, ***END*** < 6,h < '<d0  $:!,  $:%0' $:%.' @ʃN̂PԖڂ̏ʃN̂Ƃ̂݉ʃNɐi   $:!$'$ $:!&'&C"Joiner"or"Union"ꂽAX^bNÃN̓XgbvB &Joiner $:!$$$UN'  @ $>  'kxp   @+> @ '@k8---Joiner/Union--- < 6,h < '<d $ < 6,h 2 $ LA < '< 2  L$'xkd-- + -- < 6,h < '<kXPkHi@]@]X]p]]' z  6%h'   R+N R 'Rd'     6%h 'yPkH@ Gyjk   ' 'i]]]]] '< ' z      t%h' $'G' 'j  <  t,h  t A < '<  ' <'iG********1*********2*********3*********4*********5*********6*********7*** : clearline"* @\ : `̈̒lNA,* : IN : ws : ݒ胏[NV[g6* i0 : ݒ`̍Z̍sԍ$* nlIN : ݒs6* j0 : ݒ`̍Z̗ԍ$* ncol : ݒ$* 쐬 : 20XX/XX/XX Akito Kobayashi<* XV : 2019/07/10 Akito Kobayashi Mod use set_cells_val()G***********************************************************************]]]]( ii = i0 For i = 1 To nlin jj = j0 For j = 1 To ncol ws.Cells(ii, j) = "" jj = jj + 1 Next ii = ii + 1 Next     tAo opt = 0x00 search nam 0x01 search not "" 0x10 Count 0x20 delete nam@]]]]] ]8 V' V' V ''' z R  z$N  z'yd  'kpkhd`$N $ z'y8k0k(    +N e 'k 'iG********1*********2*********3*********4*********5*********6*********7*** : CheckEndAndClearLineD* @\ : w肳ꂽsA󔒍s10sA܂ŁAsNA3* 󔒍s̃`FbNƍsNÁAA񂩂ncol)* : IN : wsix : Worksheet0* id : NAJnsԍ:* Optional ncol : NA (default=7);* Optional cont_line : 󔒌ps (default=10) * ԋp : ŌɃNAsԍ$* 쐬 : 20XX/XX/XX Akito Kobayashi * XV :G***********************************************************************  P](]@]X]p] '<' z '     6%h 'yP kH @   '  Gyjd ' 6  A '<k  ' <'i ]  d/ '  Ao` X ۵Attribute VB_Name = "mk_ins_link" Option Explicit Pub, Type INST_LIN@K_S nam As SDng$typ $o$bj $upr_nu@IntegebrAdwn8(820)S8EndgDim wsbxWorksheet i maxtJ :〞 (30IdidLo_stack(4 cysp5Ae &end proc_ moveB 0 1a(4\1nama>1exp_reuseRU_r Sub MakeInstL()Å A 1opt ACall init_ macrom R_mUbj_lc,iiB2o Wh@n pTrueCA=倁.oiiW]#"*** ENDPROC"̍= iiG"IDoG/1 @+ 1CL0d = 0DO O pRO F M1@ @ START CHECK EXPRESSIONo9 $ d3 aElse1 !R>QtLeft(p!2)Q#  P_+= Mid3:S$2O  * " &v[ru3"qQ1ws22 ?51@= ?1v5 629 =+=ᡷANCE0;c(<:30+!Ore -UJ)k, ,(##o q <6w+C/,U4 72pŢ'q"<>@ AS@&1 "l0jsta_line*CheckWhiteBoxFormat(ws, iia) + 14end 4End)L) - .proc_3 P< If 'oveZ1H+ 5m0O +!+ '-" {+ 2 -a(0). 1$ 29 3 a(4ltACk$ Call makes_sub(ActiveSheetR,ppz,ŋ)D<= 1 Exit Sub IsE@&"SORT"pqHGetC&WorksA'( _#B{ $ TxhisAH get_B@GputI@e(', , 80,CA DA G R=\VƿiidHĘ i\o Axclear`jixapd, 1C1A'.Cell|s( aH }(i). yi!R0 To j upU_num+ix_ups1(khkk Nex~tAh?,`dwne?dC""aOYAndCL>LL0DDso>rJ! 'NĂȂ g`XtH[`Vړ~B+}b`tFL= 0 ` Q,&KA;2g@!agM8 ja- TblMItems .?,`)H.'"Qualifier"n܂鉺5R'"Jo0!r"or"Union"A@X^b@Apgpvsp_`tcBP N=j In(GP\) > Or"Seque`nce" 0)Ina"!! q !m#! !H! !!sPr = ApdowI&i ah&$m'&< %Np ?%%Do @le !`H#ڤ$@%(5h k).:_]= Y-WPxkkLoop'So=Ed=rV@@ׂCn chk(""`, &H1}5nB4[1']̂A#A(2"q1_da??3  amx <>%Q&A & vbLsuwsd\"*** " 1Y5Zr"myERROROUT(-6K|ȉ5tA^B Msg| "Else'r lj'sd~U1ɔfbw)G$4H$_)2B@erows(ܐCpv,qUe^(gTTP+ a(2gX21'+C n move_lina(3) = p+ @End If'ړSgXtH[V̐ʒu~jTBJixMCells(ws, stae,e0 a(2) -)KiD1 Dx"1"s Sub Private  make_instPk_sub(ByVal ws As Worksheet, ByRefpp_namString obj_typ ADim is_loo Integerq ret i ! Long disix_froC*x_tonum  da2cCEH'at1p re R targ|etUJ_ A:oU~KmidQ.GAzK If = "" The-=.)AInH( , 8"."i (> 0B Mivd ig AJ= 0*!0@= Left 5+G"mplt_ MAPPLET"g ElseINGHKyma#pC | i(1#en= d"Do Whilefs aY5i ,2#"*** ENDPROC# ExitA At`lB g2@ START CHECK EXPRESSIONQ/A$!aE#0G1_d bDoG8#" &fke 2  c,2 6 *YˡA1ws{!F2i%!YA%h $ + OEq!*IN%NCE4* 3{aM#? 3 <,  ?qtOreQ 5_5 C'/^C(max').cGtY"). D4! %)Zeup_{pXadwnUr *{.I<[@LP! [u^r:[ [[Hx; w,[@[CONNECT[ 2/,a[쿯@@[H[4:iT [[ B5_S/Q_J_JZ_ϕ!Tse#/S /S /Saa+f?5uQ<>5=K5= srchT(uORW6sCall myERRORO`UT(-5PInot fouF9=[A0"]ɶi'MsgBox("Error O=1Oo6S&#~ dat1 = ws.Cells(ii, 2) If <> "" Th enFXto_namZDix_toBsrch_inst(4uQy10x*Call myERROROUT(-5,@ "makef_link_subInot found DW=["l &]&pE'2MsgBox ("Error (]"((Exit SubER\If ( Or) A&from > >0@AAWuVseJtP(D, toP6&ii+ 1;Loo`p  BG PrivateK F#ByVal"B5As Integer, F7+Dim nu|m_L  k> H= Q).dwnB_ kkB0FF@ To+-I@є(k)VxB k . ?abR`"PNe|xt#`,s(n. #G?I6,-T.up,@b,`,( &,BI,)"*~, ,p%,>,IE LINKxhO+ Ag+!pFunction ByRef e!dStringfrkiJh`! 1a]max&!D).` amep@ig/$GA\rca Move@Items(wsAWorksheet$ $m!Ua("'Lo@(a A += A/veS  b`>ancIwsnsa, DQElseWhitenc uadB[t[ oo oo$% ""';[+nϰM,ixae?v g)o p pexpW]k+`Brm0)21"IA0+2 i?2t JĈK`q b 1= UCase@(Left(/,x 3)0 r-c"`FIL" R$TRSOLKPB"AMGgժEtrp" ///SQL/p_ /RNK/",L)rC](SQ_/Y@aEa1qp'= 3:2zG,=7> _!6k'WchkW(`, &H20d.=ADo .0NpCt *OlA/UveA_a~(/US`)q1 0 Then  (ws.Cells(next_line, 1) = ins_hnamZ2Zzk(i).typl + 1h""#,g"--NAME4--$43NDataType 2M*** END6+ 3!dmovea(ixC4)End IfExit Su.biMch$k_qt(r, &H20)v_Do While <> ">; ƋkHAFor j1 To GC_JMAXcGAdat2"ALeft(@ _'"¬ z"&KX, jR@ G NG_ $@kkcLoou  ad Private Function ge@t_downk(ByVal wsbx As Worksheet, iIntegerRef ) LongQDim retA -kjix_dwn29@up2String!I ansx). $_num 1wsixDiid, ÃVu(v;ElseoNaW=@ oផ-| 1"(k \#%*).upcBs a'ʃN̂P@ڂ̏ Ƃ ɐi, ,x!x_@6A3Q !<'"Jor"or"Unb"AX^bN@Ạ gvxB ` Or UCase(!+5). E!"UN# :jA0s%Fsp_stack nDe/"("Ca"EamOP soJQd ? J =jV ?,ՠ}-C%/%-}_@Ap0$Call M@ltems(],Au,[LA v]=\dSO) o/p Q2Mg(#s!5r rChxeckpr3qrdgq.pi4qnRoacnuqla= CBcA100XE=mlC:1qJ a(maxqa9@G  J9!#B%P3O4 % O jr5%qO O mid@&7%*+,NA#)?-ds&!&src9n8/)/!!.is=-((/T@p sQ "0a c1ߑ512&s1qp33 $^cl(earQe ^, ii, 6]#%c!"d/% '"1*234"Z*5`P6H7** '* : clearline!T@\T`̈lN@AHHIN  ws : ݒ胏[`:Vg.i0.i̍ Z sԍ8nlprgs&j_ė/colML/쐬s 20XX/ Akito Kob@ayashiCXV19/07/10  Mod use set_cells_val(): Sub_t(ByVal @hAs Worksheet, @bLongEn  S@Integer J0AN Dim i j G jFii = i"0DFor= 1 To ,A q= jE AA jC @-H ws.CAb(ii, j2)@ ""j + 1HNext;(i Ca$llecoQnts_range(xi0,0A',k@S End s opt&(0x0@s@chP nam 1 arot 0xR Coun2 delete$ PrivaFunction chk _instIRef7StricG!(B;A>krcnt 1`ns  @*3IB = A-&H<0-`J$ I2$k-YA= U0Umax)_`7a -'J aIf1 <> henbG0(i)"" T( 1 %  Exit K!ElsiecdMYIf m "1s&S.?vk >9CA@?3&kŇn%#"emI^kUaq'%1F2&3&4_**]Check+`0CL w肳ꂽsA󔒰10@sA၂܂ŁAP. D̃`Fb@Nƍsԅ͠AAncZ0u Qix>:lPPgid : 3Jn OpQNrC%Q(default=7Y}s ]Rw q8pA10!ԋppЌ׉oopc13 f__!ne( _1+pU5SVZ.70gP5)`!s4 "w~goqMyipd1^_rGC_AP_MAX_ROW#Tbba5DwsixdE`j?QqFZwP W Q_`q@TgQk ?_A1Ȕ!, i1, a%06qktӛy?0ne*0YmyERROROUTmsgno(2umeQc0 'daR3A@= filee & "/"PBV, P@`a4`y08!` y008I` y00,q`(`108` Iay0h8 ` Iay0h8 ` Iay0h89 ` ayh4a `y< `y@`)AQy,`iy0&<`Q y,)`0anrU~|   9rU ($`$`$`(`  8,P$$  "    (&@ hp    &  P X Zh X H B  hpx  (0 8 H :XN  ( 8P *X .   @  (HP@X   D   ( 8 PP 6     @8 x             @ @ HH          X 88 p         < (  @ P  h x  4    (0X`h(p  4,  00 "` $ Z d (x $  & @ DH .    0 H`x 6  *, 0 ,@ p Hx *  Z$h P  j * V J "X  j ^ 4p 2  r p B ,0H `Fpd>  ` p6   B<" 8@HPX `hpx $   $  ( 8PX `(p     0 HP hpx   2   B4 08@H  P Z`R 8Ph 6  ^K ZVZ$xRRMEP@040P6 6 <<< h0hHh`hx h @%-@% x` tX%`  0` !`d "@` -`2B`x \` 8ir`x .``Eid`x`|`:+@`_iBid`v`x`z`|`D``F`H`J``L N%`R`T``V`X+Z`00"i|ii ip@ir`v``t`v`x+h `**Ri|8iXi|xi)NA%`J``F`x >p ``33|)u%iid`z`~``$```+ `  i`z+ `(  i`z`x~ @@p `   @x X p `   @x  0 (h mal*\R1*#284"*\R5*F>616d651e\0*\R5*F>616d651e$*\Rffff*OI616dbd5e(*\Rffff*OI616dbd5e\0  (08 @HX " `hp x       ( " 08 @  Hh    "       "   4 0 H `  x    (     ! !! $ ! H!`!h!p! x! "  !!!!!!!! !!!!""0"H"P"h":" " ."# # # , #P# X#h# p#x# ## ## #(# $ $@$X$(h$$$$ $$$ $ B  $$ $% (% @%H%P% X% `% B  h%p%x% %%% 0% %%%& & &x^^0^H^`^xp@] ], ]]@]`A"A$ t & t!$( tB@* XMLt@C̐ݒ $h$fA@, dA.kox]A"XMLt@C̐ݒ$h$f'd dA.oh]](AX Check ConnectAZA\ 6 2$4'xo@]000 %$8'x001 E %$8'x002 E %: key=[%] entry is few$8'x003 E %: key=[%] ret=%$8'x004 E % ܂B$8'x 005 E %: %$8'x 006 W %: %$8'xo]]0]HJnOoJn CheckConnect for dA<'| ` | dA>'~ |b | d$@'|@IOoI CheckConnect for dA<oI 1‚INSTANCEւ̐ڑ`FbNBΏۂͤTARGET܂TRANSFORMATION 菇:S (1) ΏINSTANCEPortL[ɂănbVo^Bf[^́AV[g̍sԍBR (2) ΏINSTANCECONNECTIONTO PortɑΉnbṼf[^NABB (3)nbṼf[^NAĂȂPortڑȂƂB`]]]](]@]X]p]]]]]]] ]8]P]h d $''x' B'|'v'R'@A@V410sȍ~TARGET܂TRANSFORMATION̊JnʒuT>chk_conn_sub: === Start search TARGET or TRANSFORMATION at ii= |A< vb |$h' |$h'L ~  *** ENDPROCz @@@@@@@@@@ START CHECK TARGETe'~ !@@@@@@@@@@ START CHECK EXPRESSIONe'~k0 ~e  *** ENDPROC @@@@@@@@@@ END CHECK TARGETz  LTARGETe'R 'chk_conn_sub: Found TARGET=  at ii= |A<x`kX ~e  *** ENDPROC @@@@@@@@@@ END CHECK EXPRESSIONz ##### START MAPPLETe | '| |$h'chk_conn sub: Found MAPPLET( ) at ii= | . to skip.A< | ##### END MAPPLET \$Z'| |Gzj ##### START MAPPINGe | '| |$h'chk_conn_sub: Found MAPPING ) at ii= |A<'~kx ~e  *** ENDPROCzH ##### END MAPPINGe'~x  Le *** END  *** INSTANCE LSequence '#chk_conn sub: Found TRANSFORMATION=  at ii= |A<xhk`kXkP | '|8  | '|RTARGETPort܂TRANSFORMATIONINPUT PortnbVo^(f[^͍sԍ).chk_conn_sub: === Start hash regist port name.A< N$^'x vb |$h' Gxj |$h'H R HINPUT  HOUTPUT  N  F$`'x x SAME |+h xe R GINPUT'Hj N  H$b'xd hasx_s: key=[ ] ret= xAd xmain| Az x emain| | xAzkdmain| | xAz`kXkP | '|8 |'@&ɐڑ`FNJnʒuԋpchk_conn_sub: hasx_u= N$fA<*TRANSFORMATION NAMEINSTANCE NAMEɕς Do While is_loop = 1 dat = Cells(ii, 1)S If dat = "*** ENDPROC" Or dat = "@@@@@@@@@@@ END CHECK EXPRESSION" Then] Call PrintOut("chk_conn_sub: Not found " & target_nam & " in '*** INSTANCE'")! chk_conn_sub = -1 Exit Function End If datr = Cells(ii, 3): If Left(datr, 1) = "*" Then dat = Mid(datr, 2)> If dat = "*** INSTANCE" And datr = target_nam Then' target_nam Cells(ii, 2) Exit Do End If ii = ii + 1 Loop z  z$!  z$!'y kx p &chk_conn_sub: exchanged INSTANCE NAME= A<'x$CONNECTION̊JnʒuT[`--TOINSTANCE--$Z'X X X MAPPING$Z'X'T ACONNECTIONTOINSTANCEYINSTANCE NAME̊JnʒuT[` X  *** %$Z'x x x'|SYINSTANCE NAMEPortւCONNECTIONo^ς݂̃nbVf[^NA |INPUT  N$h'x x Gzj'TdH %chk_conn_sub: Not found FROMINSTANCE= . N INPUT LINK all.A<k d*** ݂͂̂PortłINPUT/OUTPUTɂȂĂ̂铙AOUTPUTłڑĂȂPort$*** OUTPUT̖ڑ̓`FbNȂBP 'CONNECTIONFROMINSTANCEYINSTANCE NAME̊JnʒuT[`C ret = search(comm_start + 1, 1, target_nam, 1, "*** %") If ret > 0 Then ii = retd 'YINSTANCE NAMEPortւCONNECTIONo^ς݂̃nbVf[^NAW ret = search_hash_by_connect_port_name(ii, 1, "OUTPUT", target_nam, ha)- If ret < 0 Then Exit Function+ is_connect = is_connect + 2 Elsek Call PrintOut("chk_conn sub: Not found TOINSTANCE=" & target_nam & ". No OUTPUT LINK all.") End If <o^ς݃nbVf[^NAĤCONNECTIONIONȂƂ T "chk_conn_sub: Start check connect.A< z N!j z N(l N D!$n'x x dkey=[ D] ret= x dat=[ ]Ad T INPUT  T OUTPUT chk_conn sub: *** Not connect D dat= 'F FA< Vchk_conn_sub: ===== d: A'Vk8 FAk kkkki ]`]x]]]'Z'v r't'x t t$%(%xxxxx'x t$'tk  t'v t$z%,XXXXX% x 'x v 'v t v$'tkk vb |$h *** ENDPROCGxj p | p$h' x  v$z tGxj xe  v$ tGxj xe  t Gxjd  tGxjkk | $h'   |'Zsearch: Found  at ii= |A<xk | '|i ]]]]'hSYINSTANCE NAMEPortւCONNECTIONo^ς݂̃nbVf[^NA:chk_conn_sub: === Start search hash by connect port name ( ).A<b |  $h'J JGxj | $h'     chk_conn_sub: From Instance= |$hA<k0 N J F$`'xd hasx_r: key=[ J] ret= xAd x F | F |$~'F N J F$b'x xmain| AzP x emain| 1 xAzkkk | '|d |  $Z'| |Gxjk'hi ]]]] ]( ]@ ]X d$mplt_MAPPLET'$dMAPPING'$k ##### START $' ##### END $'' z' z t%h'$ --FROMINSTANCE--  *** ENDPROCGyj  $!@@@@@@@@@@ START CHECK EXPRESSION'k e $@@@@@@@@@@ END CHECK EXPRESSIONy $ e'kd $ 'd` $ *** INSTANCE z t%h $( $! z t%hA@ z t%h $( z t%h $( z t%h' ='  G   $'j  $(  'k@k8k0(o p ] z ! z$!  z$!'yk 'i ]H ]` 'x z  z$!  z$!YESG z$!'xjyk x'iAttribute VB_Name = "chk_connect" Option Explicit Pub, Type INST_LIST ins_nam As Sng,typ,trf__AKreuse ME ndDim dismInte`ger t_lista(3800)?_max_ Sub CheckAllC()o wsWorkpshee pat Cal|l 9s$ete_ _tdo_(08For Each =In S;s %If iews.e) > 0 Then  Activate 'XMLt@C̐ݒK`file @Trim(Cells(1, 1),A>(9H AsIfNex@`xbk` \]9= 76 0PrX 2ʀœ6st C_LOG_LEVEL3IJX0C9reƹ ;init_macrobBlog("Z )"1%regg_errmsg= LogLevel(@NO_DBG,i  ByVal dummy(Cafformat("000 %1 E2: key=[%] entrBy@j few 3+@=4 ܂B 5 z 6 W %:/(ByRef 'f\.A1iiA4LoVndas oSU'JnO8o"L`antOu5$Q 9 " &= 2H makeU Zs(Be,0 ii,B= aejo Wha >j usub(q LoopCBIZ_8'`1‚A@ANCE`FbNBΏۂ̀TARGETKTRANSFORMATION 菇:(1) Q Portp_L[ɂănVo^sf[^́AVg̍sPBT2]C ONNEC!TO DɑΉ&!%̤`NAD3 )ndꂀĂȂ j EXFr@ElsJe@ S T CHECK CT 3 EXPRESSXoϥw11oOr "@{LRxoq0<> "" A "TbWAz$%j7_ Q.D_{: Foub,&`0%ii-qE!Do<$"  ..ܵ= "# START MAPPLET" Then ii D= + 1pdat:Cells(ii, 1)FCall PrintOut("chk_conn sub: Found(" & AR& ") Zii=}. to skip."e#= search ,END, o !Ift<= 0 Exit F@unctioE8lseINzGm_ AOdisp@r2xEg|Ift=E ЌGE*** ^PROCUClXqW2ϡDo q<> "" A@Or InSt|r(bৢ*OUT`.Sh"r"" ,rLa ' 6)"SAME"gEAa$~`)k A!b'" S ">s ioKDEBUG$L(1@": key=[]`Kt"w P#$#"ERROR (2`main|122@p{x<t3P"B /qO G  ) v_ * ? oR1I/0R 'ɐڑ`FNJnqNʒuԋpwߙSNB)u',)Kh"g'[W N75pɕς 'OAa`A = 'OgK"@ CHECK EXPRESS`qxZNot >f«3R{Quin ''Ѧ-^>$e#J@:r 3Left\rPhR*b#Mide3" 3Z k:'y3For pRo maxst_l{a -pin(i)._trftn 9<`3u9orUNexto*h*exchanged 8?"= "d'C ONNEC!01EDT`Ecomm_>sQ٠ff--DTOu--"b"?0~h(8q_Q}QecQ 07 Y{ 8p5%iAq?10  '[ =AMEPortւCONNECTIONo^ς݂̃nbVf[^NA  ret = search_hash_by_connect_p_name(ii, 2, "INPUT", target, hDa)WIf Z< 0 Then Exit Fun ction.is t1 Else1Call PrintOut("chk _sub: Not found FROMINSTANCE0=" &\". N i LINK )."fE"If '*** ͂ł/OUBTɂ`铙AڑȂ#<3̖̓`FtNB@#q'ǃ<@YE@ NJnTuT`'Ʌ(comm_s|t + 1,ׁ @"G%NJD>D-ii|'P.BK:'A I:\:fN + 2GCb%tb lbTO;bo kb b(e'%m쏪䏂^GU Z/ 'G aSVcheck ${For P o.max_reg - aha.ha_iha@Wi!bK`x_k(ha, key.da~tEDEBUG@4L(100 =[a]AA& " #"a a)((H/A1) <aInStr("") `) Or _ N 2T Ne v ar0&\ᐡ>`&. $ KJ@r5%error_heade B ERROR(=a"file: wWo 6| ,<. J?ÿNext3 a@vateֆԍ(*ByVal `gAs LongQD, Sjj PIpnteg,Ref 1/i,2/y%7)!Dim 6loopPq#'@endstrmr _l ikeT m40U =EP4=h1A= TCtC""Left(#`);%c'%x?A7,,= Mid&2X1"Q1= LenD Righ ӂ s'X%O  2{S^fy @B7?bDo WhC%vpCellsb]= ENDPROCDoP 0B\>In(Jr, str_io) 8 {Replace*A "DAs^A0=0 AMERRORM(2!main|J+E PFun`ction$Bltse<Ap3 !j1!MgRii@8+~ %k  { , +gp, 4`>%"N/})Loop z0G6 Sub @make_it_list(ByV al wsWorksheet, i0Long!Reô;3iAdi= Trim(Cells(1, 1)B= 9=inEn d uxFuncCByVaai0m, ByRe|f Es_loopretdis WI]keyfSdaBr iofldtargetU&aQ haAHASHBCzis_C=s_con8necQҨerror_heade "" A r31'N #T8"ExpressQ;Ɠ_B (B!_EB&MH(CPBa6q={,L0SbfIofgfofV_ mainYii 可](xQs,stf# ?nj1.}jok pospxAz CatQ`wm3>6VmiTrueSAq h _?30O9Q /kC1 4*a5)@8UBqO(a) < 6 oSP:0erves+ 3# 0 a(p b]8)1  j6e =m@o$kp DFpi! To- r @Pa@?rOD]In0( i), "OUTPUTpu`;/5q j %a(j (fIN/ surP:AD= 3,-1 > 0A=aWpe(exxp.pos.nam) > 0 Then 'lCall PrintOut("chk_port_use_sub: Used" & inst" inPa(j)[exp ]")jj = j + 1+Exit For)End If Next(If _Hlin< i)ERROROUT(0, "fouj!at before ._Else%=%t:%myself$l*LUnue@*  <B/\4e A= +E InStr(, 4<@_ e @ b# "_"@>k Orpj/ v!&2Qkߩa?4=uA19NC# onlyOOc!&Z{{6{  ]@)iiALFunctio 6 ByRef> As |!%,.Dim dispTInteger  (_nama`(100)Hl in :max_> R Sub CheckAllO() nws.Work0shee Call zHinr For Each In Ss'If Le@ft(ws.be, 5)m_ICM" ThenActivate 'XMLt@C̐ݒafileTrim(Cells(1, 1)p70 g(End If1NexBOwQP"};A _Q7= 53 H-PrV A/sEŭLOG_LEVELȏn0CDret85_macro_`lib(0U)log=(" P"®ist_errmsg= LogLevel(NO_DBG@,,.@ ? =KByVal dummy5%9c!set_format("`000 %%1 E(ByR8ef Iii!Long2'JnOo̓B2Bnt0(" Ã2 @ " & =)subhBIZ^$XFun`?E'H;b%s_looK;a7xn.1FagSçda@{ aC=^ rcMB42id= 1?(: Start 0searress ii=BiiQo Wh > . `iiO!a= 2D c"*** ENDPROC" Or @ CHECK EXPRESSIONqExit eGElse *_l _Q2` 0@ START? b"@^uk1k n1PnAo"A #8: Fou(#"!& ") #CT +%/_2_U%oqa# qio.5,Us$"OUTPUToj(32475aDLOCAL VARIABLEc1!O r0'I@+UHLpWӣ]8 ]S'#zY, ^exO[#S [sssSPL?]q.RTDMQ>'sHGet@d(, , p 0((!`0$1 9UCase(2wd, 2)2V_Q#PR|^3xw!r1A krcQi0o E?-U#= a(i)P^oՁ1yQ i {]6143 !Hiid 05 W901 00 5 ?a Wu2ar rCpjE<  # 4 υ3lERRORPXaisjo & "̎̕ϐ"var_na"ḿAHii08sڂXVĂ\܂B ") End If Sub $ ZV@xME (<4<6 <hx`@ '"()+-*/=<>|!%,.`%eHe ` t% p` `d ` `2B`x X` ir`x ` id`x`|+`(11id`v`x`~`z`|``H`L `Hi|hi %`x X`i| i`z `iBi`z`|`P(H~@$@<@xXpP(X@HxXpP(X (X DXmal$*\Rffff*OK616dbd5e (0@P "X` hp      "   (H ` p "x      "   0 " 8@H P&h &  B  ( 08@H >P D   0H .P   F   0H PXp  "   0 8H h 8x   "   (08 @P`p  "    r0  x] '"()+-*/=<>|!%,.(]P]d]dx]]A t & t!$m_ICM tB@* XMLt@C̐ݒ$h$f'd dAko]XAXMLt@C̐ݒ$h$f'd dAop]]AX Check OutvarAZA 6 2$4'CrU D$`$`$`(`a(!`0(I`0,q`0,`0,`0nrU~|  arU $ `4 `y08 ` 1y0n(chk_mplt_def__SRP_azh__SRP_b|chk_mapp_parm_use$& 0{9ii poB da’͌i:B=(C-=~ (A, ".@w> 0uzMid @p-qC5= 0#3= 2Do Whue'{0s.Cii C"*** ENDPROC" Or @A CHECK EXPRESSIONQExit Do Else \ 2)# START  `Right(7bMAPPING[-1QbV++ Loop U`2Z EZ\SE)h\̛\BIWF`nb?ZnkZ#)iWaxmsgc0<T!No m`l.࿁>NeH-= 3 #ak*1 Tox 10\ aXixY3Hc"W(@`R '; i w`a 6T@#qXNowE`CA'`_no_)'3 A< h!:1 F!)Ff Su'osT}s~sr!'Oo̓V[gIuWFNg̎擾$wbhy.counghTis6_E2((k)y) YD1 m|$ws?Epas5Cp5`3f qϳ5*atOK6}set_ca;y'-,x$/R, 6&5U3a, `8%@0I CheckMappParmUse for dA<o ]h]]]]]]]](]@]X]p]] d' .'z z G  z $'j'x' '|'v' $' m_ICMMAPPING'd $MAPPLETA@(k'$10sȍ~Expression̊JnʒuT z' | t%h'  *** ENDPROC @@@@@@@@@@ END CHECK EXPRESSIONz  ##### START e | '| | t%h' | t%h  $  'chk_param_sub: Found  at ii= |A<yPkHk@ | '|(  | '| z' | t%h' | t%h ##### END y --NAME--e | '|  | t%h' $$$ $ + +  ' eyk | '|d | '|k |',Ƀp[^`FNJnʒuԋpkXiP]]0]H]`]x]]]'x B'|'vchk_port_use_sub: Start at ii= |A< z' |$h' |$h'L ~  *** ENDPROCyH "@@@@@@@@@@@ START CHECK EXPRESSIONe'~k ~e  *** ENDPROC @@@@@@@@@@ END CHECK EXPRESSIONy ##### START MAPPINGe | '| |$h' chk_parm_use_sub: Found MAPPING( ) at ii= |A<'~k ~e  *** ENDPROCy ##### END MAPPINGey  Le' If dat = "*** END" Thenchk_parm     F !"#$%&'()*+,-./0123456789:;<=>?@ABCDEGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghjklmnopqrstuvwxyz{|}~LZVfxME (<046 <p ` X% 6x% t%`x`$`d+`()uHP%id`x`|``` `(11)7HP%ipix``|``8%@0Pmal*\R1*#284$*\Rffff*OL616dbd5ed " (08  @Pp     B  (08@ HP,`D " 8 X h px  "   0Hhx&     @ `     " , @ ,P * B , 0( (X    F  0 @ H`x]@]`]]]] .INDEX %.6 t & t!$'$ $m_ICM t%h$f'd t d$'x 6 d xAko]p]]]] d' .'  G   $'j'x'|bX | t%h'  *** ENDPROC @@@@@@@@@@ END CHECK EXPRESSIONx  $ ##### START e $zMAPPING'xkxk | '|h x'iX]]]] x No mapplet def.'d'k'| d | 6%h'   Gyj | '| G  | 6,hj  | 6,h  | 6,ho Sub check_no_mapplet() Dim wb As Workbook Dim wsix As Worksheet Dim ws As Worksheet Dim k As Integer Dim ii As Integer Dim i As Integer Dim msg As String Set wb = ActiveWorkbook% Set wsix = wb.Worksheets("INDEX") ii = 3% 'Oo̓V[gIuWFNg̎擾$ For k = 1 To wb.Worksheets.count; If is_mapping_sheet(wb.Worksheets(k).name) > 0 Then% Set ws = wb.Worksheets(k)) If is_no_mapplet(ws) > 0 Then" msg = "No Mapplet" Else msg = "OK" End If@ Call set_check_no_mapplet(wsix, ws.Cells(1, 1), msg) End If NextEnd SubAttribute VB_Name = "chk_mplt_def" Option Explicit Sub CheckAllMRDef () Dim wb As Workbook.six2shee2sretIntegerQKnamSngfile_6e SI= Active 5O=^. Ps("INDEX"nFor Each ws In S=bs/d<Le@ft(ws.C, 5If "m_ICM" pThen`= Trim$Cells(1, 1)&= ؀ , " CallMappingDone@ ix , @End IfC)NexPriva8FunUJ#By8ValAKBU, `ByRef)k)_use_sub: Found  at ii= |A< | L!$'|kk | '| z  z$ : Mapping Var/Parm z$ id, antith.Akh`oX]x]]]]'~ z |$h*** END | '|y ~e |$h' --NAME--G'~j ~e |$h' |$h'   -- Name --G'~jd |$h' |$h'  LOCAL VARIABLE OUTPUT G  |  A jkxkpdh |$h' |$h' G  |  A jk | '| |'i] \t"'()=|-+*<>,./]]]]]0]H (bp d  $'  Gxj !'$ $$$$' $$' z  z$  z+'yk G |s  .  ̎̕ϐ $́A`Ă܂BAjko3Attribute VB_Name = "chk_mapp_parm_use" Option Explicit Dim nama(100@) As Sng0max_8.Integer0 dd4 Sub CheckMzPyUse() jiiK LoaCall initcro_lib(01!log_("" ߀in(Cells(1, 1) End JuMByRef filew:eQS8]ws Worksheeiret ii0 v o9UI H" Theith'JnOo͈VPrintOut("g for " &7?<S6>= ActiveSG>-= w= 2ADo WhT >= 0CA-AF=IgetAam_sub(ws,,Ae$E VvF>GŒy½@L8oopCMI|MM^vaFunN݋7@ByVal , H⁎s_lQTkpo`p]K] "" Aiattr `' c:#dg& "yiiaIwBA,.?@Lngk+ B1XNextCFor 0 To@xAa - DA@da(i)$ N{B?ERROR@OUT(1,: Mapping Var/PAA@Bid, antith."54+ Sub vate Function JByVal As Long, ByRef]@|St@Flex) HD imH@IntegeĩAB@yGn12[#k0%51!5100$44nUA<p }Q?  2LS'h--NAME--CR_L 13#"-- Name M#4eN4Lu25#"LOCAL VARIABLE" (Or D"oPUT % v gA(a,g, qIt! am!H# z48-'c%c$iiSub*#wnAvA{FD%Lt[B"Const C_SEP` " \t""'()=|-+*<>,./"Ks~SPLGm1S'i!Ok_pR: 'u|.T@Do While` True#1%m GetWord(, ,[!m < J L,DoA=.wdW@Left(, 21n"$$4 kpXW r = UCase;uamuQ1PDvb_xSq _^b@0q1 œ#D04@}s@& .0.B-̎0ϐA`ĂBpLoop8P7__SRP_c__SRP_dsel_white_boxm?__SRP_erU~|  RrU @$ `( `08 ` y0( `0! `  008I ` !9000nrU~|      284"*\R5*FD616d651e\0"*\R5*FA616d651e\1*\R5*FD616d651e$*\Rffff*ON616dbd5e*\R5*FA616d651e* B  h x $ ((@ ` <  8( ` >x @   6( ` x  6  & (  HBX`hp "x   ,4#( H X "  `hQRZV<DxMED@04006 6 6 ,/%+b``@`*% ut%`Vr`$hl B`!!>)u %iD@iF`z`|``H`p`J`L+T`H_)uhp%i|`z`V``+Z`0r)uPX%i`z`|`\`V ^`{{ t0%`z`| `V``` ``$`b`d`f`h+p`##i|i~`x`z````+r ` %i| i~`x`z`~`+t ` Ai| i~`x`z```$+x `  Yi| i~`x`z``$`+z `  $$yi| i~`x`z``$`+v( `  GGi| i~`x`z````$``````+0 `h &&i```````+n `p i+l ` i+`0 iPi|`x ``+i~i$i(i&` ` C)7%i+`(##NiH) h t%`z`````$`f h+`@CCq)7 %)( `z7r`|7p`n`l T`N`H+`8 )px Xii$`z``+`@%%id`x`$ %+`id)0A%``z`$` `'' t%`z`| X@``` +`H@ `6) X @% ut% \`hV ` P t0%` h `==\)u%i`x`z`|````$ % `  t0%` h `)u%i `P//)upx%ii`x`z`|`B``D`````$` ``C`C`B tx%` `z (!`//`C`C tp %`   `z`$`` "`(`C`C`B t!%` ""`z`|`$` ""` # `P@ G ux(#%`#v \x#`# 0&!`d@#!OOS)u ##%i`xv`;t`r X$h$`8$R`P`#N`~P$L`zH`|D`$@ %(`%H%`$ $ `d``%`%`$ `% %(&@% ('"`@p&"i `zv`t`r VX' &`(P+ *#`t@h'#ll)u ''%)'' 'i'i"-()(H(P( 0()$ ((P p(@%)&$( (`zr`,p`.n`x'l`F'j`~h`|d`$X0``0P)\`(X`4(P P(*@%+D 4$`@X*$((#)u x**%)** *)<*+P *@%i6(+)RH+P+A%)> + p+ T$+@%`zP+"`V+ `x*``d-6%INPUTR[h%,%zCg{bNX%,%WHITEBOX%,p00z(-2( utP-%%`x`4r`zPNp`|4l`dh`\d`-``f-\+P&`@H.&..x)u h.p.%).. .i`|.p`P 1#x 0p1h10@(0('*(! "01.1   H100& 4 utX-30@H@PB x0uB&"@*& @0@, @7h0 @46 @8<@`P 1#x 0p1h10@(0('*(! "01.1   H100& 4( 5 5 505A%%%)u `4 5@%%%+Z.%`D@3%--K)4)34i`4ib4)< 4x5P %5PP-86@64b*86(P @L i$7( H-P637H 0577X77@7 7=x307X=X:@L=@h @d @` `z7% 7t58 7t3`8%% 7t 7t4(8$&(*,.% 7t3:`H7;7: F x9 9D : :@ @0 @ @ @ 0: @ : @ %% ux:$%`;H :d`; ; ux(8 %% ux4 ux8;% uxX;%;x @ ;;%$+= ux7`<8=(*P(fd= % uxX<%=0$%$0%h%$$%%>;= @ @ @  >0 8> >`x=$%`x> &@ X?$ >x > <."($>0t P>@d>`x(?0p @l ?%`)T )`x )?8h &@d L`xC@C064CL D% ut?% ut@ % ut0@% utP@?% utp@?% ut@?% ut@?%p? ut@% ut@@% utAh@%X@ ut@AJ1% ut`A@% utA@% utA@% utA@% utAp@%`@ utBP(% ut(BA% utHBA%A utpB% utB B% utBB% utBA%A utB% utCB% ut8CB% utXChB%XB utC%@C utC%xDH )@F h)D DD D xD(4 D$ ? uth: ut;0Ex hD  ` zD0EHE B ut? ut 8HEDGXh?&&'??>')8) ))))(h)(DHDG G ut=_~1 ut>C utFC%C`H8<>@DF`Hx @ X@ @ G@ O% ut: utG0F% utGF% utHE% ut0HE% utPHE%E8I +@ (+@ @ O GPPIxG utG ut0Ip%xI x@xI utx8(I XJ.GIIJ8Ip.`I.8IIHJPl @\ I@L C:Kram utJe\%pL< @, HK( @ @ xK @ (pL pL++++XL*0L(+,0LLJpL zpLhL ut`:M`LM@ @  xM\hN utLon% utM`F% ut0M@F% utPM F% utpMF%E @ Mx-x54`-xN4-4--PNNLN zveNed; ut8< FhL'' 0.3H[2mal*\R1*#px   ("0X (p . .    8B  PX`hp x   4  . B  PX`hp x       " ( 0 8 @ H X ` h p          :  8 @  H X (h             8 P X ` h  $ 8   @ ` x       ,  @ $P  x            8 HX`h    :0p:N:H l:Ph::(@H `hp x"  .  ,P ( * , ( B  08@HPX` h dp *   0Ph px  B   ( @ Ph px      B    (@Xp(  & 0HPX ` B  hpx   ( 08@X x   *(028p  B     8 H `  "8 @ H 2`"   B   (08@H PX`hpx  (*@p x  $    "  ! & !&H! p! x! ! !!! !,! " "H"P"X"`"x""" "$"""6#<8#:x## # B  #######$ $$ 0$*@$*p$$$$$$$$%.(% X%`% h%x% %% % 0%%%%&& & B  &  &0&8&@&H& P& B  X& 4`&&&&& & B  && &&&'' '0'8' @' "  H'P'  X'h'p'x'''''' ''( (((0(8(P(`( p( "  x( (((((( ) B  )) )()0)8)@)H)P)X) `) )))))))**0*H* `*x** ****** * B  *****+++  +(+0+1H+HP`+ + ++ + +0++ , ,(,0, 2H, `,  x, , &, , , , , , - -  - @- H- h- p- - - --#- -- - *.H.P.`.h. p. Nx. . ,. / / .0/ &`/ / / /B  //// /00 0 80 @0H0P0 X0h0x000 0 N0 0 1 (1 @1 X1 &p1 1 1 *1 1B  1122 2 2(2@2H2 `2 p2x2 2 ,2 N233  3(30383 @3 NH3 3 .3 3 4 4 4 04 @4 P4 (`4 4B  44444 444 4 45 5((5 P5 X5`5h5p5 x5 " 555555555 55 66(6 H6X6p66666667 7 87 P7`7x7 7777 7 B 7777  7 7 88 (888H8* `88 8 8 L8 9 D(9 p9 9 9 &9 9" 9999 :: :@: X: "  `:h:p:x:::::: ::  ::;;;(0;X;p;;;;;;;;< < 8<"@< Dh< << < l<bH====== &= > >8> @> H>P>X>`> Nh> > D>  ? 8? (H? p? ?" ???? ???? @ "  @ @0@H@ `@ "  h@p@x@@@@@@@@@@@ @@@@A A8APAhA0AA A A AA AB B \(B BBB B NB B FC `C xC (C C C" C C C CCDDD  D0D@D 8`DDD DDD D NE PE BpE E E E (E F" (F 0F @FPFXF`FpFxFFF FFF FF 2G 4PGG GG G G G H H (HHH`HxH HH HHH H NH I 8 I XI "pI I I *I I I" J J J 0J@JHJPJ`JhJpJxJJJ JJJJJ"J K0K 8KHK "`K KKK K "KKKK KKKL 0L "  8L @L`LhLpLxLLLLLLLLLLLLLLLMM  "M 8M 2PM MM M MM M8N (N0N8NHN(%`N5NBN bNb((O OO OO.*OO O O P P P"#8P `P+pP*PPPPP*#P P Q :Q 0Q@QHQXQ hQ &1xQ Q DQ QRR R(R " 0R8R@RHRPR`R hR!RR R!R(R SS 0SHS PS XS BL* `SSSSSSSSSSSSSS ,(S(T0T8T@T PT `TFZpT T TT  T  T  U U(U 8U@U XUhUpUxU U U  U  U U  U U &(UV  (V b 8VHVPV XV  `V &"pV "V  VV VV V  W W ") W HWXW`W hW pW  W ""W  WWW W WX X  X  (X 8X HX XXhXpX xX X XX X  X XX X2eY2BY @Y *4HY.$xY  YY YY((YZ Z BD& Z8Z@ZHZPZXZ`Z hZpZxZ ZZ Z0-Z Z Z Z  [>0 [`[$+p[[[ [*[ [[ [\ b  \\ b \(\H\ P\ BL* X\\\\\\\\ 8:\\] ] ](] @] P]`]h] ] $%]] "%] >^@^ 0,X^ <^ %^^ ^6<_  H_ $%P_x_ __  ___ ___ ` B, `(` 0`2h@`x``:````` ` c c c c ` c a 4d  a 8a Pd Pa pd @d Rpa a "d "d a  e 68e $b 0b pe Hb @e Xb xb b fx] 0] 0]$6%INPUTR[h%,%zCg{bNX%,%WHITEBOX%,]0]Px]0u0] \t\n\r!"'()=|-^+*;<>,/x]No] 1gXtH[[V] |[g]H1WbN]mF@]El܂͏]p1mFΏۃf[^ԍ]@mF]1]h]1]]1]6******1*********2*********3*********4*********5*******: get_sheet_whitebox1@\: White Box TestpV[gWorksheet擾whitebox_shnam =8"%INPUT R[h%,%zCg{bNX, %WHITEBOX%"T[`9V[gƂA啶ʂȂpSpʂȂ*rIvVwhitebox_shnam0whitebox_shnamT[`V[gArIv̂܂܂Ƃ* S : IN : tal OUT: Ȃ/* : IN/OUT : whitebox_shnam: White Box Test - 3(=Hx19 Lt ws. Name)* #: White Box Test - Worksheet"* Pert: 20XX/XX/XX Akito Kobayashi* : ]h]] <  > 'V : '$'V V @ 'Vd  :'$'VkzCg{bNX $ V$.t tG t!':j t.bi]`]x]]]]] N'H HG'Hj 0'p p'Ld F H  'Lk F D  'J *' F'| |  t$P z |  t$PGyj | H L tAR | '| k D J H L tAR oret = 0x01 : ***0 x02: r]]]] X'  |  t%h$f'Vy8k0( |  t$PG V 'Vj V'Ti(s̍Ō̍s̎̍sԍԂ]x]]]'\ '| z t |$T'V Vy0 Ve | '\k | '| \'Zi]]8]P]h]]]]] ]8]P]h]]AXAZA\3 If check_mapping_sheet(ActiveSheet, 1) < 0 Then $j |k$b.6 6G|j$$$MPLT_MAPPLET'ddX 6%h$' MAPPLETMAPPLET'ddMAPPING'dkk ##### START d'f ##### END d'6''|'4 id = GC_IDO For i = 1 To 100 dat = wsix.Cells(i, 2)2 If dat = "gXtH[[V" Then ii = i - 1 id = i + 1 Exit For End If Next 6 $' G|j$ '|  '$h'bJnOoJn SelWhiteBox Items for bA< | | 6%h$ b | 6,h'$ | 6,hkHk@'8'`''| z  | '| |$h'$ $$lGyj  $ f''`Found fA<kxdp $$n 'Found 6A< $ $**** ENDe |$h'h  ii = ii + 1 h ExpressionFound transration name= $ type= hA< | $$p'| hRoutereFound transration name= $ type= hA< | $$r'| hSource Qualifier hSOL $$SQLeFound transration name= $ type= hA< | $$t'|   hLookup Procedure hFilter hUpdate Strategy hJoinereFound transration name= $ type= hA< | $$v'| h AggregatoreFound transration name= $ type= hA< | $$x'| hRankeFound transration name= $ type= hA< | $$z'|k | Gyjk k ` Not found d!!A@|dH 6 $'z 6Aj 6 $' ii = iia(1) + 1( Call set_keisen_WB(wsix, ii, id)% Call insert_line_WB(wsix, ii)" Call set_kyoukai(wsix, ii)$ Call delete_keisen(wsix, ii)k IOoI SelWhiteBox Items for bA<o ]0]H]`]x]] z |  z$h'  z$'x x Gyj z$h' $' $'] If InStr(uexp, "IIF") > 0 Or InStr(uexp, "DECODE") > 0 Or InStr(uexp, "LKP") > 0 Then $ ~ z$h  z$hAk@ $. .'    $'  '    $'   $'k k k x x'pih ]@ ]X ]p ] '~ z |  z$h'  z$'x xGyj z$h' ~  -- Name --'~kd yh INPUTe ~  z$hAk(k  x'ri ] ]8 ]P ]h ] z |  z$h'  z$'x x Gyj z$h'$ z$h' $$ SQL QUERY  $' ~ $ A $ Source Filter e ~ $ Ak x'ti ] ]0 ]H ]` ]x ' z |  z$h'  z$'x xGyj z$h'$ $ z'xyk z$h' GROUPBY G .'j  $' OUTPUTe ~ $ z$hA LOCAL e ~ $ z$hAk G ~ GROUP BY Aj  xA@ix ] ]( ]@ ]X ]p ' z |  z$h'  z$'x xGyj z$h'$ $ z$h' GROUPBY G .'j  $' RANKPORT e ~ $RANKPORTAkd  ~ GROUP BY A'k z$h'$ $ Top/Bottom $Number of Ranks ~ $ z$hAk8k0( x'i ] ] ]8 ]P ]h ] ] ] ] ] ] ]''''' z |  z$h'  z$'x xGyj z$h'$ z+h $Lookup Source Filter 8 ~  8Lookup_Source_Filter A'k ' $Lookup conditione  G  AND 'j  ' ~ $ A' '   $Join Condition $ Join Type $Filter Condition $Update Strategy Expression  $ Source Filter e ~ $ A $ Sql Query e $' G ~ $ Aj $Lookup Sql Override e ' $' $ORDER'   $'   $'k $Lookup policy on multiple matche AnyG 'jk '   G  AND'j  'kP  G  AND 'j  'k G ~Lookup condition Aj G ~Lookup policy on multiple matchAj G ~Lookup_Sql_Override Aj x'vi8(]]]]]]] $' TOP'      $'      $'      $'d0'k  WHERE' ORDER'    JOIN UNION  'd    $'dh  $'kH G Where  'jkd'k 'i0  6'nd'nki --FROMINSTANCE--  *** ENDPROC'ldX'lkHi@]p'x *** END $n |'x $le |'xk x'i]H 8 ~'d ~'8 8'kp 4  6,h   6,h $  6,h $  6,h &LOCAL o͌'d'k   6,h  ' 4 '4o`  6,h  6,h  6,h  6,h  6,h  'o]]]]]]] ]8]P $,$' '   $ $ +0'$' G'j z  ! z$!'f f$!$'$   $ $ f'yxkph GyjH z+ 'i(]0]H]`]x]]] ''| zd z 6%h' gXtH[[V z 6%h|[g z'|yHk@8 |%zCgBOXp̃V[hł͂܂BA|++d  |  6%h' Gyj No '$ gXtH[[Ve '& |[ge '( WbNe '* mF@e ', El܂͏e '. mFΏۃf[^ԍe '0 mFe '2kh` |+ |  6$ |$  '|d |  6$'  G | '|jk |+k |'iG******************2*******************4*********5*********6*********7*** : push_stack&{@\ ֐ŃX^bNT`AȂ* 51% IN֐(IN/OUT : func stack O ֐X^bNz max_func_stack: X^bNɋlԋp: X^bN 120XX/XX/XX Akito KobayashiTW]^] $$''| z  z $  z'|yk |  +  A@kp 'i`G********1*********2*********3*******************5*********6*********7*** 2 : is_key_func* : Et!It (TIF, DECODE, IN. LKP. UDF) 53ǂ𔻒肷* 51: IN : text* ԋp:܂ފ֐̗L= 0: TL %3D1:#* PERE : 20XX/XX/XX Akito Kobayashi#F]`]x]'x ( ,Lb d $'$ $x d $$'$ $$G $$'$j $IIF $DECODE $LKP $IN $ 'xx k k x'i G********1*********2*********3*********4*********5*********6*********7*** 27: get_next_func_name'* @\: ̎̊֐ŖO)擾* 318: IN : textit IN/OUT : SSPSSPL& # : 2֐Ȃ֐!PEAR : 20XX/XX/XX Akito KobayashiWF]8]P]h]'$b8 d  "$'  x %Le !' %L !(e '$x k $'i ]]]](]`]x]] ` $'| |G|j $.t$'| t |G|j | '| zd t | $'  Gyj | '|8 ' z  |$PGyj t |$'   |$h$f'   |+h  'kpkh | '|PoH]h]]+AXAZ 6 $4' b.t tGzj t $'  * (Gzj + t.iHF*****************2*********3*********4*********5*********6*********7**'* 7 : InsertLineWB=* @\ WhiteBoxTestV[gɏo͂ꂽ̉ɃP[X̍slj* 31 : IN:Ȃ OUT: Ȃ* WE 2017/09/27 Akito Kobayashi*]]8]P $.t$' t G|j t  Ao]](]@]X]p]]]$'x x G|jsIvV擾 t%hA '| *' z |  t$PGyj | ( t%h'$ |  t%h' $ Gyj | '|@ | '|' z |  z ( t%h'$ z  t%h' $ y $ $ Join Typee> If nam = "Source Filter" Or nam = "Sql Query" Then   'd(e If dat <> "" And nam <> "Join Type" And nam <> "Lookup policy on multiple match" Then $ Source Filter $ Sql Query $Lookup_sql_Override $Lookup'd@'k0  $'x If ret > 1 Then x  z x tAkk'koH*********|*********2*********3*********4*********5*********6*********7*** 27 : Deletekeisen>{@\ WhiteBoxTestV[gB, c, D̕svȉrȂ * 31 : IN TIL OUT: Ȃ"* PE FL 2017/09/27 Akito KobayashiXV*]]8]P $.t$' t G|j t! A?o? t A t A t Ao?]]]]]]0]H]`]x]]] t $Z'D''|  | b | '| | t%h' | t%h' | t%h'$ | t%h'   $  t |$T | D'EOF'd> |! t%h'k=  |   G    |     tAR j |'kh=`=oX=G*********1*********2******* 3*********4*********5*********6*********7*** 2 ? InsertLineWB_custom?* @\ s͈͂̃|[gݒ肳Ăs̉ɍslj* 318 IN : Ȃ OUT: Ȃ!* Pest 2017/11/29 Akito Kobayashii#]]0]H]`]]] $.t$' t G|j1Ώۂ̍sԍςȂ悤ɤ珈 z   z ( t%h z  tAk;;o;G********1*********2*********3*********4*********5*********6*********7*** Set Joken_custom;* @\ : s͈͂́uEl܂͏vɓ̕ݒ肷* : IN:Ȃ OUT: Ȃ"* 쐬 :2017/11/29 Akito Kobayashi* XV]( ] @ ]X ]x ] ] ] ] ]! $.t$' t G|j?|[g̐擪"I"ɒuāA̍sƎ̍sɈȉݒ肷B+u|[g = NULL <%=|[gs-u|[g <> NULL <%=3ljŝƂ 'z z b z ( t%h'$ $1 $$' NULL'  z!. t,h z 'z z ( t%h $NULL'  z . t,h z 'zkp7dh7x`7kX7P7oH7G********1*********2*********3*******************5*******************7**Fill Joken_custom2* . s͈͂́uEl܂͏vɂ͈̔͂ ͈̔͂ )擪sJԂRs[* 31 : IN : TL OUT: Ȃ#* PE Fit 2017/11/29 Akito Kobayashi****(!]Ch!]!]!]!]!]!] "]8"]P"]h"] "]" $.t$' t G|j '| z  | . t%h z +  | '|4 | b z  z $  | . t,h | '|`4X4oP4"]#]0#]H# $.t$' t G|j t  Ao3# Dim ws As Worksheet]$] $]8$]P$]$]$]$]$]$]%]%]0%]h%]%]%]%]%]%]%]& Set ws = init_WB(iParm) id = iParm(0), If ws Is Nothing Or id = 0 Then Exit Sub i i = id + 1 t G|j '|$'x x G|jsIvV擾 t%hA *''~+ z |  t$PGyj | ( t%h'$ |  t%h$f'd[ If text <> "" And namJoinType = "" And nam = "Lookup policy on multiple match" Then $ Source Filter $ Sql Query $Lookup Sql_Override $Lookup'd`0'kP0dSetKyoukai: text=[ d]Ad |' d$'x ' db dAND' G dand'j  d  $A@f d  $'ddP/ d''dk8/ G  and  'j  '.'   . t,h  'k. ++ x t  " ( $ &$ 'x'= ret = exp_kyoukai(ws, iia, 0, iob, obj, obj0, da) End Ifk- | '|-o-0&]&]&]&] &]' G-D0'j D V$*' z  z$V' $'( $' (D G0'j 6 $4'k,,o, &-('](](])] )]8)]P)]h)])])])]>])])nexp_kyoukai : Enter i0= Ad 'z'6'~$'| z " b z$('.nexp_kyoukai: i= z mc= . irs= 6Ad .cx0+ .[ .\e z 'z z$(', ,$&' .[ ,$$'d*  $8'x x x'zx*k*kx*  6+<  6+> 6 '6 .;e z 'z .benexp_kyoukai: disp= ~Ad .e 6 '6 6 6'xx)k) 6$>'LIST HORV fit 6+> ) 6+> 6 '6 . .e ~ '~k( 6 '6 |+ t  < 6  >$D'6 6 6'zx(kx($'| 6$>' ) ORV U 6+> 6 '6 .eNOPd( 6'zx'k' 6 '6 6$>'4 . 6'zxx'kp' 6 '6 6$>'dH''k8' .$F'0 . .& . $H' k& t      4$P'|kh&   0  4 6+>exp_kyoukai: dastk= 6$>Ad 6 '6k% z 'z%nexp_kyoukai :Exit i= zAd z' i% '*]+]+]+]+]+],'V 6'z'd zb z$<'T z$>' KK_func: i= z info= TAX T!L'V Ve T!F t  R T!\ 6 z  < z $Z'x R z+<  ( d) z+> z'Dz$d$not func name!! z$>A'Dz#k#d#  d'dkp#`#no func name!!A z'Di0# %* 4]`-]x-]-]-]-]-]-KK_func_method: ` nparm= bAd$'|'x'd b `| b'f fA'xd" $<!\'\ `ISNULL t  \ = NULL$P'| ` IS_SPACESe t  \SPACE$P'|7 ii = set_kyoukai_exp(ws, iia, sval & Space) ` REG_MATCHe \ D   $<!\ -'\5 ii = set_kyoukai_exp(ws, iia, sval & "3") t  \ital$P'| `INe z b t  \ =   z $<!\$P'|0 t  \ = Zott$P'| `DECODEe b  'd `IIFe'dkk  dAj |+ x'Zix.].$'|$ | ( t%h$f |  tAk  | . t,h | '| |++ |'Pi Dim dat As String i = irs_row_l text = "" pm = pmstk(i)K If (pm.opt And (GC_INFO_OPT_MRKARY Or GC_INFO_OPT_MRKLST)) > 0 Then pmstk(i) = pW Exit Function text = dat & textG End If Loop MC_row_list = i( End Functiont mark < 6  >$@'6 Mappi(c dG d'dj8c z 'z8cFunction MC_row_list(ByRef pmstk() As INFOPARM, ByVal irs As Integer, ByRef pW As INFOPARM, ByRef dastk() As String) As Integer Dim pm As INFOPARM Dim i As Integer Dim ret As Integer Dim text As String.Call DEBUGOUTL(120, "MC_row_list: irs=" & irs) Do While i >= 0 dat = dastk(i):Call DEBUGINFOL(120, "MC_row_list: i=" & i & " info=", pm) dastk(i) = text MC_row_list = 1 Else0 If text <> "" Then text = "." & text i = i - 1: Call ERROROUT(1, "MC_row_list: no row or list mark!!") t    0  4$P'|`pAttribute VB_Name = "sel_white_box" Option Explicit Pub, max_func_stack As IntegerB:P(20)BSng@Const PC_WHITEBOX_NAME_PAT%INPUTR[h%,%zCg{bNX8%, VGC_LOG_LEVELY162 $(IDO 3SM@AXLINE0GW_SEPp1" \t\n\r!""'()=|-^+*;<>,/O Dim gjno0C 'No tn yXPtHV@pQ |glbg )WQkwmF$@bcEl܂l^ d " Ώۃf#^HԍE kkOwsixAGWorkshefeAMidLC noenam c trans@_shL 'Z*1@2F35F4F5D: get/CՀ@\: W Box Testp$VAlF<擾 L)="C , %":T`ƂA@ʂȂpSp*`r IvBP@E B@I#* S : DINtal O\UT **b/`M+ - `z'(=Hx19 Lt ws. )#N'* Pert: 20XX/B Akito Kobayashi F¥>( ZwsTopt! lT = OPT_@OFFSETLECT * (1` + 8) B(OOK4CIf K)!" Then =gcX480M+C8OMP``4 El|se m E nd IfSe<g1input"_ e("m", , , "N" Ca!NoIs hing!?$`J! o@ws!eE"rivaASub skeisen_WB(ByValUjDd, i1D2ioijYj h)gn!nj.3=Qq4#0ղ12qjf?!3= 6l%ji2A9p+ t# = `1 tSiir`(is_(ii, j0,?)&H2)C= For A1 To 1r 5+?;717#Ex8it CalllX%r 1 0nj, 15! p" 0D##iTNextc91a !/0'r`;= 08x01`]tU0 x02: rУ2V@end_line31))YUO+r2s_22_41$igd.(*Trim(pECells$)"Y3&XqO!w&& + + G_a! O'Qs̍ŌPqQԂ6tYLr /̑ ? !Aib@-?>?M-ws, ii:`Db@S"@P"-I1) <>  0VPY$Ri(%pa!_! oSelr`Items(Q__A ia(maDispF,ouma( _Sd%damAmxml 2.-m΅" _type String PCall init_macro_lib(0)llog_|("" Xchk_conn_regist_errmsgt'If checkpp_sheet(ActiveS , 1) < 0` Thenp4a@nalize41, nama -fExit Sub?End If Set wsix@ = getI_whitebox(e8Is NothSF +UCase(Left(E(1), 5))."MPLT_"bKs0APPLETb"Plsedat-C.Cells(w1)P?"M& 68 E : INGD' PS3# START " & 4e<END max_func_stack 0iinod1 BiGC_IDO!DFor 1 To 10@ .IRi, 2QRgXtH[Vr A(i - %'i +*D- ESBNXext?CWBox mat(2, iia@/ČC(ia)G'd'xmlc4M'JnOoP`@tOut(" Sel% Items f`2aA i >= 5|h 5"5= "miD a3"t'Now~i[itrane]!biFoub= UDispW@7SVSMAXLINE5g22:i`!1d(a%IsEOF >? G iE0  e\a pD%.A h-IsMC%aO6O- #<>OAנ=A%* `RaE_type Bj!8e~r?% j "ExpressionuA1 rat`!e=a1!& Y  % >(A  e Router  P f 1:2 S V In(, "Source Qufi ) (Or g"SOL" P, CGSQL")o8ySQfWLookup Procedure" _5!FilOUpzeategyb Join%b9OthersG6Aggato11gB?=m2" ?=e1? ? ? 0 Rank=6=s =&5  1 6=f`J5/trgvl>Msgy` " Űp0!!5arhClearL.d8.makelinkd""K 2u"ip@cbskeisen_WB@i @insert0ne /kyoukaiNdelete_i1 IaILin )" vI FPtpByVa`i As InKer, ByRevf4,0kepe@)xDim rwYWpos_PQPexpkm uexp As String (For i = ii To GC_SMAXLINExdat@Cells(i, 1)4re4IsEnd"(L, i8If >> 0 Then Exit o>= Y4<conv_mlpine( {=` UCas<'zIn($, "IIF")" DOr DECODELKP `[/is_key_funcM8) pos x."J Ǔ/MidA +A A=W" M OA W GB1, - maxBc_stack@=pushM(Ai, ,~ @ DAM\Next^SelE= A BF@tionPrivate  Router(ByValA@Integer, ByRef G) Dimidis?""= 0# ߇,1[߇a-`Dj3?9%b" -- Nqha}1#!a?lse+ 5 /% gINPUT#5H4@"qnd?JZ#T8@2ZonyZSQ?ZL?Zerc,!]4Z:_ Wv k\ ZZt!tZaHESQL QUERY" A:K4"$ csrch_joke|n(,Q&Xl ,Apv%E1` `#@"SourcPOilN? eQ/5=l +USQ3+Xnc1+Aggregato/Y/YC%,'aL >V,AM.qo groupbyI,1s= K-ߞrQZPq }ߞZ! 2Z*iSL25S0`$GROUPBYϞ0 b;&  O& @G2c "OUT^?006^^4LOCAL "" b e 8HH "" BY D= :_>_>W>0Rankj/me5==cq=Q>>>>#<> t:!::$/;"S/;;5"RANKPORT66m=?`0AO2N If groupby <> "" Then   Call OutWhiteBox(trans_name, "GROUP B`Y " &,"6)= :En0d If _ = Cells(i8, 3 P!"Top/Botto@m" Or Number of Ranks2%r&A4)l ]NextjSeICIhre F@unctio Private SelOthers(ByVal ii As Integer, ByRef String)>Dim ;G IG posR dat v''OLookup_Source`_Filti cpondiIQql_Overridde _WW multiple_ matchQOrder_ByF&GPD$ JG0For iQJTo GC_SMAXLINEoCA=o1oaI=( Is`X(, ^ir0 Exit G B4{}4)""}C' G G{ c Ie/j+` ` ", 0-Q T`r'Else(G'_ Y$ !G =&AND (:aq%:B2` ?-'cE  l *Join CI"Type"| _ĠO(@BUpne gy lpress " A`[) 3|! 'Sql Query #srch_joken(` xF'  l!1up e o+ h/oe_h= /CxVn(UCpase(щOpRDER`a> Y al= Midd, p</ *Left - eN?0policy on n z}L ХAP$Any"f4j r9 Q3BSe7Oh0q't14U(UQVerc / 1)^QO^0O^  2o X==" wP >wL2/&"%7`4 /"e0uH 6 $@ ~E3ֶ`1pCB z2len1Pǀ!ltopom u:  S= QPI US!0TOPHPr Ykip_in(+ 3C "vbLfvpbTabPt>oQq= ǢR@ bV + c2`%RPR=q <WHERES_ pos2 = InStr(uval, "ORDER") If > 0 Or,ThenH JOIN ")h 4UNIO6 Hdat[Else m]AEMid(,+ 6 W @ 2nd IfHtop <> "" I # & "Where" & vbLfE'I! ""srch_joken& Functio Pri vate IsM(ByRe"fOAs @}ing) Integer }enam4IC݀1-F0D8(EOF_( F)"--FROMINSTANCE- -"C0"*** ENDPROCg2@W22#[[, ByVapl ii]`Dim retfAA= D&A:B?b(A)0LqCii!a8Is@\-fHW=!AH@&O#Sub OutWhiteBoxd=trans_MeR$!UO&Uexp/tyv(@&ϣ"A = ˊ= {]4C&wsix.Cells(i d, 1)@Qnovd2 3)"am4conv_mline('a c>'`LOCALd o͌ŒoʳQ5Aid+ $` #!> BC`GAI ClearHi! BWorksheetEldB$/ /t/tb/t ej .¿BgX0aStrdshnoa( b 1wsVIXbQ.QjA^maxa=a?M"|98o s} D ap$Split(U Case( 0) p.,& = UBPound!ad"F0or jSo ϕ(j,.C6,~WidedNextS1Di0c08P<]Z "T1iiO To s.cp a =(i). ?xU a).vb ?amaO7!6D`, @a0;D1cExit @ei'1![>o4P1FkFCheckG@ mat08GGliiO8Ԗ a,6RobMsa?8Qma(F5Longcol-`N;p!DS"JGC_IDO(4 1)10T = T, Y`1gXtH[0V+SW|@g&= T1%%w"@ ]Call Msg"zCgBOXpVhł܂pBF 0B1(4 aHds1i, jDE/g No]gjno!Kjk OFC?gjtno le rgjpO MWbNgjlgLmFf@OEkwOL El0"`͏bc FΏf(^ԍ dXʶ ElseIf dat = "mF" Then  gjkk0j hEnd If!&Nextiia(0)jii(sget_cells_merge(ii, 1, ma, wsix@) <> 0iiK +*(4) - 1W `color1n_haikei_ :#::REAs2L F7 B1 CheckWhiteBoxForm Functio '*2 *4 5"67**$ : push_stack{@\ ֐ŃX^bNT`AB51% IN IN/OTUTf@+  OEz max_A :Bɋlԋp x'20XX/ Akito Kobayash'TW J6(ByRef () As String, BpyVal$IntegerxnamG Dim i F@g A! UCase()C—0= 1 To,R;iAAA rExit @ G UG{ LtK= 0+z'V z(Ae1_e3f e2[is_keyWT* E 'It (TIF, DECODE,c. LKP. UDF) 53ǂ𔻒肷b51:`tB'* b_܂ޡl̗L`= 0: TL %3D1:`* PEREzd#FhdHda\ret] *dC.w~d ;>D1& ћ1wd "(}2 7PqDAH2G11 Sub ReNumber(d! ws0kshee)Roc|a("m nu2AC2Parm_ #t(AveS ,гa{؄ 2!@SSg= init_WB(i! Is pNoth5U?ubSci1:10iQha{ws 4 Q@ 0 rʗ s @8SMAXpLINEc r[isenptj a- 1 E Q%=}im(C1 $ o{06um $-=RFm1* Private *ǿS)YòO>`? =3d1Z;0C@T+Call3mնacro_lib@(0) Call log_init(""Xid = LogLevel(NO_DBGLOG, GC__LEVELVSet ws^get_she whiteHboxIf>Is Nothing Then Exit Func0tion(uCheckW@BoxFormat(ws, iiapO)0 Or gjlg0| pn abParm~id:_~_WB ws EnBdM '* 2U34567**$'* 7 : InsertLineWB/ @\ {TestV[gɏoꂽ̉ɃP Xslj %310N:Ȃ@OUT: * WE 2017/09/27 Akito Kob@ayashi P Sub ((^DimArAs Wo|rkzPdInteger\x1) D`(i By@l Β{ 0H/C Bi3Z@nexÒd + 1@Cz = ByVal<, i05,ABrגB@Mij C3AA count dbaStr n am infoWNFOPARM#= MCσE@/< R-#'sIvV`擾Cb1sop!~0.Cells(1, 7)'iis0#@ .={ 1 To 100`(is_keisen(ii, 8j0,6N y&H2) ` a$=gj A+Lj#"" A@nobiPNext#E- 1c>=  PStep - ,(% aøIElseq<> !AJoin Type>"u Source Fil0ter""Sql Query /K!e)`l >Lookup policy on multiple chQ h" _sql_Overrid?+ gi`ModeP2x$181atIfFexp(}H('u> P?`#6O`rows(PBp6B_ ? :i=Subхׄ&|ց**** * P|: De0leteO,{B, c, D̕svȉr0­] TILL`PE FLyXV0P @}?tm Ӏ #t R$dfws. τ2Гp0 "+Z_columnS n2 Qp3D 4_P/ / nujoBC q83ߠokO8endBofpa`S]b ]tX o Q P1Y3 D Te = DX|DoqŰg= 4qiS\ra!EOF"'osc.JIc' { i - @/q CA B0i,d 1, 1 + j20408p0, ws)  i0 = iiPEnd IfLoop " &Sub'*12 3$*4 5 6 7* * '*? InsertLineWB_custom@\ s͈͂̃|[gݒ肳Ăs ̉lj 318 IN : ȂOUT: * Pest 2017/11/29 Akito KobaPyash'#, |R(Con$C_ST_LINE As Long492IED 51 INSInteger$1#Dim ws0Work sheet id Parm(|1)AA+vAS etAnit_WB(iD:@%0If Is@ Nothi@=Or 0 Then Exit A'ۂ@uԍς@h悤⤀r r LFo@AC_EPTo CUE\Ste8p -H B%.Cells(i, gjpn0) <> ""%CGA @Call i_Hrow C_b,8; Nex_O**ǖ AdJoken:ǁuEl܂͏vAh̕`g!dddIN:sd쐬 :d* XVd`I?d514c18d2D_tfC WG_"nam!bS\tr`Y1dat6uhhhF̐擪"I"ɒuāAkƎ(ɈȀj>B5c' lNU@LL <%= !5@jE3b᱂Ƃ5civScCDo While i <= fzal0=n-x'|5z`1"1" & Mid(, 2'x 7= b& ""' ws% .gjbc@= iȏaS=3@a߁5_ Q K0Else [DoG)P|T}O O*7FipXCJ* ._N_N!/Wc@ '12JԂRs["312P@TL}E F@lOPAnlli oP]835coP125&5COPY 26L@ z`}} 2N#"i?4A/Tm/T`/a(C_ r1 e?V 4>2_i4CSyKU1 ч' 1 i -  L2:@+ dÄQR  qB@Q8  1W ?PKyoukaie.!'#Ob' SQset_k ws,A$!Sub By8Valj/&, cG6'rз'_bbq_<poNj09iopa;is2 _B3 PiiaĚ?EItAuAWqFP u e~x ]4_m sSSP@dda++ J2z O N#dBͶ If ws Is Nothing Or i0 = 0 Then Exit Sub iidDi00retMC_init(0.)*0<'sIvV擾8Call set_option(ws.Cells(1, 7)]jgjlgdisp @iia(1)Fo1 To 100&(is_keisen(ii, j0,) And &H>2#%Snam+Pgjpn#texTrime3f'<> "">.JoinType2 Lookup policy on multiple match"XS.U"Source Filter" ql Query Sql_Override A3gi ModA.1!ElseG eE_If DEBUGOUTL(n, "SetKyoukai: L=[" &B"]"Ĉ3@uA_iiGexp_compile( KJ0SA A 1e 4Do W>h#Bs posInStr5AND .A @"G PandX>! (Left - 2lai Mid+ 4h'o=%/`A  ""BE $1 gBU=11!C % AEvbL`Kmw+ap+G ,@ gjbc0!">'ER_R + Ic$^aB !MZ>K]`_kf, , iob, objdaL95a1Fa W 9#ig$N f  ByVal dat As Str`A$Dim iInteger#nm¥ cC2= @R-D0$[n +GetOLs(D"`1ppt, 1 op n -FC ai3c bz" !wwB2 q"Dcb~ U q1pLogLevel(NO_DBGLOG,h3ZPFunca + _3p Wor0kshe, ByRefQ-("Lo q!0 ob/@1\0NF OPARMda#!2 t O)!Rda mb&N8 2_02"2q7- sOperat@1 opq-da:1om!R infoWI# 1K"" : Ek@>=Xii~rwĆSTGaV|i < Rc?.21"7m} : fibhmc&ghrs8= 99øDov;1Q2]P=0g i`'=]1[(D=(  8N 1r0 ?Aeconv_argQ @5 P UJ? pmstk(r dap[Q5o 3 8 * g4: 1)7 ' %5:ja# row_l0ist("prs@>bP e Bo/> -G"L8ISTEQ1;HORV fit;=)Qf YR<5 6  /1&NUw irs = AP- 1  iia(0)ti `KK_fu@nc(ws,T,@ pmstkr nfoW, dJa$) zIf< 0 Then  iExit Do End tIf iB da1\(yL "" &_1") ORV U"2+ Els2eqmc"q 'xNOP$=-3'Vda2*E2>V&.t-4/0vAԬyO_ "LxіsOperatorLget_bo(mc>= 31 A2J<8op@comp_rev@< -*\giSqlMode@ Uс s)kyoukai_exp#$& " & %B1"? ) W r~ Call DEBUGOUTL(161, "_ :={"lGLk{,R FLoop10  :vi"i: !"F tio Private %e % _kByVal ws As WorksheetA, By,Re)Lo,ng (BINFOPARMA a!` Integer W ma 6B Stri # CDimƉii2r8datte~xC `1r&s= Do While i |0capm*%<a=O(7gU(U2`E:: DDA i ="HU`pm.att5eHG_tP.id0 "F" =5(_methodEp sval"iL(i2)2 R@eW'@D(<)L\q8E5bRERRO RE(Dnot  name!!ݨD) 5-,PA5r<>0) *r]+ MMnoDj MOM %F LMMa>Ma3_JQ!AMnparmO1qcLS i0|OOK qORb 1l5?[A7Q-O0fom err_5olrt>:2&U8rmt CRB V-a < 1G =&@|72.*4,G$ 'S5952=i0).P e6ISNU|LLR1P? Qia, Ba=  M_SPAC|ESu"}P'5_YS0pace HREG_MATCH j =D#^0ran-\ _\>3 EitLalIN/ F RP*o #+[&&i3'8N`g(MU`(ZottF ElseIf funcnam = "DECODE" Then lvalInt((nparm - 1) / 2) + F1XIIF2A:nd IfE Call set_info_bin(W, )/iia(0)iiKK_؀_methodHret \Fztios Private 6kyoukai_exp( _ByVws As Worksheet , ByPRef B)L8ong ! Stri IDim iiin3<> 0 ATrim(ws.Cells(ii, gjpn0)) "insert_row r, 1p, wsS_LbcY& 5)(c-=ŊsXB9 f'eMC+@_list([p mstk(RINFOPARMbAi irieger9hpWX mda'ChCnt f'AhpmIi @dattex kDEBUGOUTL(120, " B: :=" &@oB+rs@"Do While i >= 0 = *ie = $)" u8=",@ @Y(p0m.opX(GC_ _OPT_MRKARY Or LST[A_?aaEIpWa`"(* Exit(߁ -Go /.4L,&?qB;vLo opD2ERROR@E(yDno !} or Ah mark!!"2 =' os  !"#$%&*rU H(`y8` Qay4`y4`y$!`,I`q__SRP_fU chk_mapping1__SRP_10__SRP_11 0,q`q0,`q0,`q0, `q0, `q0(9 `0(a `0( `0,`08`qi00004`y0)`0f4Q`yf4y` !ip0(`900`9I04$ `01`Yyf$Y`4`y$`4`y8` qy$!`$I`$q`$ `4!`y("`\#`yhftpX9$`yht4p`a%`Iayh40t<&` yh0nOO616dbd5e\1ߖo     ( 8 H*h24(@Xp(@`x0P`x 0 Pp(@Xp (@Xp 8PhDU(,V˫ZVxRXRRRME P@ @$ 04<<> <<(NRv=BPBx8=B|`=HH␀0 H ␂=8 H ␆=` H ␊@x H␌= H␐> H␔` H␖(> H␚P> H␞0 H␠x> H␤>pJH␨JH␪>JH␮>JH ␲ JH"␴?JH#␸@?JH%␼KH'␾h?KH(?HKH*hKH,?pKH-?KH/KH1@KH20@KH4LH6X@LH7@ LH9xHLH;@XLH<@xLH>LH@@LHA ALHChLHEHALHFpALHHMHJA0MHKAHMHM XxMHOAMHPBMHRMHT8BNHU`BBW-BH Y@ \t<>=/?!+-"' phh"$hh&hl h( h*C:\tmpMAPPLET%MAPPINGh SOURCE%TARGET CONNECTOR%TRANSFORMATIONGROUP%VPC _@TRANSFORMFIELD SOURCEFIELD :C8b @>C@d @ TARGETFIELDx @CHf @D Ph@‸DTi@H@D\k@LhD m@INSTANCEp TABLEATTRIBUTEFOLDER  @%RDp@V r@ Ds@ZEu@\ w@^0E x@MAPPINGVARIABLE  METADATAEXTENSION  fE|#@j ~%@lE&@p(@ FROMFIELDTOFIELD+r`0It `v`x `11iX)u %` V`H``` `NN t% 6(%`z````````  `H..i```` V X`))`z `JJi 6%``|`````f+j`CCiV)  )uH %` ``z`x `>>` pX` ` X` NNi`z X ` XXiiV`  %`x` `+( ` iiV % 0%`x`x`~``z```(`X`Z  `h BBiV  ` 55iV+ `( ``iH) h@%iiV`x+`(iHihiV+`99i) 0 @%iPiV`x`+`i&)8H @%i`z+X `) @%i``z` J ```(`*```,`.`( 0 2  `4`6 8!` %%i ) ! @%i`+"`x!RR)P!!A%i`x`V`z````8`R`T+ 8%`"{{)# # "@%i`x`Z`\`z``J`^```b`d`f`h`j`l`n`p`r`R`t``8+%`x%**i^`H`z``(+p'`8&KK)PX&`&A%i`z`J`````d````8+(`'ll)'' '@%i`x`z``J```8+0*`)55)8)H) )@%i`x`z``J```8 (*%+$*`55`x`z` *%`8++`0+$$)h+x+ P+@%i`+  .`+ZZ)(,8, ,@%i``z``J``b`d````````````8+.``.).. .@%i`+0` /;;)X/h/ @/@%i``z`|`J```b`d`````8+@2`044) 101 1@%i``z``J`````T`N`* 2`2i`z H3 `2 ""i`z`  4!`3!i3i3i3i`z 4"`"++`z```+5#`5#,,i` 5ib@5i`*``+P6$`5$i^`8``z 07%`%22 t6% 66%`z```  7&`p7& ir 9'`7'XXi7i8)`H8 08 th8%`z`|`` 98``$`( 9h9+;(`9(00)u99%iB:i$0:iP:i p:):: :): :`z`|`` ```$`(`` )`)&&`z`|`` << @r<BtB(BzxB~@JH␄P H ␈p H ␎h H␒h H␘ H␜ H␢X H␦JH␬JH␰JH!␶HJH$␺pJH&0KH)XKH+8KH.`KH0KH3KH5(LH8P0LH:hLH=LH?LHB@LHDLHGMHI8MHL 0`MHNMHQMHSNHV  BX/Bh Z@1B [@3C \@4(C]@d ^@6xC4`@8 6a@<@ < c @| De @B Lg@F Xj@J8 d l@NDn@P o@T q@XH t@~p v@`XE( y @bEz!@d0 {"@hX }$@n '@0@@8%.@  X@ 4*8p'x0@?AX  >Xph?h8BDX X@x? A +xCBXECD=X "?P EX .(@2@DB(= <<P>B8 0*H PC0;@?CpAXP(C@ 07`hD  >`B0  47Eh9(EP60E5p =?2`= AE(HABC %CH@8=8!x>=>@DDH3(>0X>A@ p8J%(apos,#xD,#xA,,#x9,,gt,>,lt,<.ge,>=,le,<= FROMINSTANCE TOINSTANCETOINSTANCETYPETYPE EXPRESSION(NAMEVALUEDATATYPE>=,le, PRECISIONRSCALEGROUP MAPPINGNAME TEMPLATENAMETRANSFORMATION_NAMETRANSFORMATION_TYPEPORTTYPEN DESCRIPTIONORDER DEFAULTVALUE ISSORTKEYR SORTDIRECTIONREF_SOURCE_FIELDYPE REF FIELD FIELDTYPEONKEYTYPEDEEXPRESSIONTYPELEVELOCCURSFROMTASKRETOTASK CONDITIONEISEXPRESSIONVARIABLEISPARAMNULLABLEONTYPE DATABASETYPEREUSABLELENGTHOFFSETPHYSICALLENGTHPHYSICALOFFSET MAPPLETGROUPRankJoinerRouterFilterLookup ProcedureLETarget DefinitionENGTHSource QualifierMASorterSequenceJoInput TransformationOutput TransformationUpdate StrategySoMappletr Normalizer App Multi-Group Source QualifierOuTarget DefinitionpCustom Transformation Aggregator Expression hp Source Quafi`SPTa DefinitionCu Transformation Agator Exsion*N0@@8%.@  X@ 4*8p'x0@?AX  >Xph?h8BDX X@x? A +xCBXECD=X "?P EX .(@2@DB(= <<P>B8 0*H PC0;@?CpAXP(C@ 07`hD  >`B0  47Eh9(EP60E5p =?2`= AE(HABC %CH@8=8!x>=>@DDH3(>0X>A@ J** X<; J Nmal*\R1*#284$*\Rffff*OO616dbd5e(*\Rffff*OO616dbd5e\0(*\Rffff*      !"#$%&'()*+,-.0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ "@`x,"   8  H X x                   ( 0 8 @ H P X ` h p x                  @ H P X ` Nh  B       ( 80 &h    N " $ H `      & @" HX`px     $ 4@ x , <    08@H h :p   N P Dp 0    8@ "x <  & "08@HPX`hpx      @ P $h 8 (&0X`h p    (8HPXh    (  H BP " & 4 8  *X 0  & "  (0 @X  h      (@ Xh px  :    N  p ,  &  * @"PX  ` p  6(@X`h >p  L  40 2h : * * &@ *h " $  0 08 h ( "          !!0!P! h!x!!(!!!! ! !>" P" `"x" "("" """&#(# 0# 8#H#`# h# p## # # ### # J# 8$ <X$ $ $ *$ ($  % @% `% $p% % % % % & & 0& *P& & .& ,& ' 'B,('H'P'X'`'h' p'' '' '"' *' ((8( "@(h(x(( (((( ( ( )8) @) P)`)h) ))) )) )) * 0(*X*`* h*p*x* ** .** *+ ++(+@+H+ P+ NX+ + <+ >, @, &X, ,",,,,,, , ,,- j - X- "- :.P.h.p. x. 0. . (.//(/8/X/p///  // //$0,00`0 h0 x0 0"0 0 N0 1 @81 (x1 1 41 1 2 2 , 2 P2 h2 *x2 *2" 22 2  2(303  832H38333634  (42848p4 444 464 5 85  H54X5655256  (62862p662667 (787  P7(h7 7 777 77 8 8  8 2(8 `8 x8 68 .8 8 8 9 (9 @9 X9 p9 49 9 9 9 9 : &: @:" H:P: X:h:p:x:  :::: 4: : *;0;H;P;X;`;h;p; x; ; ;; "; ;< < 00< `< < <<(=0= 8=@=H= P= h= x= = = D= = .> @> X> h> ,> > > > ? ? 0? "P? x? ? ? "? $? @ (@ H@ `@ x@ @ @ @ @ @ @ *A 0A PA hA pA A 6A *A B &0B XBB hBpBBBBBBBBBBBB BBBB BCC C(CnHCC0CDD 2(D `DpD xD D "DD DD*E&0EXExE E EEE E EEEE*F@F HF PF`F hF pF xF F FF F F,FGGG0G8G@GHGhGGGGGG*GHH H (H0H 8H @H PH `H H H H H H H HH I II  I (I 8I PI `I hI xIII II I III IIJ J(J 0J J8J J J $J J K (K "HK pK xK K K K K K K L 0L PL hL 8L L L :L  M 8M 8PM M M M (M M" NNN(N 8NHNXNxN N NN NNNO8O XOhOxO OOOOOP0P 8PHPXPxPP PP$PQ Q@Q`Q Q QQQQ RR R@R`RpRR RR FR R S (S HS PS `S xS S :S S (T (T" 0T8THTXT hT xTTTTTT TT U U U L(U xU 0U U U V V (V 0V PV hV V V .V 8V W (W 8W PW hW "W W W W W X < X `X "pX &X X X X &X YB4(YHY NPYYYYY YYZZ  Z*(Z XZ hZ pZ xZ Z Z ZZZ Z [( [[`\ x\ \ \\ \ \ \\ ] ] ] 0] @]`] x]] ] ] ]] ] ] ] ^ ^ (^ 8^H^ `^h^ p^ ^ ^ ^ ^^ ^^ ^ ^ _  _ (_ 8_ H_ `_h_p_x_ _ L_ _ 4_ (` H` X` h` x` ` ` ` ` ` (a 8aB Ha LPaa a Fa a ,b @b `b b b b b b b c c 0(c &Xc c c c c c c c *dB4Hdhdpd Nxdddd ee (e8e@eHePe Xehe ee e e e e e ee ee f (f 8f @fHf Pf`f xf f f ffff f Nf  g :8g xg g g g g g &g * h PhB Xh`h hhphh h hhh h Dh  i 0@i 4pi i i .i i j (j &@j hj xj 6j j j j &kB @kHkPkXk`kpkkkkkkkkkkkkkk kl(l @l Pl hl xl l l l l l 6lmm m8mHm `mm mmmmmmm n (n Hn Xnhnpnnnnn (noo(o@o (`oooo ooo oo p  p 8p Pp `p pppppppppp p pq q(q@qHqPqXq`qxq qqqqq qqZqXr*`rr r Fr r .s 0s Ps ps 0s $s s s :t Pt *ht t t t $tB uu  u0uHu huxu uuuu uuuuu v Nv Xv :pv v v v .w @w Pw pw w "w w (w x x $0xB Xx`xhxpxxxxxxxx x$xxxy  y 8y Py`y hyxy yy yy(yyyz zz (z8z @zPz hzpz zzzzzzzzz{{ {({0{ 8{ H{ X{`{ h{p{x{ {{{{{<{{ { >| @| :`| | "| | | }  } "@} h} (} }B }}}}}}}}}~~~~ ~(~0~8~@~H~P~X~`~ h~p~~~~~ ~ ~ ~     0 8 H P ` x             0 8@X ` h x   Ѐ؀  (8H X h x   ȁ؁    ( 0 @X `  Ȃ ؂  ( N0  > ȃ ؃  . 8 *P  B D (HPXFp  ȅJHPX` hpx  D І : 0 P Jh  Ї   * H XB px Ȉ    ( 8 @ P X h p     ȉЉ ؉ (H Xhp6Њ( 8H`xȋ Ћ D؋  6@ *x  ,Ȍ   :0 p  $B ȍЍ؍  8P h x   `  .((X   4.Џ  (  HX  N( x 60   VHX  $ R XPh Г" >( h $  ДD ( @ &P x    Е     08HXh   N  ( &@ h * " ؗ   & ( 0 8 @B HPX`hpx     Șؘ  0 @ P ` p    ș Й ( 60 h 0  Ț ؚ    "8 ` *  BțЛ؛  (8Xx   ؜   (8Ph  ؝  J h 0 ( ؞  0 0 "P x  ( ȟB П؟ $ 8P`x  4Р  N h 4 &   0 8 "@ h Ȣ (  B 08@HPX`hpxȣ Уأ  0 8 H P ` p       Ф ؤ       0 8 H P ` p إ H(pxЦ ئ  N H ,` &  Ч $  "( P &p B  $Ȩ 8Phx  4  N X 6p & Ъ $  "8 ` & B ȫЫث  8P h x       Ȭ ج     (8Hhp ȭح  N 8 2P &  "Ю & & H (X B ȯЯد  ( 8 @ P X h p    Ȱ (HXhx  Jȱ  8 P $p & " вز    L h ,   ȳ س * ( $H p  & д"      8,H x  ȵ ص N 0 ,H 2x & ض   ( 0 H X h & " ȷ  з   ( 8P X`h p  D  > @ X x  &"йع   8PX `h p     Ⱥغ  B 8 "P x  * л   & 8 2P 6 & B   (8P `pJ (08 @ NH  0  ,  8 X h p       п &B (08@  HXh  & 2  (08 @ NH " 6 * :( h (  "    <8x    ( 0 8 H X hpx       L P Fp  < &( P" ` 8h"  N  B8 $   " H ` p  $   ( H ` (p "    0Hhp   0H`x (  "0"X""*  (8 X*x &2  N( x H . B "P Bx 2  0 @ X p " $   @ 0H :x & BL* (08@HPX`h px   0H`hpx "  $.@H P NX  H , 8 >P $ "    ( @ `  &   0@ X x  &  0x]$<]$<]$]$=]("DEBUGOUT LEVEL]P%OƓƂ͏o͂Ȃ]8=%INPUT܂͎̂Ƃ̂ݏo͂] \t<>=/?!+-"'x](apos,#xD,#xA,,#x9,,gt,>,lt,<.ge,>=,le,<=`=]C:\tmp]MAPPLET]MAPPING=]SOURCE]TARGET=] CONNECTOR]TRANSFORMATION@]TRANSFORMFIELD=] SOURCEFIELDh] TARGETFIELD>]INSTANCE]TABLEATTRIBUTE]GROUP(>]MAPPINGVARIABLE]FOLDERP>]METADATAEXTENSION] FROMFIELD0]TOFIELDx>] FROMINSTANCEX] TOINSTANCE>]TOINSTANCETYPE]TYPE] EXPRESSION>]NAME]VALUE>]DATATYPE] PRECISION ]SCALE?]GROUPH] MAPPINGNAME@?] TEMPLATENAMEp]TRANSFORMATION_NAME]TRANSFORMATION_SJyTYPEh?]PORTTYPE] DESCRIPTION?]ORDER] DEFAULTVALUE] ISSORTKEY?] SORTDIRECTION8]REF_SOURCE_FIELD?] REF FIELD`] FIELDTYPE]KEYTYPE@]EXPRESSIONTYPE]LEVEL0@]OCCURS]FROMTASK]TOTASKX@] CONDITION(]ISEXPRESSIONVARIABLE@]ISPARAMP]NULLABLEx] DATABASETYPE@]REUSABLE]LENGTH@]OFFSET]PHYSICALLENGTH]PHYSICALOFFSET@] MAPPLETGROUP]Rank A]Joiner@]Routerh]FilterHA]Lookup Procedure]Target DefinitionpA]Source Qualifier]Sorter]SequenceA]Input Transformation]Output TransformationA]Update Strategy0]MappletX] NormalizerA] App Multi-Group Source Qualifier]Target DefinitionB]Custom Transformation] Aggregator] Expression8B]] `BX*** XML ATTR ****^p^ valuep`^^^^ ^ p(]  ] B] B] B] C] (C] ]PC]xC] ]C]@ ]C] ]C] ] ]D] ]@D] 8 ]hD]D] ]D] ] ]D]H ]E]p ]  ] 0E]XE]E]0 Dim group As String]E]X ] ]E] Hmacro_libMzz_macro_libɂꂽ̂ŤIɂ͍폜 (2019 / 7 / 5)giMsgSJIS폜 ]X]p tG'pj'x p'pExportt@ĆAS-JISłH x z $|'v v | v ~G'xjkh x'riXG******************2*********3*********4*********5*********6*********7*** @\:IvVݒ肷-M : |[go̓IvV -D : debugtS: IN mode:@= 0 : CheckMappingt1: CheckAll Mapping2: CheckAll MappingSubOptional ws: Worksheet(default=Nothing)test 2019/07/08 Akito Kobayashi*]]0]h]] tG `.tj t%h$f'  MD V$*'|[go̓IvV X$VG$V'8j#CheckMappingt: Set giOPT EXP_DISP= 8A< Xe$VG ~$VA@j+CheckAT I Mapping: Set giALL_OPT_EXP_DISP= 6A<d 6'8$V$V'd'k 6    '8)CheckAll MappingSub: Set giOPT_EXP_DISP = 8A<kHk@debugt: 6$V$$4'koG********1*********2*********3*********4*********5*********6*********7***:CheckAllMapping>* @\:uINDEXvV[gɐݒ肳Ă̓V[gԍ̉͑Ώ*V[g̃}bsOA}Exportt@C(E1)Z: ͌V[g(̂Ƃ́A10)̂Ƃͤ10ݒ肳1(F1)Z: ͌V[g̊Jnԍ(̂Ƃ́A1)ŏI̓V[gԍɍXV5͑ΏۃV[g: {m_icm]m_AACOMPImplt)Ŏn܂V[g : IN:Ȃ쐬 20XX/XX/XX Akito KobayashiXV]]]0]H]`]x]]]]]$r G|jAA$INDEX$.6 6''d |[go̓p[^̬ 6%h$f'  M V$*'z$VG$V'6j(CheckAllMapping: Set giALL_OPT_EXP_DISP= 6A<k0  6A 6%h' 6%h'k  ' 6G  6,hjd 'k ' A@ 'kX AXMLi[fBNg 4G ~ A@,j Export file 4$'4 4G|j  '   ''z' t & z  z  t!$( tB@* 4A z 6,h  'k k \Gyj z 'z ‚̉͂I܂BA@|o<****** ********2*********3*********4******* **** ********7*** : CheckAllMappingSub * @\: V[gΏۂ̏ꍇ.݃V[g̃}bsOA}Exportt@C1:IN : dir_nam: Exportt@CtH_$(C1)ZłȂƂ́Ag*(C1)ZŁAdir_nam󕶎̂Ƃ́A*"C:\tmp"g쐬:20XX/XX/XX Akito Kobayashi* XV:]h]]]]XMLi[fBNg $'4 XMLt@C$h$f'd dG|j t@Cp 4Y d'|[go̓p[^ 6'8$h$f'  M V$*'$V$V'd'k 6    V'8)CheckAl MappingSub: Set giOPT_EXP_DISP = 8A<kkA AoG******************2*********3*******************5*********6*********7**27 CheckMappingInit&@\: }bsO͏̏s 31: IN : til TE FE 20XX/XX/XX Akito Kobayashi* * * *$* PF FE : 20xX/XX/XX Akito Kobayashi* :]@AXAZA\ 6 $4'z ~,$'< < '>'\ z'6 z'8%CheckMappingInit: Set giOPT_EXP_DISP= 8A< z  z$L(*'4'd8 Set fs = CreateObject("Scripting. FileSystemObject")Ao@E********1*********2*********3*******************5******** ********7*** : CheckObjectDone-@\: exportt@C͌INDEXdwV[gɏo,JgV[g(E1)ZɌݓݒ肷3INDEXV[gname0O꤁A̍sɌݓݒ肷$ȂΤljĤݓݒ肷$ȂΤljĤݓݒ肷 :IN: namel :exportt@C#ݒςݖOname0̗ɊgqƂͤ̂܂ܔrǂ炩ɊgqȂƂͤgqȂŔr)ǂ炩ɊgqȂAݒςݖO*)"%"Ƃ́Aname0 ݒςݖO * liker!쐬 : 20XX/XX/XX Akito KobayashiXVX]]]]] ]8]P]hst̐ݒ +hname=[ ]AINDEX$.6 6 ' ,'  G   $'j '|' d | 6%h'f fGyjID= z file name=[ 6%^]A f,'  \   f G'jdh  G f  $'fj f%'  f G'jd  f$G'jkk   | 6,hyk | '|x  6 |  `!A  | 6,hk(k oC********1******* *******3*********4*********5*********6*********7*** 2: check_analize_sheet6* @\: exportt@C͌ʗpV[g`FbN * 518: IN :opt `FbNI#<>0: ͌ʂ邩`FbN!nama ) exportt@CԂzOptional ws Worksheet(default=Nothing) *OUT:nama ) exportt@C̔znama (0) exportt@Cnama (1): gqȂ̖Onama (1) : #5E 7 A LOWnama (2)#A SE 7ԋp: ^[R[= 0: export#*#* - 3#= -1 : WhiteBoxeXgpV[gł= -2 : XMLt@CȂ'= -3: ͌ʂȂ(opt<>0 ̂Ƃ̂)%'* fent : 2019/07/08 Aki to Kobayashi* TW:***************]P]h]]] tG `.tj'xV[g̃`FbN ,$' ' t!  $$ PC_WHITEBOX_NAME_PATICFL7:51'xkXMLt@C̐ݒ`FbN+++ x t%h$f' + .'z z  z $+  z $+d ++k$$XML'xk`kX͌ʂ̗L`FbN x V 'x z2 z t%h$' @@@ ### ***'xykk x x& (A1)XMLt@Cɐݒ肪܂B' xe͌ʂ܂B'd'k[ t!] is  A@|k x'jiG******************2*********3*********4*********5*********6*********7*** : CheckMapping5* @\: Mapping܂Mapletexportt@C͂7exportt@CtH_́Aʂ/I * 3: IN : tal * Est 20XX/XX/XX Akito Kobayashi*****](]@]x]]$r G|jA$h$f'd `!$'c If file_name = "" Or InStr(dat, "WHITE") > 0 Or Inst(dat, "1") > 0 Or InStr(dat, "74") > 0 ThenR If InStr(dat, "WHITE") > 0 Or InStr(dat, "") > 0 Or InStr(dat, "211") > 0 Then MsgBox "Error!! <-EDIT."3 If check_mapping_sheet(ActiveSheet, 0) < 0 Then $j |kt@CpfBNg* file_dir = get_file_dir_cell(file_dir) XMLt@C! file_name = Trim(Cells(1, 1))$'d 4+ d+ Export file $' G|j$'4$'d d+h|[go̓p[^̬$h$f'  M V$*'$VG$V'8j!CheckMappingt: Set giOPT_EXP_DISPA<kAAp A d O##**7LLts. 8A@|o8H*********|***************************************5*********6*********7*** 27: CheckMappingSub:* @\ : Mapping܂Mapletexportt@C͂{"ȉ̉͌ʂJgV[gɏoTRANSFORMATION.Source̎Target̑O܂łڑɏo͂ ConnectiontargetSource%31: IN : file_path: export 77 POLOZZE B: OUT : 12di = 2$exit_proc := 1̂ƂAI#te vit : 20XX/XX/XX Akito Kobayashi]@AJnOoJn: CheckMapping for dA<'|̒o(CheckMappingSub: Start Check expression.A<!@@@@@@@@@@ START CHECK EXPRESSIONA A A@@@@@@@@@@ END CHECK EXPRESSIONA \G|j ڑ̒o(CheckMappingSub: Start Check connection.A<!@@@@@@@@@@ START CHECK CONNECTIONAA A AA@@@@@@@@@@ END CHECK CONNECTIONA \G|jATarget)CheckMappingSub: === Start Check tartget.A<@@@@@@@@@@ START CHECK TARGET?A A@@@@@@@@@@ END CHECK TARGETA \G|jSource(CheckMappingSub: === Start Check source.A<@@@@@@@@@ START CHECK SOURCEA A@@@@@@@@@@ END CHECK SOURCEA \G|j *** ENDPROC+^A `!|$'|IOoI: CheckMapping for dA< dA. dA$'z ` dAn dA$'z dA dAo,********1*******3**************6*********7** * : input XMLni0** @\: exportt@C1s“ǂݍ݉͂(31: IN : file_path: export 77 1 LOZILIZZopto?= 0 : Transformation1: Connection = 2 : Target = 3: Source= 4: Instance name-O: OUT: exit_proc: G[̂Ƥ1 ݒ肷 disp : = 0 mode : = 1 mode3 = 0 ista_dat2 = 0dat 2test 20XX/XX/XX Akito Kobayashi#FX]]D]](]@ '\|`kX. Set ds = fs.OpenTextFile(file_path, 1, -1) fnr = FreeFile0$ Open file_path For Input As #fnr r$''V' 'X'Z'~'x ( xb (  $'x ret = get_line(fnr.line) line = input_line(ds) x Gxj !) ret = xml_analize(parm.line, opt) If line <> "" Then V$'x x  xml_analize error ret= x  line=' !\  quat= ! EOF= !A@|'\xkk Close #fnr A ds.Close ds = NothingoP=****** *2*********3*******************5*********6*********7** xml_analize(exportt@C1̂PsͤāAȉĂ Jn^O f[^ I^O& : IN : line : exportt@C1sopt: o͑Ώ%3D0: Transformation= 1 : Connection %3D2: Target %3D3: Source%3D4: Instance nameO : IN/OUT disp ͈ʒu=30:"̑O or ">"̌31 g̒A%3D2 disp=1ŁATagName̒= 3: disp=2ŁAAttrName̒?=4: disp=3ŁA ̒A%D9: ""2","1", "-"̒mode Tag̏ =1: Jn^O%3D2: f[^%3D3: I^Omode3:"7"Oɂ/Ȃ=30: Ȃ=1:#ista_dat2: linẽf[^̊Jnʒudat2: f[^̃f[^ԋp: ^[R[i = 0: I=-1:"7" ̈ʒus/=-2: Jn^Oor I^OȂ̂ɁA")"ꂽ#= -3: AttrNaměɁAg=hȂ3-4: dispKlȊO쐬:20XX/XX/XX Akito KobayashiXV:X] ]]8]P]h]]]]]]]'X'Z'x'~ (''z z  b  |$'dxml analize: n=  wd= ! opt= V disp= ~ mode= XAd  Gxjdisp= ~  ! | +h  ' !/ X Z  X ~'xx;k;'Z ElseIf ssp.wd = ">" Then ~  !>e X  !z V$A@x  xG | '|j Z G   V$'xj   V$'x'Xdx: !'V' 'XkP: Xe call func3 | +h  'z   z V$'x  xG 'zj'Xd9'xx9k9'~'Z ~e !<'z X V  V!! V $'  A@k8   V$'x' k8'~ !$'(= ( |!+h  ''X (/ ! ('X (? (! (-e ! ( '~k7d7x7k7 ~e !'tag_nam=  | +h   '~ ~e ! z$('~ ~e !='~d6'xx6k6 ~e ! z$(" z 'z'~ ~ e !'~  G | '|jkH6d@6'xx(6k 66 V  V$$f' 'Vk5 x'i5D****** | ******* *********3******************5*********6*********7** * :header* @\: wb_o͂* IN : opt: wb_̎= 0: TranceFormationtrans_typ = "Normalizer"C51 = "REF_SOURCE FIELD"̑: C = "EXPRESSION"*= 1 : Connection*%3D2: Source, Target= 3 : Normalizeri %3D4: gp= 5: Mapping Variable* O: IN : trans_typTranceFormation^Cv OUT: cella0o̓f[^z1ExpHeader TranceFormationpwb_̏o͍ς݃tO 30: o =1:o͍ς3giConnectHeader: Connectionpwb_̏o͍ς݃tO %3D0: o =1: o͍ς1bf_ins_name() : 1sO̐ڑf[^̃CX^X*bf_ins_name (0) Frombf_ins_name(1) To!* 쐬:20XX/XX/XX Akito Kobayashi*XV(+^+^+^ V+^ +^ +^ B -- --+^d01-- --+^k1-- --+^ --DEFAULT--+^--  P+^ Ve+J+JA-- --+^-- --+^-- --+^-- --+^ -JUDGE---+^' Ve+^-- --+^-- --+^-- --+^ Ve+^-- --+^-- --+^-- --+^-- --+^-- --+^ VeA-- --+^-- --+^-- --+^ Ve+^-- --+^-- --+^ (+^-- --+^kh-AoP-@***** *********2*********3***** *********5*********6*********7** 7 trailer@\: g[o͂13.IN opt: g[̎i= 0 11= 1 Connection B.OUT: cellao̓f[^z3giConnectHeader: Connectionpwb_[̏o͍ς݃t 0 ɐݒ肷"PE At : 20XX/XX/XX Akito KobayashiF:+^+^ ^ A VA --LINK END--+^+^+^+^+^A@Tk+Ao*RFRF******************2*********3******************5*********6*********7** * % xml_func1)* @\ : Jn^O̓eV[gɏo͂ IN tag_nam : ^Oxmlattro XML_ATTRECUnattr XML_ATTRACTopt**= 0 : Transformation= 1 : Connection = 2 : Target = 3: Source= 4: Instance name'B: IN : trans_nam : Transformation name1ExpHeader: TranceFormationpwb_̏o͍ςtO source_nam Source nameIN/OUT : trans_typTransformation typetag_nam="TRANSFORMATION") L.gggɐݒ肷OUTgroup_itag_nam = "TRANSFORMATION"0 ɐݒ肷6TableAttrHeader: Table Attributepwb_̏o͍ςtOtag_nam="TRANSFORMATION" OLtag_nam="TRANSFORMATION" OLE. *0 ɐݒ肷* :** te st 20XX/XX/XX Akito Kobayashi* EW]dxml_func1: tag_nam=  nattrt=  opt= VAd'x       $'z &  e  !$'Fz%k% Vdxml_func1: trans_nam= @Ad  'A@B A@ !L $'x  e @ PGAj  $ 'xk%  e  $ 0 B  B  B  B  B  B  B  B  B  B  B  B  B  Or trans_typ = GC_STR_INPUT Or trans_typ = GC_STR_OUTPUT' Or trans_typ = GC_STR_MAPLET Or trans_typ = GC_STR_NORMLZ  $'xk#  e B  !$'xk@#  e @ B   $'xk"  e  $'x  e B  BSOL  $'xk"kx" Ve    $'xk8" Ve   !$A@x  e  $'x  e B   $'xk!k! Ve    $'x  e D  $ 'xk !k! Ve   !$"'x'N  e B   $'xk k k x'ix F***** *1*********2*********3*******************5*********6*********7**'* : xml_func2.@\ ^Õf[^(݂ͤȂ) IN : tag_nam ^Odatf[^opt= 0 : Transformation= 1 : Connection = 2 : Target = 3 : Source= 4: Instance name ԋp: 0!te nit 20XX/XX/XX Akito KobayashiXVdxml_func2: tag_nam=  dat=  opt= VAd'iP?1*********2*********3*********4*********5*********6*********7** : XML func2%{@\ I^O̓eV[gɏo͂ IN : tag nam :^Oxmlattro XML_ATTRAC 5nattr XML_ATTRC 5opt o? $= 0. Transformation 1 Connection 2. Target3 Source= 4: Instance name)4: IN/OUT : trans_nam Transformation nametrans_typ : Transformation type source_nam Source name terget_nam Source name OUT: cellao̓f[^z |ԋp: o͍sԍ$* Penit : 20XX/XX/XX Akito Kobayashi]p]dxml_func3: tag nam=  nattrt=  opt= VAd'x     ##### END ' A< +^A'T |'zk V   @ B  $'xk`**** END+^A |'x'@'Bk Ve   *** END+^A |'x'k Ve   D'*** END+^A |'x'DkHk@ x'i0H*******************2*********3*******************5*********6*********7**'* xml_get_attrval4* @\: XML_ATTRzattr_namɑΉl* 31 INattr_nam : Atrributezxmlattro XML_ATTRAC51nattr XML_ATTRACT& D : 1 ΉAtrributeȂƂͤ$* PE Fit: 20XX/XX/XX Akito Kobayashiar]hA@ z  z$! & z$!"'y@k80i(=******** *********3*********4*********5*********6*********7**2: Check Connect Sub)@\: CONNECTOR^O̓eV[gɏo͂.ڑPorẗvx𔻒肵ʂV[gɏo͂-(OK)'ǂ炩̖1̐tĂ(OK) - T-*7*< -*NG - : 6-1##A } -17- 17-*7*.-**-**75] * 31: IN : xmlattro XML_ATTR6251natt XML_ATTRACTUL/* B: IN/OUT : bf_ins_name 0 OsInstance name OUT: cellao̓f[^zԋp: o͍sԍMER: 20XX/XX/XX Akito Kobayashi](]@]X]p]]]]](]@]X]p]]]]]( ]@ z  z$!' z$!"'8  $$ 8A@:  e *+J  e 8+  e *+  e 8 G$>$.TGTA@<jk z z$'  z$J xG'jdx z +JkX z$ z+J  z+^($J+^$@+^$J-_$~'$J-_$~'( $A@ ('B' $' ($'(    ($z'( (0 (9  ( D$G (OK)'jk   e $z'( (0 (9 ( F $G (OK)'jkpkh   (NG' $ ( 0$H',$J'd$0$0 'L ( N 2$H'.$2$2 '6 4 6 L 6 ,'dp .'k` (OK) & dat'd@(OK)  ,'kd 6  (OK)  .'d$J$2 ,'d .'k NG 'kkxkpkh +^ TGAjA $ NGUnmatch connect port.$,$. ($JAk 2Check ConnectSub: ii= |Ad |'i` @*1*********2*********3*******************5*********6*********7** 7: DispMap'@\: MAPPING^O̓eV[gɏo͂31 : IN tag_nam : ^Oxmlattro XML_ATTRAC 50nattr XML_ATTRACT)B: IN/OUT : trans_nam Transformation namefolder nam: |Wg̃tH OUT: cellao̓f[^z3gi MapVar Header Mapping Variablepwb_̏o͍ς tO (-0)#gMappingName MappingName(trans_nam)gObjTypeObject Type =tag nam)ԋp;o͍sԍDEL20XX/XX/XX Akito KobayashiX ] !A   $'@ ##### START ' A< +^A @+^ +^ F+^A'R @'f 'h |'i G******************2*********3*******************5*********6*********7*** 27: DispTrans3* @\ : TRANSFORMATION^O̓eV[gɏo͂: IN tag_nam : ^Oxmlattro XML_ATTRA251)nattr XML ATTRz'B: IN : trans_nam : Transformation name trans_typTransformation type OUT: cella: o̓f[^zbf_grp_nam OO[v(="") ExpHeader!TranceFormationpwb_̏o͍ς tO EO)ԋp: o͍sԍMent20XX/XX/XX Akito Kobayashi8!]!]!]!]"] "]8"]P"]h"]"'x   $ Expression   $'@   $'B z  z$!' z$!"'8 N  8'@  e 8'B B    $'   '  G   $'j 'Bkk  e ( 8A@: N e 8'V TYES XreusableA@:d XA@:kxkph*** @+^ @+^ B+^ V+^+^+^+^ R+^'H'l'nA B 'Vd'Vk'P VA |'xd`'@kPFound transformation name= @ type= BA< x'i7********1******* ****** ***** ************ *********7*** * : DispExpression3* @\ : TRANSFORMFIELD^O̓eV[gɏo͂*IN : xmlattro : XML_ATTRECUnattr ? XML_ATTROCIby: OUT: cellao̓f[^zbf_grp_nam OO[v(="GROUP"̂Ƃ̒l)ԋp o͍sԍ"* Pest: 20XX/XX/XX Akito KobayashiF:"]@#]X#]p#]#]#]#]#]#]$]$]0$]H$]`$]x$]$]$]$]$]$]%] %'x A@: vA@: z  z$!' z$!"'8   8'J N e 8'^  e *'`  e 8'b  e *'d  e x 8$A@:  e 8'z N e 8$'j  e *'l  e 8'n  e 8'|  e 8'r  e H 8'^d = 8'^ 8'Hk  e 8'R  e 8'tk`X ~INPUT'\ \ 'Z 8e G Z ^$ 'Zjd~'Zk~ Z+^ J+^ B +^+^dp~ ` b $+^ B  '8 B e p, t'8d~ ^$'8k} +^k} '8 jYES / l'*k} r rGENERAL */ r'8k`} +^ $+^  R$'Rk} +^A |'xk| x' i|G******************2*********3*********4*********5*********6*********7***8{@\ tB[h̓eAZ܂ނǂ𔻒肷* 31: INfld exp tB[h̓e* # : 0'= 0: Z܂܂Ȃ(Port݂̂̂Ƃ)=1: Z܂$* PE Fit: 20XX/XX/XX Akito Kobayashii* TW:*****8%]8,FALSE,TRUE,NULL,SYSDATE,SESSSTARTTIME,WORKFLOWSTARTTIME%]%]%]%' ^$' ,  'dz $'( (0 (9 (- (+ ('d8z z   z$'( (0 (9 (A (Z (_dy'yykyykykyixy>*********2*********3*******************5*********6*********7**: DispMappingVariable3* @\: MAPPINGVARIABLE^O̓eV[gɏo͂* 5: IN xmlattro XML_ATTR]nattr XML_ATTRF250D* : IN/OUT : gi MapVar Header : Mapping Variablepwb_̏o͍ς * tO (31) OUT : cella): o̓f[^z* : *Oi$* 1 fit : 20XX/XX/XX Akito Kobayashi* T*****************%]&]&]&]&]&]&]'](']@']X' z  z$!' z$!"'8   8'J  e 8'`  e 8'b $ e 8'd  e 8'  e 8$'  e 8$'k0v(v RA'Rku+^ J+^ ` b $+^ YESTRUE'8duFALSE'8kxuIsExp= 8, Initial Value= +^ YESMapping Parameter'*duMapping Variable'8kt *+^+^A$^+`$^+`$^+` +` +` `A |'i(t=*********2*********3*********4*********5******** *********7*** 27: DispTableAttr0* WHE TABLEATTRIBUTE^O̓eV[gɏo͂#* 31: IN : xmlattr 0 : XML_ATTRA251nattr ? XML_ATTRAC 5%B: IN trans_typ ? Transformation typeOUTcella: o̓f[^z3TableAttrHeader: Table Atrributepwb_̏o͍ς*75 (+1)ԋp: o͍sԍDE 20XX/XX/XX Akito Kobayaship'](]0(]H(]`(]x(](]('x'J' z  z$!' z$!"'8   8'J  e 8'k`qXq'~ B  JJJoin Condition,Join Type,Cache Directory,Joiner Data Cache Size,Joiner In $'( ElseIf fld_nam = "Sorted Input" Then J Sorted Input YESeYES'n'- ElseIf fid_nam = "Master Sort Order" Then nYES JMaster Sort Ordere'ko B e JFilter ConditionG'j B e JFLookup table name,Lookup condition,Lookup caching enabled,Lookup cache$ JHLookup Data Cache Size,Lookup Index Cache Size,Lookup policy on multiple$'  JLookup Sql Override JLookup Source Filtere:~0 ElseIf fld_nam = "Dynamic Lookup Cache" Then JDynamic Lookup Cache YESeYES'l'~P ElseIf fid_nam = "Insert Else Update" Or fld_nam = "Update Else Insert" Then lYES JInsert Else Update J Update Elsee'kPm B e B  B  B e' B e J Start Value J Increment By J End ValueG'j B e JPre SQL JPost SQL JUpdate OverrideG'j iDisp = 1 B  BSQLe J SQL_QueryG'j B e J Top/Bottom JNumber of RanksG'j disp = 1 B e J Sorted InputG'~j iDisp = 1 B e JSorter Cache Size JWork DirectoryG'j iDisp = 1 B e J Tracing LevelG'j iDisp = 1 B e'kPj ~ N A@+^+^ +^ "+^Aki+^+^ J+^ $+^A |'xk`i x'iPiG******************2*********3*******************5*********6*********7** * SaveGroup!* @\: GROUP^O̓eۑ: IN xmlattr 0 XML_ATTRAC51nattr XML_ATTRIC$B: IN/OUT : group_i o^(+1)OUT : group) XML_GROUPAC 50*ԋp: 0*HEFT 20XX/XX/XX Akito Kobayashi:***(]h)])])])])])])]*'x ( (( (& (* z  z$!' z$!"'8   8 (  e 8 B@&  e 8 (l  e 8 ((  e 8 (*k8f0f !* !*   !*+L  'ke x'ie/*******1*********2*********3******************* * : DispGroup*@\: ۑGROUP̓eV[gɏo͂ : IN til B: IN/OUTgroup_i: (0)group () XML GROUP7250group(i).order -1OUT: cella: o̓f[^zԋp: o͍sԍ#* Pest : 20XX/XX/XX Akito Kobayashi# *********0*]p*]*]*]*]*  +^+^ +^-- Expression --+^-- Port Type --+^+^-- Description --+^A' z  z$L' !* z 'A@^A@^+^ !+^ !&$+^ !l+^ !(+^A z$L(*  Gyjk bb |'x zA@Lka x'$iaD********1*********2*********3*******************5******* ********7*** 2: DispSource)* @\:SOURCE^O̓eV[gɏo͂": IN : xmlattro : XML_ATTRAC51natt XML ATTRACT*B: IN : folder_nam: |Wg̃tH_OUT: cella o̓f[^zbf grp_nam OO[v (-")ԋp;o͍sԍi!Mbit : 20XX/XX/XX Akito Kobayashi:*]+2DispSource: ii= |Ad   $'D   $' D+^ D+^SOURCE+^ F+^+^ +^'HAAFound source name= D type=SOURCEA< |'i^G******************2*********3*******************5*********6************* 27: DispSourceFld.* @\:SOURCEFIELD^O̓eV[gɏo͂* 5: IN : xmlattro XML_ATTR7251inatt ? XML_ATTRC** DB: IN : trans_typ : Transformation type*IN/OUT : bf_grp_nam : 016-77(trans typ Normalizer="GROUP"̒lݒ)OUT: cella o̓f[^z* ԋp:o͍sԍ!* Pent 20XX/XX/XX Akito Kobayashi******************+]X,]p,],],],],],]-]-]0-]H-]`-]x-]-]-]-]-]-].'` z  z$!' z$!"'8   8'J N e 8'` N e  8A@  e 8'  e  8A@:  e '  e *' F e 8' N e 8'  e 8' N e 8' N e 8' N e  8A@  e 8'kpZhZ+^ J+^ ` b d$+^+^ B  +^ +^ +^ G ( , )+^jdY '8 8 HGA@8j 'H 8+^ +^ +^k(YA |'iYG********l*********2*********3*********4*********5*********6*********7** 4. DispTarget&@\: TARGET^O̓eV[gɏo͂ * 31% IN xmlattr() XML ATTRAC51)nattr XML_ATTR 250+ B : INfolder_nam |Wg̃tHOUT cella o̓f[^zbf grp_nam OO[v (=)* ԋp;o͍sԍ Ent: 20XX/XX/XX Aki to Kobayashi* UW***** .].2DispTarget: ii= |Ad   $'   $' +^ .TGT+^TARGET+^ F+^+^ +^'HAAFound target name=  type=TARGETA< |'iUG******************2*********3*******************5*********6*********7*** : DispTargetFld/* @\: TARGETFIELD^O̓eV[gɏo͂ : IN xmlattro : XML_ATTR7251nattr: XML_ATTRAC 5084 : IN/OUT : bf_grp_nam: H-7%(="GROUP"̒lݒ)OUT: cella: o̓f[^zԋp;o͍sԍ Pent: 20XX/XX/XX Akito KobayashiW:.]/]/^/]/]/]0]0]00]H0]`0]x0]0'` z  z$!' z$!"'8   8'J  e 8'` N e 8'b  e 8'd  e 8 :(  e ' F e 8'kRR+^ J+^ `!b d$+^ '8 8 HG*'8j 'H 8+^ +^ +^A |'iRG******************2*********3*********4*********5*********6*********7*** 27: Dispinstance,* @\: INSTANCE^O̓eV[gɏo͂* 31 : IN xmlattro XML_ATTRA251nattr ? XML_ATTR725* : OUT cella o̓f[^ztrans_typ : Transformation type EMTA TRANSFORMATION_TYPE" OD ID) * & D:XOD#"* Menit 20XX/XX/XX Akito KobayashiW:0]P1]h1]1]1]1]1]1]1]2](2 z  z$!' z$!"'8   8'J  e *'  e 8'  e 8'`  e 8'TkXOPO 'B   J. TGT'@ .TGT'kO TYES 'kN *** INSTANCE+^ J+^ +^ +^ `+^ = T+^A |'"i8NC'*****************2*********3******** ****************6*********/**'* DispSpaceLine@\ so͂* IN count so͍sԍͤ count쐬:20XX/XX/XX Akito KobayashiXV:@2]2 z ALoLE*****************2*********3******** *********5*********6*********7*** : DispLine%'* @\: zf[^w񐔏o͂* : INnum: 擪񂩂̏o͗#őo͗(GC_JMAX)̂Ƃ́Ac̗̓NAO: IN : cella() zf[^IN/OUT : ii o͍sԍo͌A+1쐬:20XX/XX/XX Akito KobayashiXV2]3]03 z  z  z $^'  $'G' 'jkJ  | z+hd`J | z+hk@J8J | '|o JG********1*********2*********3*********4*********5*********6*********7*** :DispStrLine&*@\ ŏɁAws̋so͂,ɤwɃf[^o̗͂̓NAŌɤws̋so͂IN: num o͗ԍdat o̓f[^h1 ŏ̋st1 Ō̋sOOUT: cella() zf[^쐬:20XX/XX/XX Akito KobayashiXVH3]4 A z  z '  z +^ z e z +^dGyGkGG A AohG>*********2*********3*******************5*********6*********7**27 CheckEndAndClearLine7@\: o͍sԍȍ~ŋs5s܂ōsNA31% : IN/OUT: talB: OUT : cella : CT-: KOT5 ss5sڂfest 20XX/XX/XX Akito Kobayashi 4]`4]x4]4]4' z'  | $h 'yEkEE   ' Gyj | '|d@E'Ak EEoE<*****************3*********4*********5*********6*********7*** : mk_attr.* @\: 𐶐31: INfld_typ f[^^C$fld_typ "Ƃ́A"Ogfld_pre: xfld_scl f[^^CvAȉ̂ǂꂩ̂Ƥt+ZONE , UZONE, PACKED.UPACKED.DECIMAL.Number0ԋp f[^^Cv(x[])쐬 20XX/XX/XX Akito KobayashiXV:****4]`5]x5]5 ` `( b'* `('  `  $'dpB `'k`B),ZONE,UZONE,PACKED,UPACKED,DECIMAL,NUMBER, $ 8, '8kA *)'8dA'8kA 8'iAG******************2*********3*********4*********5*********6*********7*** 3 : xml_replace)* @\ XML񒆂XLMuɖ߂i%vbCrvbTabͤpXy[Xɂ* 31: IN : fld_exp: XMLu ==>̕ &apos SI) pXy[ ET (vbLf): pXy[><&ge:&le:ԋp: ɖ߂XML Erit: 20XX/XX/XX Akito Kobayashi5]6] 6]86 ^, ^'8 z > $<' #xA 8& . $~'8d(? 8& : z $<$~'8k>>d>'8k> 8'i>G******************2*********3*******************5*********6*********7**'* : CheckAI I Mapping Sheet/@\: ݂̃V[gȍ~ɂSẲ͑ΏۃV[$}bsOA}vExportt@C4͑ΏۃV[g: {m_icm/m_AACOMPImpltŎn܂V[g* 3: IN : Ȃ!* Pest 20XX/XX/XX Akito Kobayashi***P6]6]6]6]6]7]7AA$INDEX$.6XMLi[fBNg6 file_dir = "C:tmp#Repository\DEV\QuickWin Mapping"C:tmp'4 4in$'4 4G|jAp `!' '  ! $.t t!$( t! 'k;  tB@* Ak;k; t! G'j  t!$( tB@* 4Ak;k;;o;F******************2*********3*********4*********5*********6************ :get_sheet_0814?* @\ Active Booḱup[^ʁvV[gWorksheet擾* :IN :dummy : gp5O:OUT ws14 up[^ʁvV[gWorksheet쐬 20XX/XX/XX Akito Kobayashi* XV07WΉʶWΉʬ$.0p[^$.2o09G******* *********2 *********3*********4*********5*********6*********/**: Setkadai14;@\:up[^ʁvV[gɃp[^ݒ肷IN: nogpmax_coma: p[^zcommenta p[^z commenta (0)Typecommenta (0) Parameter Name commenta (0)DataTypecommenta(0) IsExpcommenta(0) Initial Value O: OUT: ws14up[^ʁvV[g WorksheetgObjType: ^Cv!gMappingName (}bsO)gMappingName: (72)"* Mit : 20XX/XX/XX Akito Kobayashi* :7]P8]p8]8]8]8]8]9] 9]89]P9 2G|j 2.t    G|j h'( (Worklet'dh5 '$kX5dP5 G|jWorkflow'(A@k5 h'('f v''$ v'''t v '  +  +$`+$`+'| z t | ( $  $'| |Gyj4 | '$ | t,h$` |  t,h$` |  t,h$` |  t,h$` |  t,h'$` |  t,h  |  t%h$f' '  | r t,h   e'    |  t,hkP2kH2 fG f | t t,hj   G  | t t,hjk1o1G********1*********2*********3*******************5*********6*********7*** : SrchKadai14B@\: up[^ʁvV[ǵu^CvvAuvA *(̑̕zɈvsT[`;ET[`Jnsȍ~Ɂu^CvvƁuvɈvs*ȂƂͤɒlj<ET[`Jnsȍ~ōŏɁu^CvvƁuvɈv *+sɂ‚Ĥ̑̕zr : IN WS)up[^ʁvV[gWorksheet *ii0 T[`Jnsobjo ^Cv namo max_jj ̑̕zjja 0 ̑̃Z̗ԍznama(): z ԋp: sԍ950: v u^CvvƁuvvȂ̃Z)Sċ󂩤̑̕z̑SĂv4<0:sv u^CvvƁuvv̍s쐬:20XX/XX/XX Akito Kobayashi* XV:  #*9]:];] ;]8;]P;]h;];];];];'| z  z t%h$f'( (Gyj z t%h$f'$ (  $  z'|y,k,, | $ z t,h  z t,h z'|d,' '   | $ t%h$f' G  'j  $G  ' j+    G z '|jk+ |'i+G********1*********2*********3*******************5*******************7** * : sort_0814B* @\:up[^ʁvV[gu^CvvƁuv*%Ƀ\[gB\[gΏۗ́AB?K31: IN/OUT : TL7O: INS;ws14 :up[^ʁvV[gWorksheetEnt20XX/XX/XX Akito Kobayashi#F;] <]8<]P<]h<]< W?? 0'| z 0 z$h$f' z 0%h$f'   Gyj | '|H)B+C+ |BAP  0Ak(p[^ 2 zA@z z z 2%h$f' z 2%h$f'   Gyj | '|0(B+C+ |BK  2Ak'o''Attribute VB_Name = "chk_mapping" Option Explicit Pub, Const gjWFI As Integejr5DM F6 FGC_JNO#MAX $7 ALOG_LEVEL "0 'DEBUGOUT 2OPT_INS _NAME1 'OƓƂ͏o͂ȂEXP_DISP:INPUT܂͎D#̂$#SESng \t<>=/?!+-""'rXML_R apos,#xDA,9,,gt,>,lt,<.ge,>=, le,<= $FI4LE-R-C:\tmp TAG_MLT MAPPLET A1 ING SRC@SOURCE TBGTARGOC ONKNECTORRL TRANSFORMATION _FLD  FIELD @6 C7 89 G#TANNBLATTLwTABLEIBUT[GR7GROUPs-@:VA <I! MFOLDELc ETA_EXCMDATAENS 5PRP_FR(FROMN(TO0.OR . '.D TO_T>Y.'@4b YP?BgvDRE~S'e !)3V8ALUBDTka7PRECIAm SCALlBVk NYaV@ DYQ TEMzPjEa)TRF &*TOJPOR21 DESXRIPPOR^<"OFbDEFAULT#;S KEY9ISdaDI_DD0_ArFfREF_SY_?0 _0 yP_@PݐPPggR$MgC_+PA8RAM D NU|LLkU!MBxASE!]R8EUS?ULEpNGTH3Osa3F!&Answ#treb#H!If  1 Then  a= @Jai1=0Box(!ڠ/t@C͐AS--`%H", vbPQuesb!+YesNoCanR'A aF vb, O =No-IfE== `!ׁ1WAh2f3&4&5&6&7*'* @\:IvVݒ!D@B-M : |[g`o͗DAdebugk'@S: IN >:@0@CheckC51: 2AXll t2ogSubv'ws: hq'(defa@ult=NoPsn*g,t -/07/rkito Kobayaship px_n9.s(- H6, /w=P)w A/{Q!Sa/unw3 iylevel75S' Is 4 &S6`= A ""cEnGets(`, "MD2`q'#&PR"1?E%`0 gi:= SCa%P@t Out("(: Ab p &Fé Else Iϟ P  d1o a ckAT I1 U }  ! * \reP b( @k=q(r/ #wIB"=^""]'R:<= LogLQ=(NO_DBGLOG, atol(-1)9sś `1]`**`**`:YwYdbuINDEXb1aɲb`Ă ̓VΏVc̃}bsOA}PPw`w(E1)Z:B  ƂAz  10jF F ЊJnq ( p3'ŏIS ɍXV a : {m_icm]m_AACOMPImplt)Ŏn$CppIN:Ȅ쐬`jXX/" AkmjQ pr4(=qb]{3ixabr֗V_ۻwRoIgnteger  Dim i_max As IQexedk*dat.String,1.p .0If MsgSJIS(1) < 0 Then Exit Sub$Call Che@ckMapplInitset_ name_b_to_chk(0) Set wsix = GetActiveWorksheet("INDEX"FIs Noth4F$x= ""1- Else'|[go̓p^̊ Trim(>.Cells(1, 4)K<M><>> Ji!oOptions(, "M", optHDG [giALL_OPT_EXP_DISP/C *BbP{tOFu@OdAlle: A[=" & &End Ifu!B4CAG C=vL5AfT~6VuLV= 10G&@ ̉#QCˆ1o@$$s$El@\Agi_@1"*3_SortWs[d'XMLi[fBNz file_dir)"" A DBGC_FILEmFRgr("Exp@bS2 ˀ+ $i_eCH-a$k%For Each4 S!s'@i >=s A1i d !a`ath3i($M[!! k &&-n!e_proc} 1?2( A-i1 Nex$Box k@"‚̉͂I`ȽB !BP '* **2*3&4$#&7** ༏ : '* @\: V!Ώۂꍇa'D̃}bsOA}Wt@C :IN@ d!B:`\#H_`(C1)ZAłȂƂ́Ag$A 󕶎!"C:\tmp"쐬: 20XX/" Akito Kob@ayashi* XV: \v0)vb(ByRef };!Gm>!yh`jq^n_Ph`S#(Kse3Ӡ+YH_cu(  5(A=0yy1y@2TQkKlph & "YrVSygi,|?wa=> F  n φΆQ0?Q4Hi! =!fh{rd\2r$( /{=(a1 2Zޏ ԏ@FlI'aW)2Dbcb$@/US_U56U27AdC'3URq^PUsL31: RtilGTE FE JJ* JPF:x/M'MLJ(4ЊFi@cro_l ib)log_9("Eb_conn_regist_errmsgarLogLevel(NO_DBGLOG, p_LEVEL G__RE1Split(@$, ",MAXUBound(})7yy|4421=C* ^1,SB1h"1SPD_1 qo QGRO UP:roup(i).ordea-LJU&U-'fACre pObjecpScring. FЯSystemje_0814 7!41v477^Dont7eBe72dwgɏo 'JgV[g(E1)ZɌݓݒINDEXname0OA̍snjȂΤlj`Ĥ$&:IN: l :exportt@C0pݖO̗gqKƂͤ^܂ruǂ`炩OW$Ȁg#*AI*"%"iCAU `B likeO쐬 : 20XX/ Akito Kobayashi/XV Private Sub CheckObjectDone(ByRefR As String) Dim wsixWor@ksheetkInteger Giipos12matchRH+sC's0t`Cells(1, 5) = Now Call DEBUGOUT("e=[" &F & "]"ESetE= GetA ctiveG("3B If@ IshX ThenC"Z!0GLP= In9(,x ", > 0C*= LeDft 0, - 1. @h= 3L00H c-= HFor k1 To 1aB-= .c)ii, 3 '""#Exit @ -ID=a-i-" filNe0aP.c 6a(2)&1 a~2`C%AM%%o AndA#2 e'.A2%1Else23 3a32 3q%?@!3 LR#0iP$ /IfKEpBO'y iNBc+ 0: eGqO@a )ԂzOptioP `J k'(default=NotX)uP_"D(.OB'1): ! {#5E 7 A LOW2 '#A S@ԋp: ^PR[@Z#*#*%C3R-1@WhiteBoxeЃXgq= -2PXMLwȂ#3J`( ̂ `fent2019/0P7/08q *8 TW$ HFunson_%et( _a>ByVxal !, Ɗa()~wsfadatGF!patmax_QrW :DE s oBQz'6/4S = Split(PC_WHITEBOX_NAME_PATYr = UBoun "`s+.2W'v^̗L;@ߚpPa 1A5ws,ϫ"@@@@" Or #<##MO ,R9d)stD1I 74CEG21QError!! <-EDIT.pegmXg !, 0) /*`3n(0, <(6w '%bpfBNgU!/.M7get__c8(4d XML  ;@Da(0 ! c `=Cf"h= 1("E",id`+" d@M9^e!1 `c'|[go2 ^Cfi4i<> dc)n GetOpsdM opto 0 ~giOPT_EXP_DISP#g P tOut(" t: S`K"QbsL ]sA`SWsNoth  SubcS8 p"73& "O##**7LLts. ׀ A|927kB'* kdkkk{p!'ȉQvJ<' A== Fr|ee1A(For IBZ)#@kCco _aTi "rl; $=""B= DBbHGa.a3.fE OFFDo Wh >&Aquat%C `aeAH, ׄC$(`.:I<=CQ (ds =<`s< 8B!xml_analize(,[ f  aeo ) MsgBox " ( errF =" &1& v bCrLf"  ='Ag& "\!67 >A@ge/?ikLo op@AClose `ׁ`nq"1ds.$BsNothavS̸ *2 5Έ/ 1 PˤāAȉĂ@Jn^@O f[^I\bi mm@PVH: i"i%3D0: .i`?0Ji2Ei3Xioi'aipIN/ i Bgʒu=030:"@̑O `)"@>"̌q1 g,A2"=1ŁATagNyBr=2Attr 53 sD9: @"2","1"@-PdBP̏qzQ vpSp:"7"Oɂ/,pT 1:Z:R9 𕔂DA[ ԋp ^#R[A0W: ̏Q -1 01sbO5 A+ɁA")0 ꂽ -P`g=hcP3-K@lȊOp0쐬:_XXV: Private FunonMB0@q}?2 b:a#(MAX_ATTR)s01SPH[@~ 1)ۏpnQ[ij_Ptag±Cw cOm . 3& f~"P.j6Sa̠pi < !nGetWord(, , GC_SEPPw` DEBUGGL(X100= tz: njnowd wdR"p " oQׁ 1yn 0?Cells(ii, j)` "wǓj +%t; / >)Orr30 (01 A0uR 2),q1c-X{}{q8yElse@ > B = 9 <1&O B !_fD1(D3,EQ@.xB@jP6RciQ,@jh>妳%2']`@pt) ret = xml_func3(tag_nam,Hattr, 0, omodevB0 Elseista_dat20ssp.sp#Y""j2 E`nd If ~If 03 Then !Cells(ii, j)H"call >ij + 1#1Rj > X6 Ab#0V 717k")-A?Exit DoË3Sdisp?!3}4 P]@}wd"<"PA&>LD>2D > CSl & Mid(@line, . - 1 1 YCl2UQD5pZc 4!c X, 1h.h=" & c.j g:@>"/UE4= rt 3$Wb ?" Or B!G-?{=-900v : Kq1eDwd? M;d Print <y`!(i). Á+$ H:+ QJC `" $ 4 +KK554Ð5!valu!ioD/9u4Z/Q ONsm i }ImmLoot[Pv`Sb&@ Trim(`2)8O= T`_analiz FPtio0 '*Q | *u**3h567**a :header@\: wb_o͂ IN :Q6̎  :ance Forma 'trans_ty,"N r'C513REF_SOURCE FIELD: C1EXPRESSXION =t: Conneca%3D2: SourcxTarget 3`  i04: g'= 5: Mapping Variabl'* Oܔ: T @^CvpOUT: ca'Af[^zExpHp1ς݃tO030 a=1:gidCY, 80bf_ipQS()1sO̐ڑ ̰X0Ppx (0) From1) TP쐬: 20XX/" Akito Kob ayash* XV avate Sub *@(ByVal( As IntegerD6(4"aF#5/6)>&M> = c aGC_PRP_NAME2DTTYPPI3@STR_NORMLZOVc&(3-& dp5SRC`fQc _P7<PRT_ --DEFAU,s !'Exit uc@FOLDER\flolPm;=b?_aval(&.nuB @ 0|Ka FxG_TRN $<A1cRC%qv; h2cQF(,.C_q! _@ UF"?qfU b rc j"D ress(' Ut1_ T BLi W  %STR_JOIN )2FILTSQA qOLOOKSOR;E/< TGTDEFWR>fK_AGG? AMGg/ AEXEU`PDATERQJLEI'YINPUT Va? `R?1NzLZ;q t,ispTableAttr(xml"a8, n0)  End IfLElseIf tag_nam = GC_TAG_GRP Th en zRrans_typVSTR_ROUTER.wret)Sav@eGroup.9SRC_FLDf<> "" AxtZNORMLZZDSou@rceFldCMpAPVA8MappingVari;MET`A_EXTGoCUSTOM Or I"SOL"G1op1L1ѦCON%CPCheckConne`ctSubXOU 29` TGQWA ApTargetNmT6 BLATTqOzDEF-z#ݎ/3/_$cvX?tڊsK"di Ku"4"_INSz"lnstanceRAyHeader0?TJ\J\n (h_func1 AF@tio@ '* *12&V3&5F6&7** '* : %2@\ ^Õf[^(݂ͤȂf' INN` d|at@= 0`T!nforma3 '= 1`wPb 2I3*4: It" me@ԋp@: ɠ 'te nit 20XX/" Akito Koba yashiXV PrivaE'(ByReAs StrYo, 0 JVal a@Integer)Call DEBUGL(100(, "6:Ս=" &" 2!& "QKF0#'#**#&4!#**#: 0XML *"{!#IC#@eV#gɏo͂`Z" :f"P o_A_AC 502F3a?0 $$. i$1 $2 u$3 ?$F5$a%N/&љ:<~ PD)X ew1Z: ce8llaC4z0 | s.sԍB`* Pe/:'?/8/.mlG3( _T//"/e/4(-!r!0G0?@(1+2]Dim !V]q0p8c _5X53R5߁3JQ4 tb3 ?5&oG_Ͱ 1ML͗ = "# EN~D<> ntOut(04>!(0)`> &ALine(1YhgiD1s O3@iQq1Ex Tg"joefTRNG/_Я4w1YO"kC%վQ7C@B S&aWbN2o, 1 5to h = 3 Then If tag_nam = GC_TAG_SRC And @sourcel<0> "" ce@lla(0)x"'*** END"DCall DispLine(1) ret;lii y=xEIf xml_func3LRP Ftio  Z23 5 67**%'* 8get_attrval/ @\: XML_ATTRz ́ɑl31 IN: Atrribputez6o-AC51 n  T & D : 8%ȂƂͤ * PE Fit: 20XX/ Akito Kobayashf'ar Private TM@(ByRe f A$As String, Cq1() IVal C2Intpeger {Dim iJF_ cFor = 0 To-E$i).@e/  9ue# Exxit !GENhext ƜǦ4צ2: Check Connect Sub@zæCONNECTOR^O̓eV[gɏo͂`ڑPortËvx肵E-(OK`{'ǂ炩̖1̐tO` - T-* 7*< -jNG: 6-1##A } -1767.-**@75]* 31:f`]0c62c EMACTUL"BB/OUTbf_ins!Ve EOsIn@stanceFmŀ:' : bi$f@&^!|ԋp: AsԍMERj.j66ߠ6$jLffnfišjrflda$}S{[" #(dat n12@lllenW wWcQresa1 =2 saoO+ݘ(=a(Dc&1zpP4PRP_FR_FLD~ @ !1~CqWElseTO! $= sr@ INS ;  1 O__TYP_   QSTR_TGTDEF KS@l"= `& ".pؓb `~11Q6ixNp" ( OPT NAMEy&H 0tУ }"   + pQ% i@t!m2J0t3iL/Rep lace(, "-"@_"Df241)2ILen( Ten{D2TQ#UCaseղpOvBN- = 1Lc ight2,P3Hc >@0"Bc <9o q! Lef t)! 1,8r  = R 1 } " ̄  i,!Q AC pUr02ktNGHf= cmp_str_par,qTd !lM6W;s= -o @ l,2u&1Qj~2`snan>ϑe2 qBl@Aki}3wPW~2+ )XY"B/ &Q%X"3" "P? {)oq dat = " (OK)" &H(W2 a ElseTBIf resal(P0) >2T8hen`hw1!l;End IfWNG? cella(4)-giConnectHeader 0 Call h (1)E DispLine(5 "LefDt(+, 30" b ERROROUT(1, "Unmatch c@ port.}ins_namj@},1). (fld D";)EBUGL(50@Check ;Sub: ii=iDBBii AFunctio '*1*Z2F3F56F7**7: " RMap@@\: MAPPING^O̓eV[gɏ o͂@ 31 : IN taNg> xmlattro XML_ATTRAC 50nHTBA/@G@Htra\ TAflore: `'folA@: |Wg̃tH~3@*f-^zgi 9Var Ę@ping iablepwb_0ς@ O (-03'gdName a(ObjTy.p Z  =%Aԋp;B s DEL20XX/B Akito Kobayash`@Priv0ate @E7(ByRef1As Str , D28() @2Val5IntegerADim> i Co pSp8acepes8= A_get_?vGC_PRP_`NAME,,/!`# STARTAc&Lh !ntOu}Da`  f#@|=E*2!cQ&3DgiEKg H _G t{߂#͂* 2 Bq S* tyNSFORMATION S25H' sw` Bʄ:9tyALrdUT(: pjb f_grp; OOpDv (=""'Exp3p ceFJOD0DDEO?: ?Ment??? ?T>o!;O>L>A?S'>retp@opiposp=IG\1YFCC`vdesc?m reuse = phMIaITYPEI 7" sh"SC`_OO)v(4S tZ' i@o]- BYqW(i).05B:uLl]Lg11!I STR_CUSTOMOBA)bjP_TEMPLATEk:`!<> ""ia2= In/"> 1Fm> FE%_@~DESCBP: <= O&REUSABLEid_c?wAYES?rCCpa"?+?;1 %"ֽNelxtx"y& #@7op3 )҅03Ԙ o# c56upXDy0icLookupCache SedInpu257/3sC$AN LZ%" n= 3 < Else 0opt = 0End If_se)REFSRC3_EFFLDfid -1 .F ?: !Bq/ @ bGuo9 Db@2Uc8?3`E{~nDESo 2BX _MPLT_G>RE[Ne xt 5z= In t(t8, "INPUT"48 > XRu=Y(giOPT_#@DISP AP&H1) 0 ThenC F1PElseGcMid(, 1CDD(c >I0" And c <9") OrS-"+" !"AForS= 1 To Len%H$J-iK-IX/A 6Z6_0, ZExit 8'_&`+IfNe4xt'E(e !b ffQ c5FM: Di@spMappiV@ariablE'* : MAPPINGhIAB@LE^OÍVgɏo͂ 5 xmlattro XML@_ATTR]nA&F25!* @IN/OUTg i  HeaXder@$ Epwb_ς O (31G' cellaI: af^z: *O1 f@5!F)ЕP*d#e#, ByVal #DϚw!namAde@ L typid_preU sclbvarcupar1valEro(- dn" =eR(i). (" ; udGC_PRP_NAME0)A !nDTTYq[3%= _^PRECISIONrrse! $ SCAL? BOE1GDEFLTB (ltO N ISEXPq{%r1>10ISPARAM )/R%XZ giKK@Call hL(>5H z_L(0)`"#1!&s&s2qmk_wVR=, slciT f0>"YES}pD-r^ 3 "IsExp=R&itiO0Pue "KC Xld_8 2l q cPFeterO PE e 4 Pl3 C5B 4_Line(6TcommentacDlQ&v22=B?FR r SetKadai14(2, 5, k$/leir_'M&q2**V ft 27TAv WH Ia!IBUTvб:6A25P6'v?gC 5Btrans"_1q? TformaR@Paх7pυ'F CA:  Atrribute?!75 (+⋕ԋp: 2sԍDEԈN!(ϱwt!reb4&qORQ8Q)r_K6a   `YET; ;  If nam1 = GC_PRP_NAME Then 0fld_val1lElsepVALU|nd IfTNexBt disp*0 dtrans_ tySTR_JOINER *icmp_mstr(, "Join Condi tion,Type,Cache Directory er Data Size In ")KiDY'@"Sortexnput""A%"YES 90I0TTiEz"MastBA OrderT+ *P%EFFILT㑁]Fil22 BLOOKUPLkTLookup tablete,DcFing en d ADOr _ oѶIndexpolicy on multpiple?[Gd%fEQ<> "">enAO$ Sql Override" `I (3Eource 4o!$kDy@Nic xVmaTd= ngnInsert + Updat%#43 iw΁ATAGDEFk3J|SQAGAM"GoEC_ MApPLET w~SEQL`~FSta!5Valu4Increment Bym^\ߐ%GT%-KPre SQLMPost9 lO_CUSTOM"B 7DQL_QuerO /_RA NKohTop/@BottommNumb0nof Ranks4;_*%AGG)# A!r_SOnRo|r`MWork?A&/ 3_t3EXr*TracoLevel?OF''>UPDATͧH_TQyAttrHea 0L V< he$j1ce lla(0a""K/1 S2 mea(3wuCallspLine(4) 6n ( - xml_replace€ ( 1rety0iiC w=B  !Func'*23**5667** '* SaveGroup@\: GROUP^O̓eۑ0: IN a@# 0 XML_A@TTRAC5 !'nbEIC@B/OUT : g_i o^(+1')RAC 5' ԋp:UHEFT 20XX/" Akito Kob ayash':@sPriv@ UW(ByRef () As >,0nlqIntegerBCDim~i_=j_P'Str`D'mr1m Pxgrp!SS*Q.a:,5>!2desc=extpr=o@For i Tod- hE1&x(i)  =fB˶ If nam1 = GC_PRP_NAME Then Axgrp.e!val1tElDseEXPexpr PRT_TYFtyp$DESCdeschORDER# order#ndÀNext>= 0 A <= 10 5@group()6)ӂ_i )+ EDSaveG&re$ Functio@} '*1**2F3FA : DispB@\: ۑGROUP̓eV[gɏ o͂ : IN tilB/OUT2@: (0)E (XMLB B7250(i).V-@?'!cella: Af@^z@ ԋp: sԍ* Pest420XX/ Akito Kobayashi@ #A EA Private ERC() As I@ntegerlDXim @_iRjRB_B؁StringC@U >O}B%s@-C""K1N23-- E~essQL -- 4P`ort T!{5+6D`yripX Call1Line(7@G!aj GFor hoo MAXI*e".= (`M'p{Oi tAe"- ]aD1(EB(34?"K!6xml_replace8  "54.$|<= a|0j ં!0Pit ; t= i`}aB CD O 柀J@ 7*+_5 *7$** 2So0urce"BSOURCE^O`: ``attroN!DA@TTRAC5SnpP SXY(folo_ ?: |Wg̃tH_W)Wbf 4p OOPYv (-"P&'Y&;~YQWMb: ;YY:X?(BpyRefY, ByVal0PST[\\s_0/CV,EBUGpL(50, ""3:`%=" &`D5 #7get_p\(, ,C +=__DATABASEPEo@0"U g /@v$Hs(Z3G#cbEc@ bf_`B#=6 eh[C5Rhe2a`*(29`zntOut("Foup3me4q&e= dWA>U;p/b*u>**6iP4* 27>FldR>FIELD??2?* 5"(?5/ГG?5A? ? C DBtran"s.: Tfoxrmava0IN@B: 01P6-77(R  NlizA'="R"̒lݒ@ID4* B:O@ntB)T CCFidCsCSCC0u_flgxFs._Q_QfldB1Pٞidb QpreKsclmR@8@keyleve? occursoɣnuGbl lengthoffsetxphyр_D1m"}?a7NA:r -q2r_c!?`1ueM If nam1 = GC_PRP_NAME Then0fld_val1lElselDTTYPtyp#PREC ISIONid0 preHSCDALsci#"GROUP griDFLD_h6_i$KEFY$key$l$=|LEVELaT$leveu|O`CCURS#o ccurs#ZNUPLLABliu`llabl~HL ENGTHT%le0ngthX%OFFSET7ffsDet#PHY%phy L&&o'nd If!CNext#ce+(0)""I^1A@T2mk_attr(9 O, tsctl)I6A t`rans_#VRSTR_NORMLZ-c3f@A`` a4NW5CRad%<> "" B& "(" &H@,E.)k -ǀDbf_ bݡ =bC%&%Å YF%nuCnEFCall DispLine(7<SourceFlJdi F@unctio` ( '*l*2U&3&4&5&6&7** 4. TargeX'@\: TARGET^O̓eV[gɏ o͂A 31% IN xmlW) XML ATTRAC51Y'n_ 250+ B :@folder3|Wg̃tHOUT%CH f ^z@bf!B@OO`v (=* ԋp;!sԍEnt: 20XX/B Aki to Kobayash`-'* UW $ Private /h%@(ByRefAs, ByVal= Int`eger)!Dpim t2<S tring !S"EBUGL(`50, "1": ii=2ii`q<㆐_PE@,(Tka, ,C DRDATAB~A]poґC0P ? g  P@.TGTS"(S$yR;EC:O@{95Rhea*(29"ntOut("Fou=3@me4 e= d>>b)B>**>**>*7@F. Y?FIELD? ?;A72&5@?: 61ACP 5084I$N/=: ': H-7%(@="b"̒lt'P02:g_A_?Q?Peo?\?W:>>`>>N>G?)>expg{@@i_PWfPzA%Cp&d__p_mq?pmQ21mz} = For 0 ToV-Q0La(i).e}p7u4S̕ !Wޘ_!0 _߈_T=_ރ1!O8 _F.HC $&z'ٿk) 8 =@ "" cella(1) = fld_na m 2\mk_attr(|typB.pre,`scl)bval1grp&If 1,bf_* Then,"*C3KX4key 5nubleCall DispLine(6]TargetFldaii End Fu@nction'*234 567** '* 27:CinstancO @\: INSTANCE^O̓eV[gɏo͂!31  xmlo XML_ATTRA(251n ? 725: O(UT P fA^zt`rans_@STAforma@ )EMTA NSFORMATION_TYPE" OD IDT2& D:XOD#Menit 20XX/ Akito Kob ayash@['W: Priva te] H(ByRef:() As6, ByVal <Integer Dim exp_flgiRjRˁStringρP"rfBXreuseQ lcFor i^0 To'- @G!a azL(i). `@rw udGC_PRP_NAME" e)=!gElsenTRFt+``l_ aWX 8 A`9ypH+2REUSABL5$#? IfNext#x"`@*BT P= 3STR_@TGTDEFfi 4& ". `d8 #/g"YES"m`:" "| &di 0"Dh ce)c_F;!=B 7lD0ӡ] !J'i/"i' *"WSp8acer[!i sg count sQsԍͤk쐬:O`H`XVx`Sub0`a^SS[V|mLg1{)EN1AN[0S4@7OO*G**r: D1xxw|PanuК': 񂩂aő(`(JMAX)̂@́AP c̓`NA`O҅:w IN/Q: ii QA+1/$G!tm__{q~datpC 4 Ii <= a"=i r"1!<>е|L(Left(p, `H'CO = "&9NCs(ii, iN7e_d=+70D1&E0**Y**0:Str0*RGŏ`ɁA0!F2qH%4Ȃɤ2Ʌ3PZ-`)xŌ2J5IN:  LSh1  R t}'BH42P4^`Q1(1A @Q h4EtI-45%Sc(hz64(?6,qu5o0 r:<6Z:q󨊯1Ex G 1? BIP D(tO322f4cc27 Check AndClea 32:lXȍ~"35s܂ōsNڷA '31% : IN/OUT: talB: hX cellaCT-X: KOT5 ss̀5sڂ2fest 20XX/ Akito Kobayashi Private Sub CheckEndAndClearLine()  Dim i As Intehgerjcnt.J= 0For6= 1 To 100 Djj  6 If Cs(ii, j) <> "" Then+j Exit 2# If Next;S5s8+ 1W>= 5 ii@@ElseKJJCall DispSpace=x1Dx54 S@ * 3U4F5F6F7** mk_attr.@\: 𐶐31fld_typ f[^@C "́A" OgD pre: @xscl GvA@̂ǀ AE t+ZON E , U, PACKED.UDECIMAL .NumbA'ԋp>hv([ ]5'z'XV:a/{Function D/()@zString, A`#tFid_A#)MvJFd 1qposʉ#gv =aA& "(" & =@,\ !> 0sf= LeftG- dlD'chIn",WBcCCB,DC,DC,NUMBER",UCaseEP1))  @"1!ascmzl@'")d "ndƝ?HdKӄ*2/&?C%3xml_repl@[B ! XMLㅒXLMuɖ߂` 'vbCrvbTabͤpXyXb* (exp: E ==>M &aaCS>IrG @ET (vbLfr><`&gea&lA: 6Eri|t:?|a| $` 8<`~< da{,Bs._1p/dwP&+? !Q}an@:o MAX__REP 8 Step 2 = G=u(Ym#"#xA?! 4R&v(! 8&85.94#Swq$6&:7 i })"CSDK; ) _;Ra_;B8_;9S~**S; '*04ҤAI I Mapp # S(heeP' ݂̃V 8`gȍ~`8{SẲ`͑Ώ/}bsOAvExportt@C`Yg: {m_icm/m_AACOMPImpltŎn܂s`?CA0 ȂP[{'@SA\llrwnWporks#3wxsix8϶`m k.i_exen4cp'(kgd@ isCwsBo {`@ ρ 1  Gq!&e!RP g'2ubUn=4  S q/BBcSng&)End If   Next LSub(T'*2"3456** '* :get_she!0814@\ Active Booḱup[^ʁvVgWo$rkDA@L:IN :dummy : @gpO:OUT `ws14 $0쐬 20XX/ Akito Kobayashi* XV Priva(te s(Optional ByVNAs Integer)#SetO08 = input_name("WΉ", 0 "('w= GetFO("YR s2e/ 8kadaiB~:b(ݒ{ {IN@`: nozmax_co ma: z ment&aN(0Q'TypeL Parcter N 0Data  I8sExAEnilti@@uB @:t!gObj: ^CvMappi ng!"(}bs(Oagh: (72* Mlit`i`:K`=KE=(^no G^,@aRef E5P$)StrZxDim#Hi$k#ijjIgjja(2 dat! 'vob I IfAH Noth! Then Ex3S c;`/#="0= 1 A`gSess@A= ""b ?# O.let !AQ* C"$ Mg Elseea, ?(+! flow5$" "ei l" j0GC_JNOgjW(kF1`5gjkw6j@ - 1dX0)+I1F2aJ= JF1t9@6= -For i1 Tpo 20ARSrchAws, -ii, , , 2, 6aP>= 0/xdws.Cells (4A"'" &5w(hj Bh0 + 3zVqw 63 c 5q 4/Dw!M= Trim(:'FD)D1>I' ;_4U Q;AHInQ(, ! 3 & vbLf DAϩ> =<>UX?': G qTa Cq8-(i DIiSrchK@adai14 i @x Function '*1*2F3&5p7**! : sort _0814@\:up[^ʁvVgu^Cvv`Ł Ƀ\BcΏ́AB?K 31: IN/OUTTL OaS;ws WorksheeZ'En@t20XX/B Akito Ko@bayash('#F Private Sub(0«Q KҎ2ёkeya(1 'Wp??+C@PNot ws08 Is `hMwAgA6/"f08, 3d2OD08A=e1k!]"= mϑbh"%0q!"B"( C!Call9range_coln(6,m, `AP",  ,B+0 o '^2R2"H3'-144&d+P2i0Mb1_EsKk14lO:AO rU~|       !"#$%&'()rU  (`y0` y$`(`0$!`(I`108q` y py$`(`0, `y0, `y0(9 `y(a `y@ `)Ay0t0` y00@`)Ay0t<` Y)A0t4)`)At<Q` )A0t4y`yA44`)At(`04 `yA441`)At4Y`)At$`4`)At4`)At4`)At4!`)At4I`)At(q`( `8!`0$"`0#` !9000(9$`0$a%`(&`a4'` Qq&pP(`y00fp$)`I2y2nTr[ZV=#-?@@ Fd!DǐtxME Sheet4"aSheet5Sheet6!% Sheet7(SLSS<N0{00020820-0000-0000-C000-000000000046}(%Hh % %8p@malxAttribute VB_Name = "She@et4" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2GZV#x     !"#$%&'()*+,./0123456789:;<>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnoprstuvwxyz{|}~ME (SLSS<N0{00020820-0000-0000-C000-000000000046}`(%H80H@PmalxAttribute VB_Name = "She@et5" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2GZV8#xME (SLSS<N0{00020820-0000-0000-C000-000000000046}`(%H80H@PmalxAttribute VB_Name = "She@et6" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2GZV#xME (SLSS<N0{00020820-0000-0000-C000-000000000046}`(%H80H@PmalxAttribute VB_Name = "She@et7" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2GZVo#xM_BX (ӲSheet8#)-Mzz_init_macro_lib&= _VBA_PROJECTZ(I@hmal5n P@X"   (8HXhx       @ `   ( 2  "( P ,p ( &   B  (08 @ H PXp(&$,&0(X&,::       !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIKLMNOPQRzUVWXYb[\]^_`aTcdefghijklmnopqrstuvwx{}~$,(/, ZVxME <<<<4<<<<<<<< <$<(<,<0<4<8p)PxHP@*x@ \t\n\r"'()+-*/=<>!%,%2P @XzPh 0p8&*(,eh @X  H PX@%8 e4 Pe@%,X@:H@@ pD246H:X @%BJ@3<=,33,=<,33,>=,34,=>,34,<>36,><,36,!=36,||,61,--,990+0`@775iV `xx`zv`|t`r ul(%+`T@pli `xx`zv+`**i )@A%`x`L`z`N+R`@IIi )(A %`zx`v`t`r`l`Th+Vx`v@ i  )@A %`Xx`xHv+Z `v,,i `\x`v ^h `- :` %+H `X@ ?i  :!( @% ` @% b @% d8@ @% (` @ %`& f e `x`zH ` `h`j`D( `Fh `l`. `n`p`r`t `v0 `x`z  | h eP `$ +8@ `,@ ))6i'  ): A%`(t`r+ `  _i ) A%`x`+F `p8 ni. `v`0p+Ph ` |):A% < % :H% h% %` f`x`.```,```6`0`2`4 >`N``+ ` (( )< @%i6)R08A%)>p X T%`z`V`x``d+h `P 3)pxA%i`ib)< @%i`x`d`f+@`O)< @%i6)R08A%)>p X T%`z`x``d  2 (H(B,@.@0@4( @6@ @(h$ @&@8 @$\p @>x @< @"0 @8@6 @>@@H@HH@&( Hhh00 $ xhP0H@ X0@ h(PPx (h hC(,1,),2,*,21,/,22,%,23,+,24,-,25,AND,51,OR,52,NOT,18,<,31,>,32,=,35 xhP0H@ X0@ h(PPx (h hx( " # #%& ((8 P(` x) ),-4p``8 xzXp J"(,&8(l @j  0h x @d @` @\  Z  X   V ( 8 T P  H p 8 x   ` !"!z(!"8BRd& @ @ @ @ @ @ 8!FZ2( @ @ @ @ "x @h "X !$^x`H##$#z#$$0,$X $H @8 P$( @  @ $%$/ $%$+%(B% %./ 0%.3 `%%&%Hz&&&&0z& (  '''z'zp` @(P @@ (0 , Xp8)P)0)Hx@)'Ph  @(h   ,H    0,HH  x  (E     42:@xP9  B  2*     ( ,H@  p x *A   *4     ( B  0 8 @ H P X `  p  8         ( @  H  h x          . ( "8 B`  8     B ( 0 8 @ H P X ` h p      . ,"   P` hx $    (2 (08HP 6Xx     0H` h px       0@ X`h px  B      B     ( 8 H P ` h x             ( 0 @ H X ` px   "      (8HXh x B  (08@HX  ` p         ( 0 @ HPX `h p     HS ( 0@ H XF@h   (8H $XR 08 @PX `px &  dpx $(       ( 0 8Hh p x   Ts  @` hx    ) ( 8H P `*6p    08 *@ (p ( * ( * *H x ( ( * ( @  ` p x             ! !(!@!P!`!p! !! !! !!$! "" "("8" P"`"h"p" x" """"" """# # #0#H#X# h#x#### # &## ## $ $($ ,0$ *`$ ($ ($ &$ (% 0% P%&`%%% %(2%% %%% % B %%&  & &!(& @&P&";X& &,"&(6& && ' ''  ' ('$8' P' X' h' p'' '' "' *' ' ( ( 0(@( H( X( `( B  h(p(x( ( ( (( (((( ( B )))  )()@)P)X)`)h) p) B  x)))))))))))))))****(*0*8* @*H*P*X*h*p*x**** **D* ++ + 0+ @+ P+ `+p+ + + + ++*+*+  , (, 0, 8, H, "X,, , , , , ,,,- - (-0- H- P- p- -8- - "- .  . 2@. $x. &.4. / / 8/ H/ h/x// / /*/ / (/ 0 00@0 X0 h0 000 0 0*0 "0 : 1 `1p1 x1 11 1 1 1 1 111 2 2 2(20282H2X2 h2 p22 22 2 2 *2,2 (383@3 H3 X3 B  `3h3p3x3333 333 333234 (4 84 H46`44$4 44 4,4 505 85@5 H5 h5x55555 5 B<" 5556 86@6H6 P6`6x6 666 66 66 7&7 87@7H7P7`7 h7 B4 p777777 &777 7884 8 X8 x8 8 8 8 88 8 888909@9 H9 `9h9x]C(,1,),2,*,21,/,22,%,23,+,24,-,25,AND,51,OR,52,NOT,18,<,31,>,32,=,35]3<=,33,=<,33,>=,34,=>,34,<>36,><,36,!=36,||,61,--,99(] \t\n\r"'()+-*/=<>!%,]P] (]P]x]]] ]] d] @] h] ] d] d] ] 0] ] X]  ] H] ]]]  Sub test_MC() Dim infoW As INFOPARM Dim ret As Integer Dim i As Integer Dim dat As String Call log_init("")" ret = LogLevel(NO_DBGLOG, 210)+ dat = LogFileName(NO_ERRLOG, DEBUG_LOG) ret = MC_init(0) If ret < 0 Then Exit Sub For i = 1 To 10% dat = conv_mline(Cells(i, 1))! If dat = "" Then Exit For ret = MC_exp(dat, infoW) NextEnd SubP]]]]]'x V'@'000%$8'z001 E %A@8002 E %: unmatch %(%) % %(%)A@8003 E %: invalid %(%) %(%)A@8004 E %: invalid nparm=%A@8005 E %: invalid attr=% val=[%]A@8006 E %: unmatch %(%) %(%)A@8012 W %: unmatch %(%) % %(%)A@8016 W %: unmatch %(%) %(%)A@8101 E SYNTAX ERROR!! % word=[%]A@8 &,$'* (,$', *'. ,'09 Set ws = get_sheet_input_name("", "BX", 10, "")BX$D.t t'xdX z  z  t%h z +2 z  z  t%h z +4x'|  z z  t%h |+6 | '|.<,31,>,32,<=,33,>=,34,=35,<>.36,LIKE,37,IN,38">=,<=,>,<,<>,=,NOT LIKE,NOT IN,$'H : $F'x 6 $4'z x'i@0]]dMC_exp_compile: line=[ ]Ad $H'x$J z " obj[ z]= z$(Ad z , da z]= z$&Ad0 z 8 obj[ z]= z$$AXk x'i]H]`]x]'N $'x x $P'xd$MC_exp: ret = MC_ex_obj (infoW) ret= xAd x eret= xAd x'Nkd Error exp=[ lAkdMC_exp: infoW= AX N z " $('L L L& N 'Ny(k ( If cont > 0 Then cont = cont + 2dMC_exp: hikaku cont= NAd For i = 0 To ida - 1; If UCase(da(i)) = "ISNULL" Then cont = cont + 2 Next2Call DEBUGOUTL(100, "MC_exp: ISNULL cont=" & cont)k xG N'xj x'i]0]H]`]x]]c' 'R  $'  Gzj' !$' %L'  AND OR NOT  IN LIKEe IN&' LIKEe%'kp ORDER GROUPe'd0''  ' e !$$G 'jkk ,eb'd  !$'T z 0  T z$, z $,' ! (ykk  z .   z$* z $*'yk G'jkX  IN'B Be    '  B 'B e B 'B BG'Bjkkd'Bkx 'Rih]H]` !'X $R'x X ( x'Vix]] '\ \ ' \(e \ \' \e' \e' \e' \e' \e' \"e'd 'k d \3 ' \4e ' \=e' \be ' \de'dx 'kh k` 'ZiP  ]H [ "+( " '" , "+( " '" :(d :(L :(\ :(V ,+& , ', : 8+ 8 '8ox h ] ] ] ]( ]H ]h ]d ] ] ] ] ] ]0 ]H ]` ]x ] ] ] ] ] ] ] ]d8 ]p 'H d( d(L1 d(\ d(d d(V b( b(L1 b(\ b(d n b(V (','+f'"'8''p'B'x pb'r rb 'h'r $R' !'zMC_compile: word=[ z] atr=  sp= Ad  z ce' 'e hd No operetor. [ , $&][ z]Az@k8 $V'j j>'d 'kk   p  z ,+& , ',  , '   e h h h h h h  h h h h 'rd 'kk >e' z ,+& , ',  , '  h he'k  b  h  hb Invalid operetor. [ h$F]( h) [ z]( )AkxkphMC_compile: atr= Ad'r $Z'F rb x 'x x loop over!Azk'r  esp<1| zAzk  $f'. .$Z'D D F$2'nMC_compile: mc= . ac= n i1= D i2= FAd n eac<0| zAline= Az nce n "+( " '" "+('Hz@ ne't    'lF :( :(L l$&$ :(\ :(d :(Vd   'l l$&$$G'tj e  'l'td(  'lk t l$& :$8'xd : l$&A~kk$ If conv_flg = 1 Then! obj(iob) = 91! iob = iob + 1# obj(iob) = idai! iob = iob + 1$ obj(iobo) = info# iob0 = iob0 + 1 Else! obj(iob) = 92! iob = iob + 1# obj(iob) = idai! iob = iob + 1 End If t['vdx\'vkh v "+( " '" l "+( " '" l'8 : 8+$ 8 '8 ne  +f  '  [ "+( " '" , "+( " '" z d(\ z ,+& ,'8 , ',  d 8+$ 8 $$!\  +| e b 8+$k 8 '8 $V'j jbA^kk ne  e ac=3 : sp<11 zAz0k(  ' $f "+( " '"'r ne  ' . . . "+( " '" . 'dp'k` Else atr = attr0k ne $V'j jbA^k% nam = stk_str(sp - 1)# If nam = "IIF" Then! obj(iob) = 98! iob = iob + 1 obj(iob) = 0! iob = iob + 1 End If ne b h hbA^k`dXeac= n| zAz(k i ] ]( :( :(V $'( (''   $ :(\ :(d (. (0 (9e - / ' .e' :(Vd'    $z :(dd  :(dk :(Vkp  :(\dX If giOption > 0 Then$ atr = get_port_type(dat) Else' End If  :(\k  :(L'8i@ ] ]  $8'x x !L'  'xkk x'i ]X]p .'  d  $6'0d'0k 0'Fi]d]0]P]p]]d]]]](]@]X]p]]]]]d] ]8]P'N''+f''','''6  " b $('.nMC_ex_obj: ib=  mc= . irs= 6Ad .' .$F'0  ' .c 6 'x 6e 6 $<'d` AkH x N'x  G x    'xj  G x    'xjk x'Pz .be  ' ElseIf mc = 91 Then .[ .\e $(',  ' $$': ,$&'2 .[ ,$$' :! 2 :$8'xkd 2 :$8'xk ib0 = ib0 + 1 : 6+<  6+>c_ex_obj: irs= 6 info= :$XA@ 6 '6 ElseIf mc = 92 Then ida = obj(ib) ib = ib + 1, ret = MC_conv_arg(da(ida), info) pmstk(irs) = info dastk(irs) = da(ida)MC_ex_obj: irs= 6 info= :AX irs = irs + 1 .e{ 6 '6 < 6  >$@'6 6 6'xxhk` N !d 'NdMC_ex_obj: LIST:cont= NAd 6$>'2LIST  }̖߂l 6+>( ) 6+> 6 '6 .e֐ 6 '6 < 6  >$'6 6 6'PzHk@ N !d 'NdMC_ex_obj: func cont= NAd dal = dastk(irs)4 dastk(irs) = "֐(" & da1 & ")̖߂l" 6 '6dx 6'PzPkH 6 '6 6$<' 6$>'4 . Aj'd 6'Pz k 6 '6 6$<'b 6$>'k .3  ' .4e  'k8  6+<     4 6+>MC_ex_obj: dastk= 6$>Ad 6 '6k 'Pi h]x]]]]]'V 6'z'd zb z$<'T z$>' MC_func: i= z infoW= TAX T!L A@z Ve T!F R T!\ 6 z  < z $'x R z+< ( d) z+>'z d not func name !! z$>A'z k d dG, d'dj  d'dkp z 'zX no func name!!A z'i(  ] ]8]PMC_func_method: `: nparm= bAd'x'd b `| b'f fA'xdP `IN b'd `DECODEe b  'd `ISNULLe'd `IIF ` REG_MATCHe'dkk  dAj x'i h]x]]]]xMC_row_list: irs= 6Ad 6'z'd zb z$<'T z$>'xMC_row_list: i= z info= TAX T!V l n RAj R z+< d z+> z'@z8d0 dG, d'dj  d'dk z 'z"MC_row_list: no row or list mark!!A z'@ikAttribute VB_Name = "M_BX" Option Explicit Const C_ENZAN1 As$ S~ngj(,1,),2,*,21,/,22,%,23,+,24,-,25,AND,51,OR,52,NOT,18,<,31,>,32,=,3V5t a2 a<#3D,=33,> 4,=:4,<>36,>6,!= ||,61,--,99QSEP N \t\n\r""'()+-*/=<>!%,GC_LOG_LEVELIntPegeru0Pub giSq`lModeDim enzan0a1()   2 max_?' G(act(12, 125 mat(7,$ 7 `opea(100)bj(20md 0INFOPARM dastkpm iobJF#0darsfree_lis>t6LR6ARRAYF6hJhgi@ hgiInPDcomp_rev 'Sub test_MC() `infoW]'retJ&i,daB' Call log_init("" = LogLevel(NO_DBGh, 210a FileAERRDEBU`nOGK MCC If < 0 Theit "AFor i u1 To 1u conv_mline(Cells(i`g)e C""( $ a!`exp(, #b/Nex'End# FuncbByVal op2t :a G 7j<wbaWorkshee@ #w'X=!ǟ= .set_forA"%!DA  (1 E u2a: unch %(%) % 3invpalid4nparm=5a=% =[%] 6c 12 W %3*'16 10a-SYNTAX !mOR!!)word) g= S@t(~, ",e}325:g7j1pUBound(1 '*24SJ)= g$)A`@put_n(""w <0U G@etThis-("4@>Is Nothi`D-! /-1ElseFGF2j0az Gj)@ws.4H + 16, jp!bD7:i"Wj9wJ bii41@P? '`S㥄35`.LIKE,37,IN,38uy-s0" >0<>4,=  INa*64A%fmׇ,$*cIf u, df `qghk_ x(ByRef qbii qg0r}OUTLa`: X:=[" && "fU` !  <is_dbgou=5<&- /=Q 5ADobji"]=a (iA%da m 0 !`ӏ , p 0 9%o""p"S, #$$$ %Q bF#.($$!>q_ (%-#0#:= A Tq$@+!Ŭr{3(-|3 jDGE@lse Call ERROROUT(0, "Error exp=[" & line"l")End If vDEBUGINFOL(D10~MC_x: infoW=",xIf cont = 0 ThenFzio iob - 1!obj (1TV>= 31 A<8 gC1+ 2 5Exxit J #Next 'o>ov3L@hikaku=u/ daB@UCase(da(i))"ISNULL"$F2((IF!ret cy A= S'Functio Private  cmpgw(ByRefAs Str ing, Cssp SPL)Integer Dim iRat*rmRkRwd#wrB = 99CB5@A @mGetWord(, 5, C_SEP, 0Wm 9O#+23/#4 @2v̈́ 5/#34_S 5W5mMĥ(_N 1A;6o4(Q+9e? +ϟ  1"iϸ<8P0ix;;Sub set_null_par|m(DA99`PARMS (9tq=_X8idao.iA{""DP. HsvE= ,opBSdda) = "" @ida = P+ 1objo( iob0)dnf>oD@ End Sub Function MC_compile(ByRef line As String)IntegerWDim ieNFOPARM KL"FsspSSPL2 Kstack(10`8ret1f atr tr0n i1 2 dai) mcaexitAconv_flgmloopunWpword pt`k_strFkna@-F.idFF.atq= 5C sval 1+B lC0I opVt LLL.L.L.GC_I_OPT_MRKLST!.@=}$ c_bobsDa[= EgiInModeg(<00Do tWh A2'Al!50@`Cae D=c@cmpgw(a,Z `%)KO=.wd Call DEBUGOUTL(200, "I: =[" &""] =! & " spspl IfA < 0 Then Er Else= 9~9!4 J@0 A> T A$ERROR$(-1`$No opBeor. #da(AQ- 1)$}&"l#W AI6f/'n C`=_peekwd>)1)62 !*! c3&`aeqCq >=  A@ < 6 -}* CAQF ;c Q+#8 Orb,= 245  A%p)157(>@2 j"q T(tp-14-19;bUE-  25))? VTRUr)U mS LP?ppn(\?. iC|Ymkix r~&d_P>m/" over!/ hq, <. fm 0tsp<1|X# up_. @Ox;= mc= act(i i2B O=U:""ac#c) i1@yi2ah 9c&0ac<0gKQ|qUqc`dqqyac[ Q_yA5Z0A Exit Function ElseIf ac = 1 The |conv_flgDztr <= 30 00FidaiBa,- 2001K&nfo.i"d)"F""atH"sval#UCase(daR(@))l0opt)14!+Leftm, D1)N"$"a n4Rp5l'@3?X'cSLB&End If^H!շrevMC_ argVi@T}Call set_A_charr(A, ܣ5'?:Aobj(iobaE9*r@I+ uAk ? t$ oA#W 00 192 '|obV8 =emm@7RCNh&mmolD #% =o 0X0gF E $ -"2stacpk(spA ֏s~p`0Q b5 Or = 74 a%:A&@/ o"OF.twordaSL??1g?daP 2!=? ^!F?stk_str -s#?s> LO/_Qy5obO &ncmp_peekwd(line, s,/qsA<98)lnull_par@K_ b  983 6<ߩcR ERROROUT(-101, "ac=3 : sp<11" & */|bE p ="PEvfD_p/ebueݐ2y4 Ep@m!IO, mc?  ?7/<R2999q3.cp3o-e6 `:: :$aO:na\Q"IIF_2#98?2#Px/ o@(UYiaR^pAP(b !9C}tr!98)o__ oQN=1N'& "|" & word) Exit Fun ction xEnd IfLLoofp Bv   MC_conv_arg(ByRef dat As String, infoINFOPARM) ntegeriDim c8atr,T.id = ""opt 0cLeft(K, 1If5'" The68= 11svDal#Mid#2 , Len) - 2l@Else7." Or (c >>0" Ac <19") EIn9"-> 0{ / cA.262"I.@U4GBVG 2 2L>10:ORighm9HX O @{K  4 IC 'A7giOpA iTEget_port_type 5 ['b'ath= "v [@Uo|Privatef }num}Wu:}reI-7=J1, }AWDC 0MK! =C. # 61jC6S -^+ K$ *A-Aoperator)mŸDNJ#ᦼsO$ /a@= Abs(mcG%Ta< 1&0 ' = a($ U "I ##Sex_obj#a=Jpmstk(`DP%+1 K2SspXstacJ\Q8;4!Vida_ uib#xibrsp*dro04OBq|_a08BEo+'dyrA= c0)GC1 i Do W hile < xiobS q 2;/ib7Call DEBUGOUTL(110, "1:=a`& " mc rs;%LAa|= ICQpTb +iWB 99T <Ћφ!1= -5QQFp1A] ?-f@JUrA_clear(d5yL50  S& ' Q+Avt-0)* hk uV`@\orSC8Q-g"* c1l됲2 762! ?5* @0(ib01K=J( e#daa0Q/  >ՠ ӎ  . _Чl_PF  Q`%"7R1dNaA^9da(c8aIIMM61Mc_C(MrsEK"">=" p >`&pUb &@ 9# PrBVb4 1:# ׾Q'__o info) ' irs = (+ 1 dElseIf mcp7 Then '{<Lr- r4MC_row_list(pms8tk,gW, da0rqV< 0s p$r etExit Do End If con"+W.lval Call DEBUGOUTL(100, "cex_obj: LIST:=" & _dalOl(dx F"&#da1&"}̖߂\l"V&()5r '8֐Gsfuncr{U5K# tFtionuu5BsuJu vViTvG\K;E=R-5KR'oAw2 6zr\5` @{pset_A_bin(p1, 0Lig= "`! _(! (aRX**~L*aU+Qb-= 51ԩA_a@>=_BQi529 or@b P#H a=Wk7 & " & Op0erat da26@G)} | ,K5 +Loop F6 g Privahte e @¨B yRef ) As INFOPARM, ByVntegerWmString# CqCDimwibi1 pQx qwdat#gtex~#pMA rsR=Do While i >)pmPt$=C(ip}}62}: iR!ix#=",4pm.attA.t A1i ou8 p.id"F"5s#_method(pP s@ - (i `+) iP2H @@p,7!1)q06m"! }-1_S [ERRORE(a <> " *,_i iOTF/no!!"DiIIU% _ IY"@IH.?KnparmcE'#J|O0|LLOH qLongCQerr_6 JOcEc D:&0: BCs:>0sJ@# = 0ۀk=ni# T= d GHGI" in`fo=",,)If (pm.opund (GC_&_OPT_MRKARY Or  LST)) <> 0 Then\RJset_7_bin(pW, 29pmnpW pL [i Exit FunctioH%Else @=b0""0 f,ooK `& EMIf| - 1LoopCBF ERROR(1 no @ or  mark!!"M= ; ME (SLSS<N0{00020820-0000-0000-C000-000000000046}`(%H80H@PmalxAttribute VB_Name = "She@et8" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2$,| ZVsxMEP<<<<< <<< X`l@@ir  xx%%@`XX@t (p @l @mal V V` V V Vh V V Np N N N` N N NP"    $xO********1*********2*********3*********4*********5*********6*********7*********8O* W[ : Mzz_init_macro_lib *O* @\ : VBA_M_lib *O* 쐬 : 2016/11/21 Akito Kobayashi *O* XV : 2019/04/04 Akito Kobayashi Mod move get_lib_version() *O* to Mxx_macro_lib *O********1*********2*********3*********4*********5*********6*********7*********8G********1*********2*********3*********4*********5*********6*********7**G* @\ : s̃}N܂BOOKAhC}Nɓo^B *G* macro_libg}N쐬Ƃ́ASub݂̂ *G* Rs[ă}Nɑgݍނ *G* 쐬 : 2016/11/21 Akito Kobayashi *G* XV : 2017/01/10 Akito Kobayashi Add Mzz_init_macro_lib_path() *G***********************************************************************]` . A !Ao;Attribute VB_Name = "Mzz_init_macro_lib" Option Explicit '*1T*2345U67 8Q W[ :  &*Q@\IVBA_Mp'L(쐬(2016/11/21 Akito Kobayashi'+(XV(9/04(Mod mo@ve getb_vers() 6('AM 2Mxx~ Bizzf*Jys̃}N܂BOOKA hCDɓo^B@KNƾg~ ƂASub݂̂SRs[gݍ螂 $#Cq F7/ 01/10.MAddn_pathMObd7: `' k(ByVal dummy As Integer) A$Dim wbWorkb ook #Set!= ThisCall sgt@_w_!x(wb  .P End @ 0* pHd VBAProject4@j = r mal J< rstdole>stdole h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\syst em32\e2.tlb#OLE Automation`EOffDicEOficEE2DF8D04C-5BFA-101B-BDE5EAAC42Egram Files\CommonMicrosoft Shared\@10\MSO.DLL# 10.0 Ob LibraryK Scriptin0g>_ripinjgt je4 20B28UE718-11CF-893D20C93I?ҬЬB Brů oKdvn7.H@zGxR_&K@Ҙ 7ޠUDG/|#"{<$vIddM\U.OdЯ+5J07:JA5lj}XOPsBAY$AP6`,@HUr;%.Oiv Q!JOeVx3f`EHH3ĦL Xj`gn8= DimHendifslinenametexttype Excel+@ VBA@Win16~@Win32@Mac@VBA6#@ VBAProject@stdole`@Officeu@ Scripting@ VBA_macro_lib!@ ThisWorkbook|@ _Evaluate@ Sheet1@ Sheet2@ Sheet3@ mk_ins_linkk@ (!INST_LINK_S,0@nam@typ@(obj@ up_link_num(@ dwn_link_numb@up_link@dwn_link7@wsbx~@ Worksheet@wsix@ max_inst_link?@ inst_link@iidx@ ins_stack@sp_stack@sta_line'@end_linew@ proc_end_line@ move_line0R@ move_line1R@ move_lina@ins_namaL]@ exp_reuse@ max_ins_namaq@ (MakeInstLink@opt@(init_macro_libhP@log_init@(chk_conn_regist_errmsg6@check_mapping_sheet@ ActiveSheet%N@( get_sheet_whitebox@ ( file_name@Trim@@Cells@(make_inst_link8@(MakeInstLinkMappj@(make_inst_link_mapp=@(SetSortWsNothing{s@dummyD@ws_@is_loop@ret@i`@ii]@dispe@dat@dat1:@mapp_nam@obj_typv@kb@ne@ix_up @ix_dwn8e@iiau@ sort_line0@( CheckWhiteBoxFormat+h@(CheckEnd;@make_inst_link_subMl@get_sheet_input_nameO@ (clear_line. @(CheckEndAndClearLineR@ MoveItems;@ get_down_linkJ@chk_inst@vbLfT%@ (myERROROUT C@ insert_rowsz@ MoveCells`@ix_fromZ@ix_to @num_fromռ@num_to@pre_nama@ target_name@from_namZ!@to_namp@ins_typ}@insidi@obj_id@ srch_instG@set_link@kk]@Inst\@LINKh@ins_namZ@MoveInstanceItems=@MoveWhiteBoxItems@ next_lineU@ix]@pnam@pexp2@UCase5 @ instr_listl*@MoveInstanceltemsv@ja@( GC_JMAXH|@jj]@ Moveltems@id]@cnt+@idstT'@isrcUw@nsrcS@iis@i0]@nlin,@j0]@ncol@clear_contents_range@opt1u @opt10 @opt20( @ cont_lineT^@ GC_AP_MAX_ROW@msgnoK@ume9@ERROROUT0@ chk_connect!@ (!INST_LIST`@ instrf_typ@ ins_trf_namp@ ins_reuse+@ inst_listaa@max_inst_lista/@(CheckAllConnect+@pat@ chk_conn_initx@set_name_pat_to_chkt.@Sheets @is_name_to_chkE@Activate|@file%@(chk_connQ@ (ChkConnectt@ C_LOG_LEVEL@LogLevel.@ NO_DBGLOGT@ set_format\K@snamo d@PrintOut.@(make_inst_list@ chk_conn_sub@ii0d@key@datr;@datio2@fld_namo@attrO@ha~]@HASHBt@ is_target/@ is_connect@ error_headas *\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.4#0#C:\Program Files\Microsoft Office\Office10\EXCEL.EXE#Microsoft Excel 10.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\system32\stdole2.tlb#OLE Automation(*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.2#0#C:\Program Files\Common Files\Microsoft Shared\Office10\MSO.DLL#Microsoft Office 10.0 Object Library*\G{420B2830-E718-11CF-893D-00A0C9054228}#1.0#0#C:\Windows\system32\scrrun.dll#Microsoft Scripting Runtime*\CC:\Users\koba\AppData\Roaming\Microsoft\AddIns\vba_macro_lib.xla*\C..\..\..\Users\koba\AppData\Roaming\Microsoft\AddIns\vba_macro_lib.xlacmaF  mal  ZVThisWorkbookO1616dbc7fThisWorkbook Sheet1O2616dbc7f Sheet1nM Sheet2O3616dbc7f Sheet2[0M Sheet3O4616dbc7f Sheet3HMmk_ins_linkOH616dbd5e mk_ins_link`ychk_connectOI616dbd5echk_connectZx Kchk_port_useOJ616dbd5echk_port_use&*#chk_outputvarOK616dbd5echk_outputvarchk_mplt_defOL616dbd5echk_mplt_deffR"chk_mapp_parm_useOM616dbd5e"chk_mapp_parm_useb%sel_white_boxON616dbd5esel_white_box<chk_mappingOO616dbd5epchk_mappingѫ Sheet4O6616dbc7f Sheet4=  Sheet5O7616dbc7f Sheet58M Sheet6O8616dbc7f! Sheet68PM Sheet7O9616dbc7f# Sheet7hMM_BXOE616dbc80$M_BX Sheet8O:616dbc7f Sheet8oM$Mzz_init_macro_libOG616dbc80$Mzz_init_macro_libs hP Hx08N+A 2RޢJP؍'cAer@ comm_start@search@of@ hasx_init!@hasx_rZ@hasx_sZ@ DEBUGOUTL]^@hasx_uZ@ search_hash_by_connect_port_name@max_regS"@ha_iha4K@hasx_kZ@j2]@name2@endstr%@ endstr_len@is_likeA@Right @str_io@Replacef@pos@sta_nam@end_namJ@iDisp#@(lista@ instrf_nam@ ins_trf_typ@(trf_nam_to_ins_nam|@MaxȲ@(get_reusable_trf_namh@ins_nam0;]@ chk_port_use@nama@expa{@atra>O@lina^@max_namaa@ (CheckPortUse@"@(chk_port_use_mainVO@(chk_port_use_sub@instnam@atrUu@expK@namai0@ (chk_use_nameP@sspp@SSPL/@sp$_@GetWord׵@C_SEP_BX@wd_@ chk_outputvarF@C_SEP @var_nama@var_lina@max_var.7@(CheckAllOutvarԆ@chk_outvar_init@ (chk_outvarL@ (CheckOutvar3@(chk_outvar_regist_errmsg@chk_outvar_sub@ regist_varv7@ check_nam[@ regist_nam @var_nam@outvarJ@ chk_mplt_defW,@(CheckAllMpltDef@wb_@Workbookk@ActiveWorkbook@ Worksheets@CheckMappingDone@msgQ@Now%@ chk_mapp_parm_use/@usedaFx@( CheckMappParmUsez@( chk_mapp_parm_use_main@ get_param_sub@ chk_parm_subV@obj_namy@isExpV@val@i10@map_nam4}@ chk_parm_useha@exp_nam @dat2:@chk_parm_use_sub@vnamc@md@unamR@ sel_white_box; @( max_func_stack@ ( func_stackM}@( PC_WHITEBOX_NAME_PATk4@ GC_LOG_LEVEL@GC_IDOW@ GC_SMAXLINE˥@ GC_GW_SEP@gjno0#@gjtn0@gjpn0@gjlg0I@gjkw0@gjbc0;z@gjdn0@gjkk0@nod@enamvC@transnam<+@whitebox_shnam @GC_OPT_OFFSET_SELECT@GC_OPT_OFFSET_BOOK]h@GC_OPT_OFFSET_COMP-@ set_keisen_WB:/@i1]@i2]@j1]@nid^@nje^@gjn0Q@ is_keisen<@ set_keisen;7@ is_end_line@is_endۏ@gjig0>@ get_end_lineM@i_end@( SelWhiteBoxItems@iFound!@xmlnamH@snam0c@snam@ trans_typee@( check_analize_sheet*2@IsEOF@IsMEndé@SelExp@ SelRouter?@SelSQ@ SelOthers@ SelAggregator:@SelRank@MsgBoxR@ trans_name7X@uexpq@IsEndآ@ conv_mlineɚ@ ( is_key_funcu@ OutWhiteBox@ ( push_stackh@ srch_joken@groupby@@Self@ Aggregator@SeIRankg@Lookup_Source_FilterX#@Lookup_condition@Lookup_Sql_Override@Lookup_Sql_Override_WhereJ@Lookup_multiple_matchl@Order_ByT@pos2@len1|@len2|@top5@uval@skip_in@vbTabc9@skip_toA@ ( ClearWhiteBoxa@ srch_sheet @nam0@shnoa@Split)@StrConvx'@vbWide'@iO]@count0v@ma7^@color2F@get_cells_mergep@get_cell_haikei_colorW@Dimii:@( get_next_func_name@( ReNumber,G@num@iParm<@init_WB1@ ( InsertLineWBQ@( insert_line_WB@infoW@INFOPARM@(MC_init ,@ ( set_optionh!@ (giSqlMode@(MC_exp@ ( Deletekeisen_@ ( delete_keisen^@( delete_keisen_column(@jo]@eof@noj^@tnam@ieof ,@( InsertLineWB_custom@ C_ST_LINEf@ C_ED_LINE[@ C_INS_LINEh@ CUST_LINEW@( SetJoken_custom4@nam1@( FillJoken_custom@ C_COPY_LINEA|@data;@CST_LINEV@ ( SetKyoukai @ ( set_kyoukai"@ib]@iopb@isetu@text1~@utext@@op^@(MC_exp_compile@ ( exp_kyoukaiW@(iobT@(obj0c@(da\@cZ@ GetOptions1@(ida@mc9^@ sOperator@dal@da2@(irsԟ@ (MC_conv_arg(@infoZ@(pmstkI@(dastk.@ (MC_row_listXi@irsinfoW@KK_funcF@ (get_operatorA@(comp_rev.@giSqMode"@ set_kyoukaJ@i_exp{@set_kyoukai_exp @pW^@pm^@iFunc@ DEBUGINFOL[@KK_func_method@sval=@iialo?@funcnam[@nparm|@lval @ err_nparmI@Ival@ set_info_bin@GC_INFO_OPT_MRKARYmT@GC_INFO_OPT_MRKLSTd@ chk_mapping+@( gjWFI@( gjMappF@( GC_JNO^@GC_OPT_INS_NAME@GC_OPT_EXP_DISP/9@GC_SEPs@ GC_XML_REP2@ GC_FILE_DIRr@ GC_TAG_MLT?@ GC_TAG_MAPQ>@ GC_TAG_SRC`@ GC_TAG_TGTd@ GC_TAG_CON @ GC_TAG_TRN3f@GC_TAG_TRN_FLD)@GC_TAG_SRC_FLDP@GC_TAG_TGT_FLD@ GC_TAG_INS*@GC_TAG_TBLATTRѼ@ GC_TAG_GRP @ GC_TAG_MAPVAR @ GC_TAG_FOLDER@GC_TAG_META_EXTJ@ GC_PRP_FR_FLD@ GC_PRP_TO_FLD@ GC_PRP_FR_INS+@ GC_PRP_TO_INS@GC_PRP_TO_INS_TYP@ GC_PRP_TYPEU@ GC_PRP_EXP@ GC_PRP_NAME@ GC_PRP_VALUE@ GC_PRP_DTTYPE@GC_PRP_PRECISION]@ GC_PRP_SCALEc@ GC_PRP_GROUPZm@ GC_PRP_MAPNAM#@GC_PRP_TEMPLATENAME@GC_PRP_TRF_NAM4b@GC_PRP_TRF_TYP1@GC_PRP_PRT_TYPm@ GC_PRP_DESC@ GC_PRP_ORDER@ GC_PRP_DEFLT|@GC_PRP_SORTKEY./@GC_PRP_SORTDIRP @ GC_PRP_REFSRC@ GC_PRP_REFFLDDu@GC_PRP_FLD_TYP{@GC_PRP_KEY_TYPh@GC_PRP_EXP_TYPD@ GC_PRP_LEVEL6`@ GC_PRP_OCCURSR @ GC_PRP_FR_TSK|g@ GC_PRP_TO_TSK@ GC_PRP_CONDzY@GC_PRP_ISEXPVAR@GC_PRP_ISPARAM"q@GC_PRP_NULLABLEF4@GC_PRP_DATABASETYPEb@GC_PRP_REUSABLE@ GC_PRP_LENGTH @ GC_PRP_OFFSET@GC_PRP_PHYLENGTH @GC_PRP_PHYOFFSET@GC_PRP_MPLT_GRP[@ GC_STR_RANKR@ GC_STR_JOINERa@ GC_STR_ROUTER @ GC_STR_FILTER';@ GC_STR_LOOKUPR@ GC_STR_TAGDEF@ GC_STR_SQ@ GC_STR_SORTERo@ GC_STR_SEQ @ GC_STR_INPUT@ GC_STR_OUTPUT@ GC_STR_UPDATEE@ GC_STR_MAPLET6@ GC_STR_NORMLZ@ GC_STR_AMGSQ @ GC_STR_TGTDEF,@ GC_STR_CUSTOM%7@ GC_STR_AGG@ GC_STR_EXP@ MAX_XML_ATTR@ MAX_GROUP@(! XML_ATTRC@valueK@ (! XML_GROUP"@expr {@descGP@orderA@ ( ws_setting>@( ws_thiss+@( ws08#|@( ws14D|@( file_dirh@giALL_OPT_EXP_DISP@giOPT_EXP_DISP@G_SEP @ G_XML_REP@ MAX_XML_REP@ trans_namM@ trans_typp@ source_nam@ folder_namy@ bf_grp_namo@ bf_ins_nameC@group@TableAttrHeader @ ExpHeader@giMapVarHeader&@giConnectHeader@ ista_dat2B@modev@mode3 @ exit_proc(@cella@commenta)@gErrPos>@gErrWord.@ gMappingNameJ@gObjType6@fsF]@DynamicLookupCachem<@ SortedInput d@ giMsgSJISB@( MsgSJIS@do_msg@Answer,@ vbQuestion@ vbYesNoCancelq@vbCancel'@vbNo%@ ( set_options@@iOpta@level@ giALL_OPT_EXP,@atolN@( CheckAllMapping@i_e@i_s@i_max@i_exep@CheckMappingInith@GetActiveWorksheet@El]@Se_@Set_SortWsNothing@ get_file_dir>@CheckAllMappingSub.L@dir_namj @ file_path5!@get_file_dir_cell@CheckMappingSubl@get_sheet_0814(@CheckObjectDoneh @pos1@matchR@DEBUGOUT@name0@LikeStr@add_hyperlinksW@pata+@max_pata(@ LikePatArray!Z@ ( CheckMapping@ file_dira@ get_file_path\@ set_col_widthO@ DispStrLine~@( inputXML@headerM@trailerL@ DispSpaceLinek@DispLine\E@fnr4@parm~@XML_LINE@ds\@ open_fileh@fEOF1@quat@ get_lineXMLJ@ xml_analizee@vbCrLf@ close_file@xmlattr@tag_nam@ xml_func1V@ xml_func2W@ xml_func3X@istaw@giConnect_header#@ GC_PRPDTTYPE$@GC_PRP_TOLLTSK\@str_array_clear^@nattrg@DispMap@xml_get_attrval@group_iD@ TableAttrHj@ DispTransR@XMLK@DispExpressionv@ DispTableAttrG4@ SaveGroup@ DispSourceFld:@DispMappingVariable @CheckConnectSub@ DispTargetw@ DispTargetFld@natt@ DispSource @ DispSourceFid@ Displnstance~@ DispGroup5@attr_nam@nam2@vall @w1t_@W2u_@resa1\=@resa2]=@sa1@sa2@val1@fld܎@INS@@nal@fid_namM@Ten2Y@lent }@nami@ cmp_str_part@resalw=@sal@naml@xmlattroU`@fld_desc@ fld_reuse@ fid_reuse@reuseJ@out_flg@inp_flg{@fld_exp@fld_typ- @fld_pre@fld_scl6@ fldprt_typA@ fid_defiti@ fld_sortkey@ fld_sortdir$p@ fld_refsrc@ fld_reffld@ fld_exp_typ@ fld_mplt_grp}@refsrc^@prt_typp@ fid_defltب@ fld_reffid"@ fld_prt_typA@fid_expx@is_expY@mk_attr@fld_sci3@ fid_refsrcgg@ xml_replaced@valt @ fid_prt_typ@ @vail@ fld_defltЪ@fid_desc<@C_SYSVAR(%@ fld_defita@fid_prel@ fid_is_expvar@ fld_is_param@ fld_is_expvar4@ SetKadai14@fld_val@ icmp_mstr@fid_val@ EC_STR_MAPLET@xgrpt@ source_typ=@exp_flg_@fid_typJ@fld_grpx@ fld_fldtypcm@ fld_keytyp@ fld_level@ fld_occursW@ fld_nullableI@ fld_length@k@ fld_offsetQ@ fld_phyoffsetA@fld_phy_lengthW@fidm@pre5@grp@ fid_fldtyp@vali@ fid_level@ fid_nullableK#@fld_phy,@LengthY@ fid_fidtyp.@ fld_phylength@fid_grpV@ target_typb@ Dispinstance|@ fld_trf_typ@ fld_trf_nam@hl]@tlE_@fid_sclS@fld_typ1N@( CheckAllMappingSheet)j@file_dind@max_comah@jja@ gSessionName@ gWorkletName@ gWorkflowName@gjWkF1m@ SrchKadai14@gjWFD@gjWkFIm@ gTaskName܈@ glaskName@max_jj@unmat]@nspacM@obj1d@iiO@objo@ sort_08142@keya_@sort_range_coln<@ Sheet4@ Sheet5@ Sheet6@ Sheet7@ M_BX@C_ENZAN1@C_ENZAN2@enzana1.@enzana2.@ max_enzana1@ max_enzana2@actr@matIJ@(opeaZ@(iob0_@ (free_listaN@ INFOARRAY@ (max_lista@giOption @giInMode]@GetThisWorksheetȨ@ flist_init @@ (MC_compile(@ is_dbgout@obji|@cont{@ (MC_ex_obj@cmpgw6@wrkQ@ cmp_peekwd@spd@cmp_mkixL@atx[u@ set_null_parm @infoK@infoL @infoF@stack@attr0)@atrnKO@idai$@ac}\@exit1M@exit2M@conv_flg=I@mmC^@ loop_countޱ@wordk@stk_strX@ set_info_char04@conv_numXu@amcCt@info1@info2@ibo@cont_and @cont_or@ info_clear@ib0a@da1@caIIs@MC_func @Operatork@funcZ0@MC_func_method@ Sheet8@Module1b@ Mzz_init_macro_libh@set_this_work_book@set_this_work_book_pathy@Path2@_Defaultj@ _B_var_TrimmT@ _B_var_LeftQ@ _B_var_Midp@ _B_var_UCasea@ _B_var_Right9@ _B_var_infoT@ _B_var_dat?@pmstkirs@ _B_var_dal?@_B_var_giSqMode@ giSlqModeM@_B_var_giSlqMode`G@ _B_var_i_exph@ _B_var_Stringӊ@ _B_var_Constg@ _B_var_iia[@ _B_var_Ival`@ _B_var_infoW@8!3# +    ! %q  $  24VP@)@  HD @*  @H @Adirq__SRP_0*q7__SRP_1PROJECTwm]054228}#1Ucrrun.dllH* Ru`ntime_ma=_lib>VBA_ma+ol-bC*\CuUsers\koba\AppData\R(oam;\J\AddIns\vba.xlaI..\:cmaFBZVBThisWorkbooPkGTisWrkTbo 2E HB1BյB,!"B+BBSheet1*GS@#e@tn1_2 M n 2 2 22 2 [U 3 3 3 3S ) *mk_ins`Xn@|!%,.CheckAllOutvar CheckOutvarchk_outvar_initchk_outvar_regist_errmsg chk_outvarchk_outvar_sub regist_var regist_nam check_nam . \t\n\r!"'()=|-^+*;<>,/get_sheet_whitebox ddDe$eCheckAllMpltDefCheckMappingDone CheckMappParmUsechk_mapp_parm_use_main get_param_sub chk_parm_sub chk_parm_usechk_parm_use_sub dd@e$e L%INPUT0000%,%00000000%,%WHITEBOX%,agNi< set_keisen_WB get_end_lineSelWhiteBoxItemsSelExp SelRouterSelSQ SelAggregatorSelRank SelOthers srch_jokenIsMEndIsEOFIsEnd OutWhiteBox ClearWhiteBox srch_sheetCheckWhiteBoxFormat push_stack is_key_funcget_next_func_nameReNumberinit_WB InsertLineWBinsert_line_WB Deletekeisen delete_keisendelete_keisen_columnInsertLineWB_custom|SetJoken_custom NOTFillJoken_custom SetKyoukai set_kyoukai set_option exp_kyoukaiKK_funcKK_func_methodset_kyoukai_exp MC_row_list HHH08<@  \t<>=/?!+-"' Papos,#xD,#xA,,#x9,,gt,>,lt,<.ge,>=,le,<= C:\tmp MAPPLET MAPPING SOURCE TARGET CONNECTOR TRANSFORMATION TRANSFORMFIELD SOURCEFIELD TARGETFIELD INSTANCE TABLEATTRIBUTE GROUP MAPPINGVARIABLE FOLDER "METADATAEXTENSION FROMFIELD TOFIELD FROMINSTANCE TOINSTANCE TOINSTANCETYPE TYPE EXK*s       C*\CC:\Users\koba\AppData\Roaming\Microsoft\AddIns\vba_macro_lib.xlarU ~~~~~~/~ ~~~~~~C~~~~~T~~~~~~~~ ~~/~ ~~~~~~C~ XIE       8 ! y  1 a  9 q )   QyAY I I!i  H 9Y )I 1 aQ 1 A' 1ay1Iay1Q 1Y 9Yy 8(*2223I3y333 414Q4q444445)5Q5i55555!6A6a666667A7a79 777 818Q8q89 Y q      |; לqMJe";( ThisWorkbookSheet1Sheet2Sheet3 mk_ins_link chk_connect chk_port_use chk_outputvar chk_mplt_defchk_mapp_parm_use sel_white_box chk_mappingSheet4Sheet5Sheet6Sheet7M_BXSheet8Mzz_init_macro_lib VBAProjectF@C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLLVBA 9 a0F4C:\Program Files\Microsoft Office\Office10\EXCEL.EXEExcel a@0FC:\Windows\system32\stdole2.tlbstdole qPL-[DR?C:\Program Files\Common Files\Microsoft Shared\Office10\MSO.DLLOffice Qy`0( B=B(C:\Windows\system32\scrrun.dll Scripting qp dd, MakeInstLinkMakeInstLinkMappSetSortWsNothingmake_inst_link_mappFmake_inst_linkmake_inst_link_subset_link srch_inst MoveItemsMoveWhiteBoxItemsMoveInstanceltems get_down_linkCheckEnd MoveCells clear_linechk_instCheckEndAndClearLine myERROROUTget_reusable_trf_nam is_end_line IN?  i ࡘdPRESSION NAME VALUE DATATYPE PRECISION SCALE MAPPINGNAME TEMPLATENAME &TRANSFORMATION_NAME &TRANSFORMATION_TYPE PORTTYPE DESCRIPTION ORDER DEFAULTVALUE ISSORTKEY SORTDIRECTION REF_SOURCE_FIELD REF FIELD FIELDTYPE KEYTYPE EXPRESSIONTYPE LEVEL OCCURS FROMTASK TOTASK CONDITION (ISEXPRESSIONVARIABLE ISPARAM NULLABLE DATABASETYPE REUSABLE LENGTH OFFSET PHYSICALLENGTH PHYSICALOFFSET MAPPLETGROUP Rank Joiner Router Filter Lookup Procedure "Target Definition Source Qualifier Sorter Sequence (Input Transformation *Output Transformation OR Update Strategy Mapplet Normalizer @App Multi-Group Source Qualifier *Custom Transformation Aggregator Expression , , MsgSJIS set_optionsCheckAllMappingCheckAllMappingSubCheckMappingInitCheckObjectDonecheck_analize_sheet CheckMappingCheckMappingSubinputXML xml_analizeheadertrailer xml_func1 xml_func2 xml_func3xml_get_attrvalCheckConnectSubDispMap DispTransDispExpressionis_expDispMappingVariable DispTableAttr SaveGroup DispGroup DispSource DispSourceFid DispTarget DispTargetFld Dispinstance DispSpaceLineDispLine DispStrLinemk_attr xml_replaceCheckAllMappingSheetget_sheet_0814 SetKadai14 SrchKadai14 sort_0814[ jj  8<HLPTX\d i 춘              y2init_macro_lib F܏Cw]EKP*F{Įi#I->YuDFWorkbook @ 00000000 000000000000 T 000 T (0000BOX(un0000g0o0B00~0[000 No 0000 xel XLu$P~0_0o0agN x[a000juS xP}gVBE6.DLL >S MC_func_method Source Filter ][# (,1,),2,*,21,/,22,%,23,+,24,-,25,AND,51,OR,52,NOT,18,<,31,>,32,=,35 f<=,33,=<,33,>=,34,=>,34,<>36,><,36,!=36,||,61,--,99 * \t\n\r"'()+-*/=<>!%,MC_initMC_exp_compileMC_expcmpgw cmp_peekwdcmp_mkix set_null_parm MC_compile MC_conv_argconv_num get_operator MC_ex_objMC_func P  (e$@\ i Px  e i Pe   i X !  Sql Query &Lookup Sql_Override Lookup $SetKyoukai: text=[ ] AND and and    ' > >i >x  000% 001 E %  sp= No operetor. [ 8002 E %: unmatch %(%) % %(%) 4003 E %: invalid %(%) %(%) 0004 E %: invalid nparm=% >005 E %: invalid attr=% val=[%] 4006 E %: unmatch %(%) %(%) 8012 W %: unmatch %(%) % %(%) 4016 W %: unmatch %(%) %(%) $MC_compile: word=[ >101 E SYNTAX ERROR!! % word=[%] , BX <>=,<=,>,<,<>,=,NOT LIKE,NOT IN >  -?@@ Fd!DǐtDF Worksheet -D0 D 0 ,MC_exp_compile: line=[ obj[ ]= da 1 ] atr= &Invalid operetor. [ ]( ) [ ) MC_compile: atr= loop over! sp<1| MC_compile: mc=  ac=  i1=  i2= ac<0| line= F $ ac=3 : sp<11 ac= | > `  LIKE . 9 - / >k .exp_kyoukai : Enter i0= exp_kyoukai: i=  mc= irs= $exp_kyoukai: disp= LIST HORV fit ) ORV U  &exp_kyoukai: dastk= (exp_kyoukai :Exit i= KK_func: i= info=  ( not func name!! no func name!! KK_func_method:   nparm= ISNULL  = NULL IS_SPACES SPACE REG_MATCH  D   - ital  =   = Zott DECODE IIFrU~~~y     dummy Q ws file_namemapp_namobj_typix_fromix_tonameins_nam move_linawsbxixwsixididstisrcnsrci0nlinj0ncolnamopt cont_linemsgnoumeii0iijjj2name2str_io target_namhains_nam0instnamexpposvar_namretattrexp_namvnamtexti1i2 trans_namevaldattypnam0shnoaiia func_stackmax_func_stacksspiParmjoiobobjobj0dapmstkirspWdastkiialinfofuncnamnparmdo_msgmodedir_namnama file_pathlinetag_namxmlattrnattrattr_namxmlattrofld_expcountnumhltlnofld_typfld_prefid_sclmax_comacommentamax_jjjja Y<infoWatrmc R(ZThisWorkbookThisWorkbookSheet1Sheet1Sheet2Sheet2Sheet3Sheet3mk_ins_linkmk_ins_linkchk_connectchk_connectchk_port_usechk_port_usechk_outputvarchk_outputvarchk_mplt_defchk_mplt_defchk_mapp_parm_usechk_mapp_parm_usesel_white_boxsel_white_boxchk_mappingchk_mappingSheet4Sheet4Sheet5Sheet5Sheet6Sheet6Sheet7Sheet7M_BXM_BXSheet8Sheet8Mzz_init_macro_libMzz_init_macro_libID="{BEE96E69-1F3F-4BDE-B318-36B632258EF1}" Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Document=Sheet2/&H00000000 Document=Sheet3/&H00000000 Module=mk_ins_link Module=chk_connect Module=chk_port_use Module=chk_outputvar Module=chk_mplt_def Module=chk_mapp_parm_use Module=sel_white_box Module=chk_mapping Document=Sheet4/&H00000000 Document=Sheet5/&H000PROJECT+#SummaryInformation(.DocumentSummaryInformation8hCompObji00000 Document=Sheet6/&H00000000 Document=Sheet7/&H00000000 Module=M_BX Document=Sheet8/&H00000000 Module=Mzz_init_macro_lib Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="A0A2A9AFADAFADAFADAFAD" DPB="CDCFC4F5DC23DD23DD23" GC="FAF8F32C212D212DDE" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet1=44, 44, 940, 395, Sheet2=0, 0, 0, 0, C Sheet3=0, 0, 0, 0, C mk_ins_link=66, 66, 962, 417, chk_connect=0, 0, 896, 351, chk_port_use=22, 22, 918, 373, chk_outputvar=44, 44, 940, 395, chk_mplt_def=66, 66, 962, 417, chk_mapp_parm_use=88, 88, 984, 439, sel_white_box=110, 110, 1006, 461, chk_mapping=132, 132, 1028, 483, Z Sheet4=0, 0, 0, 0, C Sheet5=0, 0, 0, 0, C Sheet6=0, 0, 0, 0, C Sheet7=0, 0, 0, 0, C M_BX=44, 44, 940, 395, Sheet8=0, 0, 0, 0, C Mzz_init_macro_lib=0, 0, 0, 0, C Oh+'0@H\p  Kobayashi KobayashiMicrosoft Excel@(kĔ@o6X՜.+,08 PXd lt|  BXzCg{bNXeXgSORTp[^WΉ print_log error_log debug_log  [NV[g FMicrosoft Excel [NV[gBiff8Excel.Sheet.89q