home *** CD-ROM | disk | FTP | other *** search
/ Media Share 9 / MEDIASHARE_09.ISO / clarion / unalert.zip / UAMAIN.CLA < prev    next >
Text File  |  1988-08-02  |  3KB  |  88 lines
  1.          TITLE('- Unalert Main Program')
  2.          SUBTITLE('PROGRAM DEFINITION')
  3.  
  4. unalrt         PROGRAM
  5.  
  6.  
  7.   OMIT('END OMIT')
  8.   ┌──────────────────────────────────────────────────────────────────────────┐
  9.   │                                         │
  10.   │        CLARION Structure Prefixes                     │
  11.   │                                         │
  12.   │          a_    ASCII [Text] File (DOS,ASCII)                 │
  13.   │          b_    Binary File (DOS)                     │
  14.   │          c_    CLARION File (FILE)                     │
  15.   │          d_    Detail (REPORT)                         │
  16.   │          h_    Header (REPORT)                         │
  17.   │          i_    Index (INDEX)                         │
  18.   │          j_    Group (GROUP)                         │
  19.   │          k_    Key (KEY)                         │
  20.   │          m_    Memory Table (TABLE)                     │
  21.   │          o_    Window [Float] (SCREEN,WINDOW)                 │
  22.   │          q_    ASCII [Delimited] File (DOS,COMMA)             │
  23.   │          r_    Report (REPORT)                         │
  24.   │          s_    Screen (SCREEN)                         │
  25.   │          w_    Window [Fixed] (SCREEN,WINDOW AT)             │
  26.   │          x_    Record (RECORD)                         │
  27.   │          y_    Help Screen (HELP)                     │
  28.   │          z_    Footer (REPORT)                         │
  29.   │                                         │
  30.   ├──────────────────────────────────────────────────────────────────────────┤
  31.   │                                         │
  32.   │        CLARION Field/Variable Prefixes                     │
  33.   │                                         │
  34.   │          a??:    ASCII [Text] Field                     │
  35.   │          b??:    Binary Field                         │
  36.   │          c??:    CLARION Field                         │
  37.   │          d??:    Detail Field                         │
  38.   │          ext:    External Parameter                     │
  39.   │          flg:    Flag/Status/Boolean                     │
  40.   │          glc:    Global Constant                         │
  41.   │          glv:    Global Variable                         │
  42.   │          h??:    Header Field                         │
  43.   │          j??    Group Field                         │
  44.   │          lcv:    Loop/Counter Variable                     │
  45.   │          m??:    Memory Table Field                     │
  46.   │          o??:    Window [Float] Field                     │
  47.   │          par:    Parameter                         │
  48.   │          ptr:    Pointer                             │
  49.   │          q??:    ASCII [Delimited] Field                     │
  50.   │          rtn:    Return Value                         │
  51.   │          s??:    Screen Field                         │
  52.   │          tmp:    Temporary Variable                     │
  53.   │          use:    USE Variable                         │
  54.   │          var:    Variable                         │
  55.   │          w??:    Window [Fixed] Field                     │
  56.   │          z??:    Footer Field                         │
  57.   │                                         │
  58.   └──────────────────────────────────────────────────────────────────────────┘
  59.   END OMIT
  60.  
  61.          EJECT('PROCEDURE/FUNCTION MAP')
  62.  
  63.          MAP
  64.            MODULE('UATEST')
  65.          PROC(test)
  66.            END !MODULE
  67.  
  68.            MODULE('UALIB')
  69.          PROC(unalert)
  70.            END !MODULE
  71.  
  72.            INCLUDE('ALRT.CLI')
  73.          END !MAP
  74.  
  75.          EJECT('GENERAL EQUATES')
  76.  
  77.          INCLUDE('STD_DEFS.CLI'),LIST
  78.  
  79.          EJECT('KEY DEFINITION EQUATES')
  80.  
  81.          INCLUDE('STD_KEYS.CLI'),LIST
  82.  
  83.          EJECT('MAIN PROGRAM CODE')
  84.  
  85.          CODE
  86.            test
  87.  
  88.