home *** CD-ROM | disk | FTP | other *** search
/ The Developer Connection…ice Driver Kit for OS/2 3 / DEV3-D1.ISO / devtools / dataflex / dfhelp_b.pkg < prev    next >
Encoding:
Text File  |  1993-05-19  |  2.4 KB  |  79 lines
  1. // dfhelp_b.pkg (secondary help maintenance program [B]) header package
  2. // July 2, 1991
  3. // LS
  4.  
  5. #CHKSUB 1 1 // Verify the UI subsystem.
  6.  
  7. inherit_screen // use current screen (from parent .flx) as background
  8.  
  9. //////////////////////////////////
  10. ////////////////////////////////// macro commmands
  11. //////////////////////////////////
  12.  
  13. #COMMAND DEFINE_SYMBOL R "FOR" R // like #REPLACE, but only if not yet defined
  14.   #IFDEF !1
  15.   #ELSE
  16.     #REPLACE !1 !3
  17.   #ENDIF
  18. #ENDCOMMAND
  19.  
  20. #COMMAND USE_FILE R // declares fields in a database file without opening it
  21.   #IFDEF !1.RECNUM
  22.   #ELSE
  23.     #INCLUDE !1.FD
  24.   #ENDIF
  25.  
  26.   #IFDEF !1.FILE_NUMBER
  27.   #ELSE
  28.     #SET Q$ !1.RECNUM
  29.     #REPLACE !1.FILE_NUMBER |CI!q
  30.   #ENDIF
  31.  
  32.   #IF (!0>1)
  33.     USE_FILE !2 !3 !4 !5 !6 !7 !8 !9
  34.   #ENDIF
  35. #ENDCOMMAND
  36.  
  37. //////////////////////////////////
  38. ////////////////////////////////// symbol definitions
  39. //////////////////////////////////
  40.  
  41. DEFINE_SYMBOL VALID_OPTIONS      FOR 'GSX' // passed command line options values
  42. DEFINE_SYMBOL GRP_MAINT_OPTION   FOR 'G'
  43. DEFINE_SYMBOL SBJ_MAINT_OPTION   FOR 'S'
  44. DEFINE_SYMBOL XRF_MAINT_OPTION   FOR 'X'
  45.  
  46. DEFINE_SYMBOL SUCCESS_REPLY      FOR 'Y'
  47. DEFINE_SYMBOL FAIL_REPLY         FOR 'N'
  48. DEFINE_SYMBOL ABORT_REPLY        FOR 'A'
  49.  
  50. DEFINE_SYMBOL MAX_LINES_ALLOWED  FOR 32767
  51.  
  52. DEFINE_SYMBOL EMPTY_STRING       FOR ('')
  53. DEFINE_SYMBOL EMPTY_REPL_STRING  FOR ('@')
  54.  
  55. DEFINE_SYMBOL F1_HELP_TEXT       FOR ('<F1=Help>')
  56. DEFINE_SYMBOL F2_OK_TEXT         FOR ('<F2=OK>')
  57. DEFINE_SYMBOL F4_PROMPT_TEXT     FOR ('<F4=Prompt>')
  58. DEFINE_SYMBOL ESC_CANCEL_TEXT    FOR ('<Esc=Cancel>')
  59. DEFINE_SYMBOL ESC_CLOSE_TEXT     FOR ('<Esc=Close>')
  60.  
  61. //////////////////////////////////
  62. ////////////////////////////////// packages
  63. //////////////////////////////////
  64.  
  65. use enterr          // error package (ignores find errors)
  66. use help_chn        // global help package
  67. use data_set        // data set file mgmt class
  68. use entryfrm        // entry form data entry class
  69. use key_btn         // key button accelerator key button class
  70. use menu            // menu package; includes action bar and pull-down menu classes
  71. use table           // table data entry class
  72. use dfh_util        // help maintenance utility classes
  73.  
  74. use_file grp sbj xrf ctx  // declare files and fields w/o opening files
  75.  
  76. set application_name to "SYSTEM"
  77. set module_name to "DFHELP" // act like part of DFHELP program module
  78.  
  79.