PICK

Contents


Pick is used to find the records selected and deselected from a pick box.

Syntax

Pick abrev

 

Parameters

Element

Description

Restrictions

abrev

Abbreviation indicating the pick box

The box must be open

 

Examples

#opening the table (with key: yitmref,yuom,yvatrat)
If !clalev([F:ZMT]) : Local File ZMOTTBX [ZMT] : Endif

# display of treebox elements
Treebox [ZMT] SEL
& [F:ZMT]YITMREF Titled "",
& [F:ZMT]YUOM Titled "",
& [F:ZMT]YVATRAT Titled ""
& Sized(160,240)
& Titled "Pick window"
& At(40,40)
& As [PIC]
Boxact [PIC]
Fillbox [PIC]

# entry in tree-structure pick box
$SAIPIC
Boxinp [PIC] Using RESU
Case RESU
When GSTAPIC
  Repeat
 
Pick [PIC]
  Case status
    When 7  : Break
    When 37 : Gosub SELECTION
    When 41 : Gosub DESELECTION
  Endcase
  Until 1=0
When GSTAPKF : Goto FIN
When GSTAESC, GSTAFIN : Goto FIN
Endcase
Goto SAIPIC

 

Description and comments

Pick is used to find the records selected and deselected from a pick box. This pick box may be either:

·         a simple box (Listbox)

·         a treebox

·         a treebox with fields for input (Pickbox)

The Boxinp instruction is used to select or deselect several records, then the entry is validated with by pressing the "Apply" button. At this point the pick instruction, executed for each record selected or deselected, returns the status in the Status variable, as well as the class [F] of the primary key.

The statuses returned by the Boxinp instruction are:

Status

Global

Description

7

GSTAESC

Output of mask on which the pick box is based

42

GSTAPIC

Output of pick box with validation by the "Apply" button

44

GSTAPKF

Output of pick box without validation

 

The statuses returned by the Pick instruction are:

Status

Description

7

end

28

Selection in a simple box

37

Selection in a treebox

41

Deselection in a treebox

43

Deselection in a simple box

 

Associated errors

Error

Description

 

 

 

Associated key words

Treebox  -  Listbox  Pickbox  -  Boxact  -   Fillbox  -  Currbox  -  Setlbox  -   Dislbox


CONTENTS


Copyright © Sage 1999 - 2007