Tags:
create new tag
view all tags

.PIE SET SECT POSITION

This subroutine sets the position (Normal or Exploded) of the "current" or specified sector specs.


Usage:

      PASS         <sector_pos>               FIELD            SHARE? N
      PASS         <beg_sector_no>            FIELD            SHARE? N
      PASS         <end_sector_no>            FIELD            SHARE? N
      GOSUB    0CD .PIE SET SECT POSITION
      *        Check for error
      IF       0CD .PIE SET SECT POSITION     NE

Description:

This subroutine sets the postion of the sector for the "current" or specified sector(s) to either Normal or Exploded

If <sector_pos> is not received or if the value received is blank, then the position of the sector spec is set to Normal. Valid values are: normal or explode/exploded.

If <beg_sect_no> is "ALL" or "0" and <end_sect_no> is not received or is blank, then the position applies to all pie sectors.

If <beg_sect_no> and <end_sect_no> are both received and are both numeric integers, then the position applies to the range of pie sectors from <beg_sect_no> thru <end_sect_no> and is stored in the corresponding pie sector specs.

If <beg_sect_no> is received and is a numeric integer and <end_sect_no> is not received or is blank, then the position applies only to the <beg_sect_no> pie sector.

If <beg_sect_no> and <end_sect_no> are both not received or are blank, then the position applies to the "current" pie sector and is stored in the "current" pie sector spec.

Any pie sector specs that are referenced but which do not exist are automatically created and initialized so that the position can be stored.

You can use .PIE SET SECT EXP DIST to control the distances between the exploded sectors.

The last pie sector spec updated becomes the "current" pie sector spec.

Comments:

Read what other users have said about this page or add your own comments.


-- JeanNeron - 2011-10-04

Edit | Attach | Watch | Print version | History: r3 < r2 < r1 | Backlinks | Raw View | Raw edit | More topic actions
Topic revision: r3 - 2012-02-24 - JeanNeron
 
This site is powered by the TWiki collaboration platform Powered by PerlCopyright © 2008-2024 by the contributing authors. All material on this collaboration platform is the property of the contributing authors.
Ideas, requests, problems regarding TWiki? Send feedback