home *** CD-ROM | disk | FTP | other *** search
/ Windows Aktuell 1995 December & 1996 January / WA120196.BIN / omnis7 / convert / copylib.lbr (.txt) < prev   
Omnis Studio Database  |  1994-10-07  |  72KB  |  548 lines
  1. CMDSI292666
  2.  !"#$%&'()*+,-./0123456789AaBbCcDdEeFfGgHhIiJjKkLlMm:;<=>?@NnOoPpQqRrSsTtUuVvWwXxYyZz[\]^_`{|}~
  3. #SLOTS
  4. #INDEXES
  5. #APPLICATION
  6. #INDEXES
  7. #SLOTS
  8. #APPLICATION
  9. #BFORMS
  10. #COLORMAP
  11. #COLORS
  12. #DFORMS
  13. #LIBVARS
  14. #MARFONTS
  15. #MASKS
  16. #MAWFONTS
  17. #NFORMS
  18. #TFORMS
  19. #WIRFONTS
  20. #WIWFONTS
  21. ANSWER_BIG
  22. ASK_BIG
  23. LIBRARY COPI
  24. PROGRESS_BAR
  25. SPLASH
  26. STARTUP
  27. #NFORMS
  28. 0..//.
  29.     #COLORMAP
  30. #DFORMS
  31. #COLORS
  32. 0..//.,
  33.     #WIRFONTS
  34.     #WIWFONTS
  35. #D:\CMSTEST\NASA\CONVERT\NASAVCS.DF1
  36. '''''''''''''''''
  37. ..//.
  38. 0..//.,
  39. D m Y
  40. H:N:S
  41. H:N:S.s
  42. D m Y  H:N
  43. D m Y  H:N:S
  44. D m Y  H:N:S.s
  45. 0..//.,
  46. Arial
  47. "Courier New
  48. 1Times New Roman
  49. Omnis Sans Serif
  50. System
  51. "Omnis Monospace
  52. 0..//.,
  53. Arial
  54. "Courier
  55. 1Helv
  56. MS Sans Serif
  57. Times
  58. 0..//.,
  59. answer_big/20
  60. There are '
  61.  protec
  62. #TFORMS
  63. 0..//.,
  64. '('@@@')' @@@'-'@@
  65. #BFORMS
  66. 0..//.,
  67. [GREEN]O;[RED]O
  68. [GREEN]Y;[RED]Y
  69. #,##0
  70. #,##0.00
  71. #,##0;[RED](#,##0)
  72. #,##0.00 'cr';#,##0.00 'dr'
  73. ' #,##0;[RED]'
  74. '-#,##0;;'Nil'
  75. '$' #,##0;[RED]'$'-#,##0;;'Nil'
  76. 0.00%    0.00 E+00    0.00 E-00
  77. #MASKS
  78. 0..//.,
  79. >>(###) ###-####
  80. >>(###) ###-#### Ext(#####)
  81. >>(####) ######
  82. >>(####) ###### Ext.###
  83. >>#### #### #### ####
  84. >>###-###-###
  85. >>aa ## ## ## a
  86. >>##-aaa-##
  87. >>##-aaa-####
  88. @@#'('@@@')' @@@'-'@@@@ 'Ext('@@@@@')'
  89. '('@@@@')' @@@@@@
  90. '('@@@@')' @@@@@@ 'Ext.'@@@
  91. @@@@ @@@@ @@@@ @@@@
  92. @@@'-'@@@'-'@@@
  93. @@ @@ @@ @@ @U
  94.     #MARFONTS
  95. #LIBVARS
  96. gProgre@
  97. Progress_Bar
  98. /Shows incremental progress of a
  99. STARTUP
  100.     #MAWFONTS
  101. 0..//.,
  102. Helvetica
  103. 1Courier
  104. 1Times
  105. 1Geneva
  106. 1Chicago
  107. 1Monaco
  108. Splash
  109. Library Copier
  110. Main windowg
  111. ask_big
  112. (Larger window used to ask user for inputg
  113. answer_big
  114. 5Permits the user to choose one of up to three choicesg
  115.  repetitive taskg
  116. ssMsg
  117. GPROGR
  118. Progress_Bar
  119. g5g1g
  120. g4g4g
  121. gJg@g
  122. Cancelq
  123. gVgLq
  124. g4g4g
  125. '''''
  126. start_val'
  127. end_val'
  128. prompt_msg'
  129. Cancel'
  130. gProgressMsg'
  131. cur_val'
  132. background'
  133. progress_bar'
  134. progress bar set up'
  135. %&Progress_Bar/[
  136. Cancel
  137. ,    start_val
  138. only show the start and end values if there are at least one iteration
  139. end_val
  140. cur_val
  141. only show the middle value if there are 2 or more iterations
  142. //'background']
  143. Calculate whole_bar_width as $cwind.$bobjs.1002.$width
  144. this is needed to zero out the true fractional beginning of the bar width
  145. to ge
  146. t around general cross window redraw problem
  147. show_cancel
  148. start_val_in
  149. end_val_in
  150.     show_vals
  151. prompt_msg_in
  152. screen_height
  153. win_height
  154. screen_width
  155.     win_width
  156. END_VA
  157. PROMPT
  158. SCREEN
  159. SCREEN
  160. SHOW_C
  161. SHOW_V
  162. START_
  163. WIN_HE
  164. WIN_WI
  165. progress 
  166. bar increment'
  167. Calculate $cwind.$objs.1007.$contents as increment_msg_in (Redraw field)
  168. minus two because the inner bar fits inside the bigger bar
  169. //'progress_bar']
  170. 0'sde
  171. Return with flag true unless cancel button hit...
  172. increment_msg_in
  173.     bar_width
  174. increment_amount
  175. BAR_WI
  176. INCREM
  177. INCREM
  178. Request for Decision'
  179. Notification'
  180. ''gAg
  181. prompt_msg'
  182. cancel_one'
  183. cancel_two'
  184. Icon'
  185. ask for decision - big'
  186. affirm_answer is the default OK response - changed only if they hit the third button
  187. &answer_big'
  188. //'cancel_one']
  189. gInfo
  190. //'cancel_two']
  191. gInfo
  192. info'
  193. //'Ic
  194. gInfo
  195. warn'
  196. //'Icon']
  197. gWarn
  198. danger'
  199. //'Icon']
  200. gDanger
  201. //'Icon']
  202. gInfo
  203. answer_big
  204. msg_in!
  205. butt_one!
  206. butt_two!
  207. butt_three!
  208.     icon_mode
  209. BUTT_O
  210. BUTT_T
  211. BUTT_T
  212. ICON_M
  213. MSG_IN
  214. Request for Information
  215. YgigRg
  216. gmgJg
  217. Cancelq
  218. prompt_msg'
  219. the_answer'
  220. Cancel'
  221. Icon'
  222. ask for input - big'
  223. ask_big
  224. info'
  225. //'Icon']
  226. request'
  227. //'Icon']
  228. gRequest
  229. //'Icon']
  230. gRequest
  231. Cancel!!'
  232. ask_big
  233. msg_in!
  234. default_ans_in!
  235.     icon_mode
  236. DEFAUL
  237. ICON_M
  238. MSG_IN
  239. 0'sdf
  240. Library Copier
  241. gjgAg
  242. Copy...q
  243. Open...q
  244. g(gAg
  245. Closeq
  246. Copy by identd
  247. Compare sizes after copyingd
  248. Compare procedure texts after copyingd
  249. Check library variables after copyingd
  250. Window Init'
  251. fLibList'
  252. Select the library to be copied from this list.'
  253. '''s~
  254. Copy Library'
  255. Click this button to copy the selected library.'
  256. Open...'
  257. Click this button to open a library not shown in the list.'
  258. Close'
  259. Click this button to close the selected library.'
  260. Copy by ident'
  261. Check this box to copy formats by ident (vs. alphabetically).'
  262. Compare sizes after copying'
  263. Check this box to compare format sizes after copying.'
  264. Compare procedure texts after copying'
  265. Check this box to compare all procedure texts (slow, but thorough).'
  266. Check library variables after copying'
  267. Check this box to check library variable definitions a
  268. fter copying formats.'
  269. Build Lib List'
  270. Copy Selected Library'
  271. answer_big/20
  272. 'Could not access library '
  273. 'warn'
  274. 'New Library'
  275. 'Save as:'
  276. Progress_Bar
  277. answer_big/20
  278. Can''t create '
  279. warn'
  280. libRef
  281. %%result
  282. %%path
  283. targetLibRef
  284. %%PATH
  285. %%RESU
  286. LIBREF
  287. TARGET
  288. y All Formats'
  289. Progress_Bar/10
  290. 'COPY '
  291. Progress_Bar/11
  292. 'Prescanning formats...'
  293. ted formats!  This library cannot be copied!'
  294. warn'
  295. Progress_Bar/11
  296. 'Setting attributes...'
  297. safety kludge
  298. 'pSourceLibRef.$prefs.'
  299. 'pTargetLibRef.$prefs.'
  300. answer_big/20
  301. An error occurred while setting attributes in the target library!'
  302. warn'
  303. 'STARTUP'
  304. Progress_Bar/11
  305. Checking '
  306. answer_big/20
  307. Size of f
  308. ormat data for '
  309.  has changed!'
  310. Continue'
  311. Stop'
  312. warn'
  313. Continue'
  314. pSourceLibRef
  315. pTargetLibRef
  316. fmtList
  317. fmtName
  318. fmtType
  319. fmtIdent
  320. %%attrname
  321. oldDesignLib
  322. attName
  323.     attAssign
  324. fmtRef1
  325. fmtRef2
  326. %%result
  327. fmtProtect
  328. %%ATTR
  329.     %%N1
  330. %%RESU
  331. ATTASS
  332. ATTNAM
  333. FMTIDE
  334. FMTLIS
  335. FMTNAM
  336. FMTPRO
  337. FMTREF
  338. FMTREF
  339. FMTTYP
  340. OLDDES
  341. PSOURC
  342. PTARGE
  343. Copy Selected Formats'
  344. Progress_Bar/11
  345. Copying '
  346. answer_big/20
  347. An error occurred while copying '
  348. warn'
  349. answer_big/20
  350. Can''t copy '
  351. warn'
  352. 128000
  353. answer_big
  354. Memory is getting low!  Continue?'
  355. danger'
  356. pSourceLibRef
  357. pTargetLibRef
  358. fmtName
  359. fmtType
  360. fmtIdent
  361. fmtRef1
  362. fmtRef2
  363. %%result
  364.     memWarned
  365. pFmtList
  366. %%RESU
  367. FMTIDE
  368. FMTNAM
  369. FMTREF
  370. FMTREF
  371. FMTTYP
  372. MEMWAR
  373.     PFMTLI
  374. PSOURC
  375. PTARGE
  376. Compare Proc Text'
  377.  not '
  378. Continue'
  379. Cancel'
  380. danger'
  381. Continue'
  382. answer_big/20
  383. 'Library variable '
  384. ' appears in '
  385. ' but not in '
  386. INDEX
  387. PFMT1
  388. PFMT2
  389. PROCRE
  390. PROCRE
  391. Check Lib Vars'
  392. Progress_Bar/11
  393. 'Checking library variables...'
  394. answer_big/20
  395. 'Library variable '
  396. ' appears in '
  397. ' butA
  398. CHECKLIB'
  399. STARTUP
  400. 'Library Copier'
  401. 'Splash'
  402. answer_big/20
  403. Procedure texts in '
  404.  not identical!'
  405. Continue'
  406. Cancel'
  407. danger'
  408. Continue'
  409. pFmt1
  410. pFmt2
  411. index
  412. %%result
  413. procRef1
  414. procRef2
  415. Splash
  416. g*g=g
  417. ''gLgZg
  418. Written by Patrick Rigneyq
  419. Init'
  420.  has changed!'
  421. Continue'
  422. Cancel'
  423. danger'
  424. Continue'
  425. pLib1
  426. pLib2
  427. varList
  428. , but is '
  429.  in '
  430. answer_big/20
  431. Continue'
  432. Cancel'
  433. danger'
  434. Continue'
  435. answer_big/20
  436. 'Length of library variable '
  437. ' has changed!'
  438. Continue'
  439. Cancel'
  440. danger'
  441. Continue'
  442. answer_big/20
  443. 'Initial value of library variable '
  444. ntinue'
  445. Cancel'
  446. danger'
  447. Continue'
  448. answer_big/20
  449. Library variable '
  450.  is '
  451.  in '
  452. , but is '
  453.  in '
  454. Continue'
  455. Cancel'
  456. danger'
  457. Continue'
  458. Library variable '
  459.  is '
  460.  in '
  461. varName
  462. varType
  463. varSubType
  464.     varSubLen
  465. varInitVal
  466. varList2
  467. %%result
  468. %%msg
  469. %result
  470. %%MSG
  471. %%RESU
  472. %RESUL
  473. PLIB1
  474. PLIB2
  475. VARINI
  476. VARLIS
  477. VARLIS
  478.     VARNAM
  479. VARSUB
  480. VARSUB
  481. VARTYP
  482. Format Variables'
  483. fLibList
  484. fLibName
  485. fSortIdent
  486. fCheckSizes
  487. fCheckProcText
  488. 0..//.,
  489. Helvetica
  490. 1Courier
  491. 1Times
  492. fCheckLibVars
  493. FCHEC
  494. /.,,g
  495. prompt_msg!
  496. affirm_answer!
  497. cancel_one!
  498. cancel_two!
  499. mod_mode!
  500. the_answer!
  501. display_icon
  502. AFFIRM
  503. CANCEL
  504. CANCEL
  505. DISPLA
  506. MOD_MO
  507. PROMPT
  508. THE_AN
  509. g    gPq
  510. g    gQq
  511. prompt_msg!
  512. the_answer!
  513. display_icon
  514. DISPLA
  515. PROMPT
  516. THE_AN
  517. prompt_msg
  518.     start_val
  519. end_val
  520. cur_val
  521. whole_bar_width
  522. increment_msg
  523. progress_bar
  524. fCancelHit
  525. CUR_VA
  526. END_VA
  527. FCANCE
  528. INCREM
  529. PROGRE
  530. PROMPT
  531. START_
  532. WHOLE_
  533. gNgEq
  534. Currently on :q
  535. Format Variables'
  536. Library Copier v1.4q
  537. gLg?g
  538. Copyright 
  539. FCHECK
  540. FCHECK
  541. FLIBLI
  542. FLIBNA
  543. FSORTI
  544. /.,,g
  545. (c) 1994, Blyth Software, Inc.
  546. All Rights Reservedq
  547. Use this utility to fully convert formats in Omnis 7 version 1 or version 2 libraries to Omnis 7 version 3 format.q
  548.