Te mando un mandato, adaptado del publicado en NEWS/400, que hace lo que
necesitas. Espero te sirva.
<<callerid-2.0.0.zip>>
Un saludo,
Javier Mora Garc�a mailto:[EMAIL PROTECTED]
Dialsur S.A. http://www.dialsur.es
Departamento de Inform�tica
> -----Mensaje original-----
> De: Jose Berm�dez [SMTP:[EMAIL PROTECTED]
> Enviado el: viernes, 20 de junio de 2003 12:42
> Para: [EMAIL PROTECTED]
> Asunto: Fw: Recuperar informacion programa originador en triguer
>
>
> ----- Original Message -----
> From: Jos� Berm�dez <mailto:[EMAIL PROTECTED]>
> To: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
> Sent: Friday, June 20, 2003 9:27 AM
> Subject: Recuperar informacion programa originador en triguer
>
> Hola foreros tengo un triguer sobre un fichero que se actualiza en
> bastantes procesos de la empresa y quiero crearme un hist�rico de
> modificaciones para ello me interesar�a poder recuperar en el triguer una
> serie de datos adem�s de la modificaci�n como pueden ser :
>
> - el usuario (con una estructura de programa lo recupero)
>
> - el trabajo (con una estructura de programa lo recupero)
>
> - la fecha ( no hay problema)
>
> - la hora ( no hay problema)
>
> pero este es necesario y no se de donde
>
> - El programa que ha actualizado el fichero y que ha activado el triguer
> � Alguien me puede indicar donde y como puedo obtener esta informaci�n ?
>
> Muchas gracias desde ya y feliz San Juan.
>
>
> Un Saludo.
> Jos� Berm�dez Huerta.
>
>
> Alcoholes Montplet, S. A.
>
> Departamento Inform�tica
> Tel.: 93 313 63 62 Horario: de 07:00 a 15:00
> Fax.: 93 313 21 00
> Email: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
> Web.: <http://www.montplet.es>
>
begin 600 callerid-2.0.0.zip
M4$L#!!0````(`.:.="Z54!L>P0$``$4(```=````24Y30T%,3$5222Y#3%!?
M26YS=&%L861O<[EMAIL PROTECTED]/#?]A3^>[EMAIL PROTECTED])[EMAIL PROTECTED],]4L6I
M,XYT+.WO[Y($A5:LC.->R,:\W>?;CV0T!1>NM'O;4M\[$0:-ZX$/P>9MNRG*
M?)E!OH-5L5OEL-E]EMDVVX,_Z(H3+V0JZ3`4W,0AVS+?(R3;+]\WW\4GK+_R
M79G#1[&'5;[.EV71"(=Q/-NR+49%?;[EMAIL PROTECTED]>3!_3;CKTS&1'@@>N8\/WM^7
M1P(=`-M"5O!TM2%K$TIE#DD@>`J,[EMAIL PROTECTED]@:H:XV%4H5X[<P=,I0F`Y1
M3KQG:=+K/16]GLMDU/<]ZMN)N$U51<@(#>,("]O;;E#5*EAC+M4M9J+CYSB8
MJ*3X-<.")[EMAIL PROTECTED]>[EMAIL PROTECTED])I#!'[$P0$'91^CUJU_6`_]*0*#
MUB`>R&CW"/9,[EMAIL PROTECTED]&+PCHE'V!SJV.IQK-P+;^V"+D3=Y9<C3)[EMAIL PROTECTED]
MFKT#PR/&8GT2*:Y:XYRBVY+$F6D??W4NU,29:?\LI"T*9A$:<0;25L69:?\_
M2$L6!5(W-<CH<HMM0"5'+MC)?01TQ%7TEN9F]R;6%R(&%L('1R:6=G97(@9&4@<75I96X@;&\@
M97-TH"!L;&%M86YD;RY46%3=6-MNXS80?2_0?YB7(I=N4BN)=S<!LH7C2^*N
M;[EMAIL PROTECTED])=H3*I$K1[GH_K7^SW]"W/G5(74PZLNRH28%V'G2AYLR00PYY
[EMAIL PROTECTED]('@,&P?S5N'R=R`<U&K]<>=UN&1JOM-L?=4;,['"B-D>!3068$
M?IM3$-2;1U00H"$P/KL3%'P*D:%B&%H3U%IP+[$34R">#!84YBQY(CX7QSG8
ML#*\DY0%/E>.!O3W^)[EMAIL PROTECTED],_H!SYP5$T7'][*C^VL#V0K[T
MH447`:/+(N,W02RY",B%T7:4B3F4#O7N"=ZS:&!O([EMAIL PROTECTED]@!9S0NL+,R
MF(O=9&!.ZL>U5\<U![[K7\.:='W*9#`)/")[EMAIL PROTECTED]@6^NU80[#
M4;\PZ$T^BX(0'>$#QU4ROAV/KJ\&K2+=$1&?9U0*'A=&T8XC\%OL^JV8PO[I
M]P=P"3\-(Q4Y$OX,/0H!\W%\0(R!>[EMAIL PROTECTED]'\7#HP+^DP+I/"H!Q#C\>P("$7
MUAP]E(C'P5U([EMAIL PROTECTED]&\U%>,#73?;[EMAIL PROTECTED]<&@Z!AM
M060N-J$,^)CBNF>\:,8L)QX)[EMAIL PROTECTED]:28_SAJG]IXI]>3(/N"0Q
M%'A]J/P/9>6BJ8?0;<%1ED)+W1:P:9;.L%$,.QW!9Q?J\0BNU<[U`Y\+N!7!
M=([EMAIL PROTECTED]'[EMAIL PROTECTED]@-9$-3UZ+:!\.&8<#
MR-_2V3_(E;'[[C*6=`:-41>[EMAIL PROTECTED]>MS/=OT6O)O'U#/ZVW+S3^K;[EMAIL PROTECTED]<
MY'9V!35;M[$(UW7KR>WUNBX-UC4!SO75J=N*8D%]6\]YF=[,4=XN([7,)P$+
M)"813'"@\I["N/F^7SO!$P@;9D3FMO/V5%JNZ>'$Z&WADG,<)[EMAIL PROTECTED])6$^
M[GV,0B>@H5IQV<!BV"9/O^*P1UD09C2.R109!,$W*JF(\T"-9K_TXVDWGRPS
MH"BOU*7+/NT?7O4:@[?NP1JPDVO:P)/:%F!+DD*@<Y(!]S[<<R"X#2[Y_-L]
M"]^C;"KO"_%P;BY:Y4NOL4)=)^_DWF%WT!G:3OIOC<UBS<E9!BP:7=-M,RF6
M14#3H^VMR><,)Z8(I(>D0?75%J%!'9T=4`AZK2[:4Y8TML,/),B0FQW6+`AN
M6"I)BR#FP,;M_O!]>\_LJTS92"9K_DX;&1B/;0/XA,DYRI8^])",;L]'2YX^
M.9N).6.AX):E>F9]MP6'4'B$IL?'2IQ:!2LY8\SE]#GFH4\"MIT/;)!GV22;
M'">!*Q8>910;>"0)$BQ^7!+([EMAIL PROTECTED]>@+.3>A[I2]#K'?#0,]N0DZJV
M$ELKL6VY!;;<O1)#;>3JR9/,,1F\#(;UPV3'[XJ*>7).PN`3AABIJX?QUH6=
M*FFQF,`J=?H74U_R<BMGMQ"&2158-A$N#:F7)\ZANJ[8/^Q'VM4$5?A!B94/
M]S3=VJ0]/9;APM+B$>9VG`WC0+B$EU8/5,6"WA_K6BVJQ[L^>S#XRNZKC+Q>
M!F%^'%J,F4J#*D,LQ1S7'?('QB5([EMAIL PROTECTED]:*0)68GE'X\:?L*'4LZ:2DJL
MUWV&"1GADYQF^422W>R?F.TYL;$],#\K`C,');95690\[;WKW[B#5OFT;SH,
M,E98&=JIC&R5QJX$F\5.OS_6KR*)U:`IVZL(3I9ZQ4Z_I57<[EMAIL PROTECTED]>K
M+KUT^I2EQNH0RRK'-U!&-MH?XY28'(Y<=UR>SMV)U:N0XGDA**8PTQFURNBR
M]:]1#R7CP-N3-V!)S8F;Q(XYG%>CL"&'Q]2CZE=&U33&SE=+X]6H]>N_F%`=
[EMAIL PROTECTED]@U9%*/_4^W@"*-/E^DI;Q=020_`TN`8[V-/$<]HP<%
M1]#6S..&,%__\73G=X+/9<#R7P]%\FQUI>Y4)E=T&N\2G(T*BFJA@;\!4$L#
M!!0````(`.:.="[_>J=/@@,```@'```)````3$5%344N5%A4;57+;MM($+P3
MX#\T<K(!1;(!&X@"Y!`XRD*`UA&L_8$AV9+'&,XP\Y"C_&V.>]B3?R#50]&4
MO.'!&H^&W=55-:6[SZO5XF'YA=[3TFZ=;Y4G9:CS;N=5JTC54>]5XSPU3-^3
M_M>2<<0A_B)C<,`VKBS*8A&BHA2UT8UJ*+`4Z)ROM;.*WD54K),R[R;$AE2*
M*&>=''M4-9/GT#D;5&6X+-"F<T%C':[EMAIL PROTECTED];90P6>+_AR'4$
MN#"E!4ZC*N,[P$2=('5KUVJVC1(XE<HSY!F)?ZC'%&0TF66$/J%.>=D3=&7!
M-GK>*9DYT#;A7P[3/\^;&,53R$T"EO+&P&(8:92IT*$LU)Z]WJ77\XVS^(M*
MPJTEWF*T)/32!8]Z7`K[M6HK<"+PR"BJ%-Z2"BJZ'MV=RU^H0\+H`LM*4UE]
M7B^%2X)P_.3RBL'\$V`-0Y2%;C"HWNKZC1?`:P9H:V'"2^GH?^5Z!C,ZR*5$
M<98M3"@#&/T3>R^VAZ$H0N6,Z?^H%R>M'+C1%LVS1ZAU3<8#-K(^G6O8D[:-
M8#1,]4O;F[(L('FGC9SD/]KXXMOZ[PDM5PMX,=;3RPD=^LE`YC99P9I-F&U1
M:U\GBQ7V%=T-=Z5*H5;#1+VA$CEAY([EMAIL PROTECTED]@O6=<%=FRJ/.Q
M+`C/8XS=Q]GL^?EY^LBFN[FZFG*8J=#-Q'!A=C6_OKJ]F?[4G;"V$>39I>=.
M)A#ALO(#!QD.[A4TL-$=;0<V\LFRR)2H9#,78;B$=.33B^^D8OO2)*S=6#?;
MUN_EGI9%EJ>%M[R2VTA1<]MEH_5LJ"[EMAIL PROTECTED])>QW$)&UV$^("`DIATTN"
M$)%[G$&?$OS*88WX2";V+96/_]6"L4N5Z4T#;>_Y.<S`)[EMAIL PROTECTED]:MNQ95`V7
M&='#N%$6G\:G+%;&'1KZPGMM^0":<[EMAIL PROTECTED]/]`SAW[<)J.X6T\#JTG=)_:
M*<VO)_25*\_>T?5\/D?F=-/;F_>W'P3(USYE7D'@[EMAIL PROTECTED]@<_U"?N#
MY,=!@"/HZ,[F``AM=\FZ?&8IEC:J]_K9L)M4:8^``?O)]K*-R2?NUAO$%I8'
MXB>NTY'R$R\@/L;JM+S?'.'GQAM-.9<!$6QGY4]/B_P(D0"])3<:-:$<<0&(
M*JX1+R'?S;?XQIP]2++E2*&S'[EMAIL PROTECTED];&E,;#]!E!+`P0*``````#F
MCG0N"QWJ#P<````'````"P```%9%4E-)3TXN5%A4,BXP+C`-"E!+`0(4`!0`
M```(`.:.="Z54!L>P0$``$4(```=``````````$`(`"[EMAIL PROTECTED])3E-#04Q,
M15))+D-,4%]);G-T86QA9&]R+E185%!+`0(4`!0````(`.:.="[EMAIL PROTECTED]
M`.8:``!```````````$`(`"[EMAIL PROTECTED],15))1"Y24$=,15]);F9O<FUA
M<B!A;"!T<FEG9V5R(&1E('%U:65N(&QO(&5S=*`@;&QA;6%N9&\N5%A44$L!
[EMAIL PROTECTED]"`P``"`<[EMAIL PROTECTED]:[EMAIL PROTECTED]
M14U%+E185%!+`0(4``H``````.:.="X+'>H/!P````<````+``````````$`
I(`"V@;P+``!615)324].+E185%!+!08`````!``$`"D!``#L"P`````=
`
end
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]