Doh. Call me 'attachment challenged' then.
"Andre Cerri" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> Richard
>
> Attached is a simple class that maps
>
> ^Global(sub1,sub2)=data1[data2[data3.....
>
> Load and compile, then check out the Storage section after double clicking
> on the classname in the Architect.
>
> Hope it helps you out.
>
> Andre Cerri
> InterSystems Sales Engineering
>
>
>
>
> "Richard Bellis" <[EMAIL PROTECTED]> wrote in message
> news:[EMAIL PROTECTED]
> > Hello,
> >
> > Does anyone know how I can map a delimited M global via the Object
> Architect
> > or using CDL?
> >
> > e.g.,
> >
> > ^TEST(id)="field1^field2^field3"
> >
> > etc ("^" is the Delimiter)
> >
> > I've played about with the Object Architect to no avail. If also looked
> > through the class definition documentation.
> >
> > Does anyone have any ideas?
> >
> > Richard.
> >
> >
> >
>
>
begin 666 globaltest.CDL
M+RHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ
M*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ7 T*?" @(" @(" @($9I;&4Z
M($EM;W-S+F-D;" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
M(" @(" @(" @(" @? T*?" @(" @("!!=71H;W(Z($-A8VAE($]B:F5C=',@
M5F5R<VEO;B S+C([EMAIL PROTECTED] @(" @(" @(" @(" @(" @(" @(" @(" @? T*
M?" @(" @(" @($1A=&4Z($UA<B R." R,# P(#$X.C4T.C(R(" @(" @(" @
M(" @(" @(" @(" @(" @(" @(" @(" @(" @? T*?" @1&5S8W)I<'1I;VXZ
M(%1H:7,@1FEL92!I<R!'96YE<[EMAIL PROTECTED]@17AP;W)T(%5T:6QI='D@(" @
M(" @(" @(" @(" @? T*7"HJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ
M*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ*BHJ+PT*
M#0IC;&%S<R!497-T1VQO8F%L#0I[#0H-"@ED97-C<FEP=&EO;B ](")$97-C
M<FEP=&EO;B!F;W(@9VQO8F%L(%YG;&]B86PB.PT*"7-U<&5R(#T@)5!E<G-I
M<W1E;G0[#0H-"@EP97)S:7-T96YT([EMAIL PROTECTED]&]M.PT*#0H):6YD97@@56YI
M<75E26YD97@@>R!A='1R:6)U=&5S([EMAIL PROTECTED]<V-R:7!T,2Q3=6)S8W)I<'0R
M.R!E>'1E;G0@/2 P.R!I9&ME>[EMAIL PROTECTED]<75E.R!]#0H-"@EA='1R:6)U=&4@
M06YT:6)I;W1I8U9E<G-I;VX@>R!T>7!E(#T@)4YU;65R:6,[(&-A;&-U;&%T
M960@/2 P.R!N;[EMAIL PROTECTED](&UU;'1I9&EM96YS:6]N86P@/2 P.R!P=6)L
M:6,[(&YO="!R97%U:7)E9#L@<W%L8V]M<'5T960@/2 P.R!T<F%N<VEE;G0@
M/2 P.R!]#0H)871T<FEB=71E($ED4W1A='5S('[EMAIL PROTECTED]'EP92 ]("53=')I;F<[
M(&-A;&-U;&%T960@/2 P.R!N;[EMAIL PROTECTED](&UU;'1I9&EM96YS:6]N86P@
M/2 P.R!P=6)L:6,[(&YO="!R97%U:7)E9#L@<W%L8V]M<'5T960@/2 P.R!T
M<F%N<VEE;G0@/2 P.R!]#0H)871T<FEB=71E($ES;VQA=&5)9"![('1Y<&4@
M/2 E4W1R:6YG.R!C86QC=6QA=&5D(#T@,#L@;F]T(&9I;F%L.R!M=6QT:61I
M;65N<VEO;F%L(#T@,#L@<'5B;&EC.R!N;W0@<F5Q=6ER960[('-Q;&-O;7!U
M=&5D(#T@,[EMAIL PROTECTED]')A;G-I96YT(#T@,[EMAIL PROTECTED]"6%T=')I8G5T92!3=6)S8W)I
M<'0R('[EMAIL PROTECTED]'EP92 ]("5);G1E9V5R.R!C86QC=6QA=&5D(#T@,#L@;F]T(&9I
M;F%L.R!M=6QT:61I;65N<VEO;F%L(#T@,#L@<'5B;&EC.R!N;W0@<F5Q=6ER
M960[('-Q;&-O;7!U=&5D(#T@,[EMAIL PROTECTED]')A;G-I96YT(#T@,[EMAIL PROTECTED]"6%T=')I
M8G5T92!2=6Y$871E('[EMAIL PROTECTED]'EP92 ]("5.=6UE<FEC.R!C86QC=6QA=&5D(#T@
M,#L@;F]T(&9I;F%L.R!M=6QT:61I;65N<VEO;F%L(#T@,#L@<'5B;&EC.R!N
M;W0@<F5Q=6ER960[('-Q;&-O;7!U=&5D(#T@,[EMAIL PROTECTED]')A;G-I96YT(#T@,#L@
M?0T*"6%T=')I8G5T92!2=6Y.;R![('1Y<&4@/2 E4W1R:6YG.R!C86QC=6QA
M=&5D(#T@,#L@;F]T(&9I;F%L.R!M=6QT:61I;65N<VEO;F%L(#T@,#L@<'5B
M;&EC.R!N;W0@<F5Q=6ER960[('-Q;&-O;7!U=&5D(#T@,[EMAIL PROTECTED]')A;G-I96YT
M(#T@,[EMAIL PROTECTED]"6%T=')I8G5T92!3971U<%1Y<&4@>R!T>7!E(#T@)5-T<FEN
[EMAIL PROTECTED]" ](# [(&YO="!F:6YA;#L@;75L=&ED:6UE;G-I;VYA
M;" ](# [('!U8FQI8SL@;F]T(')E<75I<F5D.R!S<6QC;VUP=71E9" ](# [
M('1R86YS:65N=" ](# [('T-"@EA='1R:6)U=&[EMAIL PROTECTED]<V-R:7!T,2![('1Y
M<&4@/2 E4W1R:6YG.R!C86QC=6QA=&5D(#T@,#L@;F]T(&9I;F%L.R!M=6QT
M:61I;65N<VEO;F%L(#T@,#L@<'5B;&EC.R!N;W0@<F5Q=6ER960[('-Q;&-O
M;7!U=&5D(#T@,[EMAIL PROTECTED]')A;G-I96YT(#T@,[EMAIL PROTECTED]"6%T=')I8G5T92!3=&%T
M=7,@>R!T>7!E(#T@)5-T<[EMAIL PROTECTED]" ](# [(&YO="!F:6YA
M;#L@;75L=&ED:6UE;G-I;VYA;" ](# [('!U8FQI8SL@;F]T(')E<75I<F5D
M.R!S<6QC;VUP=71E9" ](# [('1R86YS:65N=" ](# [('T-"@EA='1R:6)U
M=&[EMAIL PROTECTED]&EB:6QI='E3=&%T=7,@>R!T>7!E(#T@)5-T<[EMAIL PROTECTED]
M8W5L871E9" ](# [(&YO="!F:6YA;#L@;75L=&ED:6UE;G-I;VYA;" ](# [
M('!U8FQI8SL@;F]T(')E<75I<F5D.R!S<6QC;VUP=71E9" ](# [('1R86YS
M:65N=" ](# [('T-"@EA='1R:6)U=&4@<&EE8V4P.2![('1Y<&4@/2 E4W1R
M:6YG.R!C86QC=6QA=&5D(#T@,#L@;F]T(&9I;F%L.R!M=6QT:61I;65N<VEO
M;F%L(#T@,#L@<'5B;&EC.R!N;W0@<F5Q=6ER960[('-Q;&-O;7!U=&5D(#T@
M,[EMAIL PROTECTED]')A;G-I96YT(#T@,[EMAIL PROTECTED]"6%T=')I8G5T92!P:65C93$P('[EMAIL
PROTECTED]'EP
M92 ]("5);G1E9V5R.R!C86QC=6QA=&5D(#T@,#L@;F]T(&9I;F%L.R!M=6QT
M:61I;65N<VEO;F%L(#T@,#L@<'5B;&EC.R!N;W0@<F5Q=6ER960[('-Q;&-O
M;7!U=&5D(#T@,[EMAIL PROTECTED]')A;G-I96YT(#T@,[EMAIL PROTECTED]"6%T=')I8G5T92!P:65C
M93$Q('[EMAIL PROTECTED]'EP92 ]("53=')I;F<[(&-A;&-U;&%T960@/2 P.R!N;[EMAIL PROTECTED]
M86P[(&UU;'1I9&EM96YS:6]N86P@/2 P.R!P=6)L:6,[(&YO="!R97%U:7)E
M9#L@<W%L8V]M<'5T960@/2 P.R!T<F%N<VEE;G0@/2 P.R!]#0H-"@T*"7%U
M97)Y(%%,;V]K=7 -"@E[#0H)"71Y<&4@/2 E4U%,475E<GDH0T].5$%)3DE$
M/3$L4D]74U!%0STB240L4W!E8VEM96Y.;SHE4W1R:6YG+$ES;VQA=&5.;SHE
M26YT96=E<BQ3=&%T=7,Z)5-T<FEN9RQ)9%-T871U<SHE4W1R:6YG+%-U<V-E
M<'1I8FEL:71Y4W1A='5S.B53=')I;F<L27-O;&%T94ED.B53=')I;F<L4V5T
M=7!4>7!E.B53=')I;F<[EMAIL PROTECTED])"7-Q;'%U97)Y(#T-"@D)>PT*"0D).E-%
M3$5#5"!)1"Q3=6)S8W)I<'0Q+%-U8G-C<FEP=#(L4W1A='5S+$ED4W1A='5S
M+%-U<V-E<'1I8FEL:71Y4W1A='5S+$ES;VQA=&5)9"Q3971U<%1Y<&4-"@D)
M"3I&4D]-('1E<W1G;&]B86P-"@D)"0T*"0E]#0H)"7-Q;'!R;V,@/2 P.PT*
M"7T-"@T*"7-T;W)[EMAIL PROTECTED]&]M#0H)>PT*"0ET>7!E(#T@)4-A8VAE4U%,
M4W1O<F%G93L-"@D)<W%L( T*"0E[#0H)"0EM87 @9&%T86UA< T*"0D)>PT*
M"0D)"6=L;V)A;" ](%Y';&]B86P[#0H)"0D)<W1R=6-T=7)E([EMAIL PROTECTED]&5L:6UI
M=&5D.PT*"0D)"71Y<&4@/2!D871A.PT*#0H)"0D)<W5B<V-R:7!T(#$@>R!E
M>'!R97-S:6]N(#T@>U-U8G-C<FEP=#%].R!]#0H)"0D)<W5B<V-R:7!T(#(@
M>R!E>'!R97-S:6]N(#T@>U-U8G-C<FEP=#)].R!]#0H-"@D)"0ED871A($%N
M=&EB:6]T:6-697)S:6]N('[EMAIL PROTECTED]&5L:6UI=&5R(#T@(ELB.R!P:65C92 ](#8[
M('T-"@D)"0ED871A($ED4W1A='5S('[EMAIL PROTECTED]&5L:6UI=&5R(#T@(ELB.R!P:65C
M92 ](#([('T-"@D)"0ED871A($ES;VQA=&5)9";
M(CL@<&EE8V4@/2 T.R!]#0H)"0D)9&%T82!2=6Y$871E('[EMAIL PROTECTED]&5L:6UI=&5R
M(#T@(ELB.R!P:65C92 ]([EMAIL PROTECTED]('T-"@D)"0ED871A(%)U;DYO('[EMAIL
PROTECTED]&5L:6UI
M=&5R(#T@(ELB.R!P:65C92 ](#<[('T-"@D)"0ED871A(%-E='5P5'EP92;(CL@<&EE8V4@/2 U.R!]#0H)"0D)9&%T82!3=&%T
M=7,@>R!D96QI;6ET97(@/2 B6R([('!I96-E(#T@,[EMAIL PROTECTED]"0D)"61A=&$@
M4W5S8V5P=&EB:6QI='E3=&%T=7,@>R!D96QI;6ET97(@/2 B6R([('!I96-E
M(#T@,[EMAIL PROTECTED]"0D)"61A=&$@<&EE8V4P.2;(CL@
M<&EE8V4@/2 Y.R!]#0H)"0D)9&%T82!P:65C93$P('[EMAIL PROTECTED]&5L:6UI=&5R(#T@
M(ELB.R!P:65C92 ](#$P.R!]#0H)"0D)9&%T82!P:65C93$Q('[EMAIL PROTECTED]&5L:6UI
M=&5R(#T@(ELB.R!P:65C92 ](#$Q.R!]#0H)"0E]#0H)"7T-"@E]#0H-"GT-
!"@``
`
end