CMDSI292666
 !"#$%&'()*+,-./0123456789AaBbCcDdEeFfGgHhIiJjKkLlMm:;<=>?@NnOoPpQqRrSsTtUuVvWwXxYyZz[\]^_`{|}~
#SLOTS
#INDEXES
#APPLICATION
#INDEXES
#SLOTS
#APPLICATION
#BFORMS
#COLORMAP
#COLORS
#DFORMS
#LIBVARS
#MARFONTS
#MASKS
#MAWFONTS
#NFORMS
#TFORMS
#WIRFONTS
#WIWFONTS
ANSWER_BIG
ASK_BIG
LIBRARY COPI
PROGRESS_BAR
SPLASH
STARTUP
#NFORMS
0..//.
	#COLORMAP
#DFORMS
#COLORS
0..//.,
	#WIRFONTS
	#WIWFONTS
#D:\CMSTEST\NASA\CONVERT\NASAVCS.DF1
'''''''''''''''''
..//.
0..//.,
D m Y
H:N:S
H:N:S.s
D m Y  H:N
D m Y  H:N:S
D m Y  H:N:S.s
0..//.,
Arial
"Courier New
1Times New Roman
Omnis Sans Serif
System
"Omnis Monospace
0..//.,
Arial
"Courier
1Helv
MS Sans Serif
Times
0..//.,
answer_big/20
There are '
 protec
#TFORMS
0..//.,
'('@@@')' @@@'-'@@
#BFORMS
0..//.,
[GREEN]O;[RED]O
[GREEN]Y;[RED]Y
#,##0
#,##0.00
#,##0;[RED](#,##0)
#,##0.00 'cr';#,##0.00 'dr'
' #,##0;[RED]'
'-#,##0;;'Nil'
'$' #,##0;[RED]'$'-#,##0;;'Nil'
0.00%	0.00 E+00	0.00 E-00
#MASKS
0..//.,
>>(###) ###-####
>>(###) ###-#### Ext(#####)
>>(####) ######
>>(####) ###### Ext.###
>>#### #### #### ####
>>###-###-###
>>aa ## ## ## a
>>##-aaa-##
>>##-aaa-####
@@#'('@@@')' @@@'-'@@@@ 'Ext('@@@@@')'
'('@@@@')' @@@@@@
'('@@@@')' @@@@@@ 'Ext.'@@@
@@@@ @@@@ @@@@ @@@@
@@@'-'@@@'-'@@@
@@ @@ @@ @@ @U
	#MARFONTS
#LIBVARS
gProgre@
Progress_Bar
/Shows incremental progress of a
STARTUP
	#MAWFONTS
0..//.,
Helvetica
1Courier
1Times
1Geneva
1Chicago
1Monaco
Splash
Library Copier
Main windowg
ask_big
(Larger window used to ask user for inputg
answer_big
5Permits the user to choose one of up to three choicesg
 repetitive taskg
ssMsg
GPROGR
Progress_Bar
g5g1g
g4g4g
gJg@g
Cancelq
gVgLq
g4g4g
'''''
start_val'
end_val'
prompt_msg'
Cancel'
gProgressMsg'
cur_val'
background'
progress_bar'
progress bar set up'
%&Progress_Bar/[
Cancel
,	start_val
only show the start and end values if there are at least one iteration
end_val
cur_val
only show the middle value if there are 2 or more iterations
//'background']
Calculate whole_bar_width as $cwind.$bobjs.1002.$width
this is needed to zero out the true fractional beginning of the bar width
to ge
t around general cross window redraw problem
show_cancel
start_val_in
end_val_in
	show_vals
prompt_msg_in
screen_height
win_height
screen_width
	win_width
END_VA
PROMPT
SCREEN
SCREEN
SHOW_C
SHOW_V
START_
WIN_HE
WIN_WI
progress 
bar increment'
Calculate $cwind.$objs.1007.$contents as increment_msg_in (Redraw field)
minus two because the inner bar fits inside the bigger bar
//'progress_bar']
0'sde
Return with flag true unless cancel button hit...
increment_msg_in
	bar_width
increment_amount
BAR_WI
INCREM
INCREM
Request for Decision'
Notification'
''gAg
prompt_msg'
cancel_one'
cancel_two'
Icon'
ask for decision - big'
affirm_answer is the default OK response - changed only if they hit the third button
&answer_big'
//'cancel_one']
gInfo
//'cancel_two']
gInfo
info'
//'Ic
gInfo
warn'
//'Icon']
gWarn
danger'
//'Icon']
gDanger
//'Icon']
gInfo
answer_big
msg_in!
butt_one!
butt_two!
butt_three!
	icon_mode
BUTT_O
BUTT_T
BUTT_T
ICON_M
MSG_IN
Request for Information
YgigRg
gmgJg
Cancelq
prompt_msg'
the_answer'
Cancel'
Icon'
ask for input - big'
ask_big
info'
//'Icon']
request'
//'Icon']
gRequest
//'Icon']
gRequest
Cancel!!'
ask_big
msg_in!
default_ans_in!
	icon_mode
DEFAUL
ICON_M
MSG_IN
0'sdf
Library Copier
gjgAg
Copy...q
Open...q
g(gAg
Closeq
Copy by identd
Compare sizes after copyingd
Compare procedure texts after copyingd
Check library variables after copyingd
Window Init'
fLibList'
Select the library to be copied from this list.'
'''s~
Copy Library'
Click this button to copy the selected library.'
Open...'
Click this button to open a library not shown in the list.'
Close'
Click this button to close the selected library.'
Copy by ident'
Check this box to copy formats by ident (vs. alphabetically).'
Compare sizes after copying'
Check this box to compare format sizes after copying.'
Compare procedure texts after copying'
Check this box to compare all procedure texts (slow, but thorough).'
Check library variables after copying'
Check this box to check library variable definitions a
fter copying formats.'
Build Lib List'
Copy Selected Library'
answer_big/20
'Could not access library '
'warn'
'New Library'
'Save as:'
Progress_Bar
answer_big/20
Can''t create '
warn'
libRef
%%result
%%path
targetLibRef
%%PATH
%%RESU
LIBREF
TARGET
y All Formats'
Progress_Bar/10
'COPY '
Progress_Bar/11
'Prescanning formats...'
ted formats!  This library cannot be copied!'
warn'
Progress_Bar/11
'Setting attributes...'
safety kludge
'pSourceLibRef.$prefs.'
'pTargetLibRef.$prefs.'
answer_big/20
An error occurred while setting attributes in the target library!'
warn'
'STARTUP'
Progress_Bar/11
Checking '
answer_big/20
Size of f
ormat data for '
 has changed!'
Continue'
Stop'
warn'
Continue'
pSourceLibRef
pTargetLibRef
fmtList
fmtName
fmtType
fmtIdent
%%attrname
oldDesignLib
attName
	attAssign
fmtRef1
fmtRef2
%%result
fmtProtect
%%ATTR
	%%N1
%%RESU
ATTASS
ATTNAM
FMTIDE
FMTLIS
FMTNAM
FMTPRO
FMTREF
FMTREF
FMTTYP
OLDDES
PSOURC
PTARGE
Copy Selected Formats'
Progress_Bar/11
Copying '
answer_big/20
An error occurred while copying '
warn'
answer_big/20
Can''t copy '
warn'
128000
answer_big
Memory is getting low!  Continue?'
danger'
pSourceLibRef
pTargetLibRef
fmtName
fmtType
fmtIdent
fmtRef1
fmtRef2
%%result
	memWarned
pFmtList
%%RESU
FMTIDE
FMTNAM
FMTREF
FMTREF
FMTTYP
MEMWAR
	PFMTLI
PSOURC
PTARGE
Compare Proc Text'
 not '
Continue'
Cancel'
danger'
Continue'
answer_big/20
'Library variable '
' appears in '
' but not in '
INDEX
PFMT1
PFMT2
PROCRE
PROCRE
Check Lib Vars'
Progress_Bar/11
'Checking library variables...'
answer_big/20
'Library variable '
' appears in '
' butA
CHECKLIB'
STARTUP
'Library Copier'
'Splash'
answer_big/20
Procedure texts in '
 not identical!'
Continue'
Cancel'
danger'
Continue'
pFmt1
pFmt2
index
%%result
procRef1
procRef2
Splash
g*g=g
''gLgZg
Written by Patrick Rigneyq
Init'
 has changed!'
Continue'
Cancel'
danger'
Continue'
pLib1
pLib2
varList
, but is '
 in '
answer_big/20
Continue'
Cancel'
danger'
Continue'
answer_big/20
'Length of library variable '
' has changed!'
Continue'
Cancel'
danger'
Continue'
answer_big/20
'Initial value of library variable '
ntinue'
Cancel'
danger'
Continue'
answer_big/20
Library variable '
 is '
 in '
, but is '
 in '
Continue'
Cancel'
danger'
Continue'
Library variable '
 is '
 in '
varName
varType
varSubType
	varSubLen
varInitVal
varList2
%%result
%%msg
%result
%%MSG
%%RESU
%RESUL
PLIB1
PLIB2
VARINI
VARLIS
VARLIS
	VARNAM
VARSUB
VARSUB
VARTYP
Format Variables'
fLibList
fLibName
fSortIdent
fCheckSizes
fCheckProcText
0..//.,
Helvetica
1Courier
1Times
fCheckLibVars
FCHEC
/.,,g
prompt_msg!
affirm_answer!
cancel_one!
cancel_two!
mod_mode!
the_answer!
display_icon
AFFIRM
CANCEL
CANCEL
DISPLA
MOD_MO
PROMPT
THE_AN
g	gPq
g	gQq
prompt_msg!
the_answer!
display_icon
DISPLA
PROMPT
THE_AN
prompt_msg
	start_val
end_val
cur_val
whole_bar_width
increment_msg
progress_bar
fCancelHit
CUR_VA
END_VA
FCANCE
INCREM
PROGRE
PROMPT
START_
WHOLE_
gNgEq
Currently on :q
Format Variables'
Library Copier v1.4q
gLg?g
Copyright 
FCHECK
FCHECK
FLIBLI
FLIBNA
FSORTI
/.,,g
(c) 1994, Blyth Software, Inc.
All Rights Reservedq
Use this utility to fully convert formats in Omnis 7 version 1 or version 2 libraries to Omnis 7 version 3 format.q