home *** CD-ROM | disk | FTP | other *** search
/ High Voltage Shareware / high1.zip / high1 / DIR36 / C7101.ZIP / WARNINGS.TPX < prev   
Text File  |  1994-01-12  |  13KB  |  235 lines
  1. #!┌───────────────────────────┤Template Segment├───────────┬─────────────────┐
  2. #!│                              Warnings.TPX              │Version: 3007.000│
  3. #!├───────────────────────────────┤Contents├───────────────┴─────────────────┤
  4. #!│Structure             Type       Description                              │
  5. #!│────────────────────  ─────────  ─────────────────────────────────────────│
  6. #!│InvalidFileMsg        GROUP                                               │
  7. #!│BadKeyMsg             GROUP                                               │
  8. #!│KeyBuildErrorMsg      GROUP                                               │
  9. #!│PrinterOffLineMsg     GROUP                                               │
  10. #!│PrintDeviceError      GROUP                                               │
  11. #!│DelTempFileErrMsg     GROUP                                               │
  12. #!│NotEnoughMemMsg       GROUP                                               │
  13. #!│GeneralErrorMsg       GROUP                                               │
  14. #!│KeyedRecordReadMsg    GROUP                                               │
  15. #!│RecordChangedMsg      GROUP                                               │
  16. #!│BadTrxPrimaryMsg      GROUP                                               │
  17. #!│BadTrxChildMsg        GROUP                                               │
  18. #!│ParentLockedMsg       GROUP                                               │
  19. #!│ParentWriteErrMsg     GROUP                                               │
  20. #!│FileSizeWarningMsg    GROUP                                               │
  21. #!│FileTooLargeMsg       GROUP                                               │
  22. #!│FieldValueTooHigh     GROUP                                               │
  23. #!│FieldValueTooLow      GROUP                                               │
  24. #!│FieldValueOutOfRange  GROUP                                               │
  25. #!│ParentRecordNotFound  GROUP                                               │
  26. #!│RIRestrictMsg         GROUP                                               │
  27. #!│AbortTransactionMsg   GROUP                                               │
  28. #!│RIUpdateError         GROUP                                               │
  29. #!│RIDeleteError         GROUP                                               │
  30. #!│TransactionLockMsg    GROUP                                               │
  31. #!│TransactionErrorMsg   GROUP                                               │
  32. #!│RIRecNotAvailMsg      GROUP                                               │
  33. #!│TransactionHeldMsg    GROUP                                               │
  34. #!│UnableToContinueMsg   GROUP                                               │
  35. #!│LineTooLongMsg        GROUP                                               │
  36. #!│ToDoMsg               GROUP                                               │
  37. #!├───────────────────────────────┤Comments├─────────────────────────────────┤
  38. #!│Version   Comments                                                        │
  39. #!│────────  ────────────────────────────────────────────────────────────────│
  40. #!│3007.000  Release of CDD3 version 3007 templates                          │
  41. #!└──────────────────────────────────────────────────────────────────────────┘
  42. #!
  43. #!****************************************************************************
  44. #GROUP(%InvalidFileMsg)
  45. GLO:Message1 = 'Error accessing: '& NAME(File)
  46. GLO:Message2 = 'Code: ' & ERRORCODE() & ' ' & ERROR()
  47. GLO:Message3 = 'Press OK to return to DOS'
  48. ShowWarning
  49. #!****************************************************************************
  50. #GROUP(%BadKeyMsg)
  51. GLO:Message1 = NAME(File) & ' Key file is invalid'
  52. GLO:Message3 = 'Press OK to rebuild keyfile'
  53. ShowWarning
  54. #!****************************************************************************
  55. #GROUP(%KeyBuildErrorMsg)
  56. GLO:Message1 = NAME(File) & ' The file cannot be repaired'
  57. GLO:Message2 = 'while other stations are using it'
  58. GLO:Message3 = 'Press OK to return to DOS'
  59. ShowWarning
  60. #!****************************************************************************
  61. #GROUP(%PrinterOffLineMsg)
  62. GLO:Message1 = 'The Printer is OffLine!'
  63. GLO:Message3 = 'Please Correct the Situation!'
  64. ShowWarning                                      #<! Show an error message
  65. #!****************************************************************************
  66. #GROUP(%PrintDeviceError)
  67. GLO:Message1 = CLIP(PrintDevice) & ' is not ready.'
  68. GLO:Message2 = 'Be sure the Printer is online and attached to'
  69. GLO:Message3 = 'the specified device and try again.'
  70. ShowWarning                                      #<! Show an error message
  71. #!****************************************************************************
  72. #GROUP(%DelTempFileErrMsg)
  73. GLO:Message1 = 'Could not delete temporary file'
  74. GLO:Message3 = TempFile
  75. ShowWarning
  76. #!****************************************************************************
  77. #GROUP(%NotEnoughMemMsg)
  78. GLO:Message1 = 'Not Enough Memory to proceed'
  79. GLO:Message3 = 'with this operation . . . . '
  80. ShowWarning
  81. #!****************************************************************************
  82. #GROUP(%GeneralErrorMsg)
  83. GLO:Message1 = ERRORCODE() & ' ' & ERROR()
  84. GLO:Message3 = 'Unable to continue . . . .'
  85. ShowWarning
  86. #!****************************************************************************
  87. #GROUP(%KeyedRecordReadMsg)
  88. GLO:Message1 = 'Unable to READ keyed record'
  89. GLO:Message2 = 'Cannot continue update....'
  90. GLO:Message3 = 'Error: '&ERRORCODE() & ' ' & ERROR()
  91. ShowWarning
  92. #!****************************************************************************
  93. #GROUP(%RecordChangedMsg)
  94. GLO:Message1 = 'The Record was changed by another station '
  95. GLO:Message2 = 'your screen now reflects the changed data '
  96. GLO:Message3 = 'OK button to continue, or CANCEL to abort '
  97. ShowWarning
  98. #!****************************************************************************
  99. #GROUP(%BadTrxPrimaryMsg)
  100. GLO:Message1 = 'Unable to save your changes at this time.'
  101. GLO:Message2 = 'Another user may be saving a transaction.'
  102. GLO:Message3 = 'Try again.'
  103. ShowWarning
  104. #!****************************************************************************
  105. #GROUP(%BadTrxChildMsg)
  106. GLO:Message1 = 'Unable to save your changes at this time.'
  107. GLO:Message2 = 'Error: '& ERROR()
  108. GLO:Message3 = 'Make any necessary changes and try again.'
  109. ShowWarning
  110. #!****************************************************************************
  111. #GROUP(%ParentLockedMsg)
  112. GLO:Message1 = 'This %ParentFile Entry is being updated'
  113. GLO:Message3 = 'by another user.  Try again later. '
  114. ShowWarning
  115. #!****************************************************************************
  116. #GROUP(%ParentWriteErrMsg)
  117. GLO:Message1 = 'Unable to save %ParentFile Entry.'
  118. GLO:Message2 = 'Error: '& ERROR()
  119. GLO:Message3 = 'The entry has not been saved.'
  120. ShowWarning
  121. #!****************************************************************************
  122. #GROUP(%FileSizeWarningMsg)
  123. GLO:Message1 = 'This is a large file and may take a while'
  124. GLO:Message2 = 'to load.  You may press the Esc key'
  125. GLO:Message3 = 'while the file is loading to exit.'
  126. ShowWarning                                  ! Show a warning screen
  127. #!****************************************************************************
  128. #GROUP(%FileTooLargeMsg)
  129. GLO:Message1 = 'Error: ' & ERROR()         ! Create the error message
  130. GLO:Message2 = 'This file is too large to be read into memory.'
  131. GLO:Message3 = 'The entire file will not be displayed.'
  132. ShowWarning                                !  Show the error message
  133. #!****************************************************************************
  134. #GROUP(%FieldValueTooHigh)
  135. #IF(%ScreenFieldPrompt)
  136. GLO:Message1 = 'The value entered in %ScreenFieldPrompt'
  137. #ELSE
  138. GLO:Message1 = 'The value entered in %FieldID'
  139. #ENDIF
  140. GLO:Message3 = 'cannot exceed %FieldRangeHigh'
  141. ShowWarning                                !  Show the error message
  142. #!****************************************************************************
  143. #GROUP(%FieldValueTooLow)
  144. #IF(%ScreenFieldPrompt)
  145. GLO:Message1 = 'The value entered in %ScreenFieldPrompt'
  146. #ELSE
  147. GLO:Message1 = 'The value entered in %FieldID'
  148. #ENDIF
  149. GLO:Message3 = 'cannot be less than %FieldRangeHigh'
  150. ShowWarning                                !  Show the error message
  151. #!****************************************************************************
  152. #GROUP(%FieldValueOutOfRange)
  153. #IF(%ScreenFieldPrompt)
  154. GLO:Message1 = 'Valid entries for %ScreenFieldPrompt'
  155. #ELSE
  156. GLO:Message1 = 'Valid entries for %FieldID'
  157. #ENDIF
  158. GLO:Message3 = 'are from %FieldRangeLow TO %FieldRangeHigh'
  159. ShowWarning                                !  Show the error message
  160. #!****************************************************************************
  161. #GROUP(%ParentRecordNotFound)
  162. GLO:Message1 = 'Error: ' & ERRORCODE() & ' '& ERROR() #<! Build error message
  163. GLO:Message2 = 'The value you enter must exist in the'#<!Tell User what to do
  164. #IF(%FileDescription)                            #! If a Description Provided
  165. GLO:Message3 = '%FileDescription File'           #<! Identify the Lookup file
  166. #ELSE                                            #! ELSE (No Description)
  167. GLO:Message3 = 'File: %FieldLookup'              #<! Identify the Lookup file
  168. #ENDIF                                           #! END (If Description...)
  169. ShowWarning                                      #<! Show the error message
  170. #!****************************************************************************
  171. #GROUP(%RIRestrictMsg)
  172. GLO:Message1 = 'This record is referenced from other file(s)'
  173. GLO:Message2 = 'Linking field(s) have been restricted from'
  174. GLO:Message3 = 'change and have been reset to original values'
  175. ShowWarning                                      ! Show the warning message
  176. #!****************************************************************************
  177. #GROUP(%AbortTransactionMsg)
  178. GLO:Message1 = 'Unable to complete the transaction'
  179. GLO:Message2 = 'Error: ' & ERRORCODE() & ' ' & ERROR()
  180. GLO:Message3 = 'Files have been restored to original values'
  181. ShowWarning                                      ! Show warning
  182. #!****************************************************************************
  183. #GROUP(%RIUpdateError)
  184. GLO:Message1 = 'Unable to complete the Referential Update'
  185. GLO:Message2 = 'Error: ' & ERRORCODE() & ' ' & ERROR()
  186. GLO:Message3 = 'File: %Primary could not be updated !'
  187. ShowWarning                                      ! Show the warning message
  188. #!****************************************************************************
  189. #GROUP(%RIDeleteError)
  190. GLO:Message1 = 'Unable to complete the Referential Delete'
  191. GLO:Message2 = 'Error: ' & ERRORCODE() & ' ' & ERROR()
  192. GLO:Message3 = 'File: %Primary could not be deleted !'
  193. ShowWarning                                      ! Show the warning message
  194. #!****************************************************************************
  195. #GROUP(%TransactionLockMsg)
  196. glo:Message1 = 'The transaction cannot be completed at '
  197. glo:Message2 = 'at this time.  One or more of the files'
  198. glo:Message3 = 'is already locked.  You may retry the operation'
  199. ShowWarning                                      ! Show warning
  200. #!****************************************************************************
  201. #GROUP(%TransactionErrorMsg)
  202. glo:Message1 = 'The transaction cannot be completed'
  203. glo:Message2 = 'at this time.  The error posted was: '
  204. glo:Message3 = ERROR()
  205. ShowWarning                                      ! Show warning
  206. #!****************************************************************************
  207. #GROUP(%RIRecNotAvailMsg)
  208. GLO:Message1 = 'Unable to complete the transaction'!Prepare warning message
  209. GLO:Message3 = 'Updated Record is no longer available'!Prepare warning message
  210. ShowWarning                                      ! Show warning
  211. #!****************************************************************************
  212. #GROUP(%TransactionHeldMsg)
  213. GLO:Message1 = 'The Record is locked by another workstation '
  214. GLO:Message2 = 'when you return to the entry FORM choose OK '
  215. GLO:Message3 = 'to try the update again, or CANCEL to abort '
  216. ShowWarning                                      #<!Show user a warning
  217. #!****************************************************************************
  218. #GROUP(%UnableToContinueMsg)
  219. GLO:Message2 = 'Unable to continue, Press OK to exit'
  220. ShowWarning                                      #<!Notify the user
  221. #!****************************************************************************
  222. #GROUP(%LineTooLongMsg)
  223. GLO:Message1 = 'The line length is greater than %FileLineLength.'
  224. GLO:Message2 = 'The selected file is not an ASCII file.'
  225. GLO:Message3 = 'No view on this file is available.'
  226. ShowWarning                                      #<! Show an error message
  227. #!****************************************************************************
  228. #GROUP(%ToDoMsg)
  229. GLO:Message1 = 'The Procedure'                   #<! set First Message Line
  230. GLO:Message2 = '%MessageLine2'                   #<! set Second Message Line
  231. GLO:Message3 = 'Has Not Yet Been Defined'        #<! set Third Message Line
  232. ShowWarning                                      #<! and inform the user
  233. #!****************************************************************************
  234. #CHAIN('CPD21.TPX')
  235.