TIPS:PASSDATA
path: MODIFIER:@ > MODIFIER:ID-SUPP > NUWIKI > DEFINITION:SCREEN DICTIONARY > TIPS:PASSDATA

Tips and Techniques

Passing Data between Nucleus screens

Data can be easily passed from one Nucleus screen to another using the Passlist technique.

Concept

Data is written to the temporary workspace of the individual user by the calling screen. The called screen reads the item and displays the data.

A Passlist may be incorporated as:

  • Postfield Event
  • Verify Event
  • Read Event
  • Special Event

Illustration

Read-time event (1400 * READ) Essentially what happens, is that one program will write data out to the local LISTS,PORT file i.e. - fv.Lists, which is then read by a Nucleus screen as a read event.

See SUBS.PARTS.MA in the NUC.DEMO account

Example

 
 
156 ModifyPrice:
157 Passlist = ''
158 Passlist<1>=id.Item
159 Passlist<2>=fld$DESC
160 Passlist<3>=fld$PRODGP
161 *
162 Passlist<4>=fld$PRICE.1
163 Passlist<5>=fld$PRICE.2 
164 Passlist<6>=fld$PRICE.3
165 Passlist<7>=fld$PRICE.4
166 Passlist<8>=fld$PRICE.5
167 Passlist<9>=fld$PRICE.6
168 *
169 WRITE Passlist ON fv.Lists,"PRICING.MA"
170 cmd=\WIN SCR.PRICING.MA \
171 {SHL(cmd)}

At this point, the SCR.PRICING.MA screen is being serviced.

On exit from the SCR.PRICING.MA screen, the following occurs

 
172 READ Passlist FROM fv.Lists,"PRICING.NEW" THEN
173   fld$PRICE.1 = Passlist<4>
174   fld$PRICE.2 = Passlist<5>
175   fld$PRICE.3 = Passlist<6>
176   fld$PRICE.4 = Passlist<7>
177   fld$PRICE.5 = Passlist<8> 
178   fld$PRICE.6 = Passlist<9>
179   RedisplayList = "PRICE.1":AM:"PRICE.6"
180   flag.dataChanged = TRUE
181 END
182 RETURN

See Also