Detail Display Edits
From Cassandra
Find a detail display for any IND/DEP block and go to the "Code -> Source Code" detail display. Open this display in Foxdraw.
Open Display Command Script
Put the following code in the "Open Display Command Script" (File->Display Properties->Script tab)
run cp d:$SEQ_S d:/tmp/$P2.s
msglin $SEQ
= P5 `$P1:$P2.TYPE`
== $P5 178 = P5 IND
== $P5 176 = P5 DEP
== $P5 171 = P5 EXC
msglin $P5
It basically sets a variable P5 to show the block type on the msglin.
Close Display Command Script
Put the following code in the "Close Display Command Script" (File->Display Properties->Script tab)
run rm d:/tmp/$P2.*
run rm d:/tmp/putseq.*
run rm d:/tmp/compseq.*
This is to clean up files
Add Buttons to perform actions
Create an Edit Code button on the detail display and put the following line as a DM_Command action.
run $SystemRoot/system32/write.exe d:/tmp/$P2.s
This will open the code using Write.exe in a window to allow editing.
Create an Compile Code button on the detail display and put the following line as a DM_Command action.
applic "/opt/fox/dd_1/seq/compile.ksh $P1 $P2 $P1:$P2 $DD $SEQ_S $SEQ"
This is to pass the Compound Block Compound:Block and file information to the compile script.
Create an View Compile Listing button on the detail display and put the following line as a DM_Command action.
run %windir%/system32/write.exe d:/tmp/$P2.l
Just in case you want view the compiled file and verify before comiting.
Create an Save to Library button on the detail display and put the following line as a DM_Command action.
run cp d:$SEQ_S d:\opt\fox\ciocfg\sequenlibrary\$P2.s
Again, just in case you want another copy...
Create an Send Code to Aw's button on the detail display and put the following line as a DM_Command action.
applic "/opt/fox/dd_1/seq/sendcode.ksh $P1 $P2 $P1:$P2 $DD $SEQ_S $SEQ"
Even though the Compile.ksh does distribute the code to the other stations this will do it manually.
