• Subject: RE: Insert with trigger
  • From: "Stone, Brad V (TC)" <bvstone@xxxxxxxxxxxxxx>
  • Date: Mon, 18 Jan 1999 08:14:27 -0600

I am guessing here, but I would say that maybe your parms are set up
incorrectly.

Here is how ours are set up for an *insert *after...

 D WPPARM1         DS

 D  File                   1     10

 D  Library               11     20

 D  Member                21     30

 D  T_Event               31     31
1=ins/2=upd/3=del  
 D  T_Time                32     32
1=Bef/2=Aft        
 D  Commit_Lev            33     33

 D  Reserved_1            34     36

 D  CCSID                 37     40B 0

 D  Reserved_2            41     48

 D  O_Offset              49     52B 0   
 D  O_Length              53     56B 0

 D  O_NullOS              57     60B 0

 D  O_NullLn              61     64B 0

 D  N_Offset              65     68B 0

 D  N_Length              69     72B 0

 D  N_NullOS              73     76B 0

 D  N_NullLn              77     80B 0

 D  Reserved_3            81     96

 D  O_Image               97    220
Length = 124   
 D  O_NullMap            221    244
# Records = 24 
 D  N_Image              245    368

 D   *file data fields*  245    368

 D  N_NullMap            369    372  
 

 D WPPARM2         DS                       
 D  T_BuffLen              1      4B 0      
  *                                         

And in the *ENTRY like this...

 C     *ENTRY        PLIST                               
 C                   PARM                    WPPARM1     
 C                   PARM                    WPPARM2     
  *                                                      

The section that says *file data fields* is really broken out into the file
structure...it's not really one field.

Let me know if this helps at all.  If it doesn't, maybe post your D-Spec
source for your parms.

Bradley V. Stone
Taylor Corporation - OASIS Programmer/Analyst   
bvstone@taylorcorp.com


> -----Original Message-----
> From: Staffan Lofberg [SMTP:staffan.lofberg@netorom.se]
> Sent: Monday, January 18, 1999 4:38 AM
> To:   MIDRANGE-L@midrange.com
> Subject:      Re: Insert with trigger
> 
> Brad
> 
> Thank you for helping me.
> 
> The trigger is specified like this:
> 
> *update *after
> *insert *after
> 
> "Stone, Brad V (TC)" wrote:
> 
> > How is your trigger specified?
> >
> > For example.
> >
> > *Update, *After
> > *Update, *Before
> > *Add, *After
> > *Delete, *Before
> > etc...
> >
> > If you have more than one, please specify.
> >
> > Bradley V. Stone
> > Taylor Corporation - OASIS Programmer/Analyst
> > bvstone@taylorcorp.com
> >
> > > -----Original Message-----
> > > From: Staffan Lofberg [SMTP:staffan.lofberg@netorom.se]
> > > Sent: Friday, January 15, 1999 8:05 AM
> > > To:   MIDRANGE-L@midrange.com
> > > Subject:      Re: Insert with trigger
> > >
> > > I'm sorry I didn't tell you the problem in a clear way. It is when I
> > > receive the
> > > update that there is data in the "old stuff" but nothing in the "new
> > > stuff"
> > > section of the parameter. When the program is called when someone adds
> a
> > > new
> > > record in the file none of the sections contains any data.
> > >
> > >
> > > Staffan Lofberg
> > >
> > > "Stone, Brad V (TC)" wrote:
> > >
> > > > On an add, the first parameter ("Old stuff") is the only portion
> that
> > > > contains data.
> > > >
> > > > Bradley V. Stone
> > > > Taylor Corporation - OASIS Programmer/Analyst
> > > > bvstone@taylorcorp.com
> > > >
> > > > > -----Original Message-----
> > > > > From: Staffan Lofberg [SMTP:staffan.lofberg@netorom.se]
> > > > > Sent: Thursday, January 14, 1999 1:14 PM
> > > > > To:   MIDRANGE-L@midrange.com
> > > > > Subject:      Insert with trigger
> > > > >
> > > > > Hello
> > > > >
> > > > > I  am trying to write my first trigger program. It works OK when
> the
> > > > > file is updated but not when I am adding new records to the file.
> When
> > > I
> > > > > looked into the result I saw that I only had information in the
> "old"
> > > > > section and not in the "new" section of the parameter.
> > > > >
> > > > > What have I missed?
> > > > >
> > >
> 
> ------------------------------------------------------------------
> Netorom AB              Phone +46 40 6712272
> P.O. Box 9160           Fax   +46 40 940128
> S-200 39  Malmö         http://risc.netorom.se
> Sweden                  mailto:staffan.lofberg@netorom.se
> 
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to
> MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
> david@midrange.com
> +---
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].