0LASubrUtilSubrWriteIlf < Main

Tags: view all tags
---+ .UTIL SUBR WRITE ILF

_This subroutine writes ILF code to a subroutine in the Application. Added in 5.2.0_

<br />%TOC%
---++ Usage:
<pre>      PASS         &lt;ilf_verb&gt;                 FIELD            SHARE? N
      PASS         &lt;TF_flags&gt;                 FIELD            SHARE? N
      PASS         &lt;opt_fields_as_needed&gt;     FIELD            SHARE? N
      GOSUB    --- .UTIL SUBR WRITE ILF
      *        Check for errors
      IF       --- .UTIL SUBR WRITE ILF       NE
</pre>
---++ Description:

This subroutine adds an ILF line to a subroutine. The &lt;ilf_verb&gt; parameter is required, if it is missing or an unknown verb, the subroutine will CANCEL.

&lt;ilf_verb&gt; is the name of the ILF statement you want to add (Required).

&lt;tf_flags&gt; are the TF flags for the ILF statement you want to add. If the statement normally has TF flags then &lt;tf_flags&gt; are required and you can just PASS blanks (i.e. --- SPACE) where no TF flags apply. For statements that don’t have TF flags, like a * (comment) or LABEL statement, &lt;tf_flags&gt; are not required. For example, you would add a LABEL statement as follows:

<pre>      PASS         LABEL                      FIELD            SHARE? N
      PASS         :NEWLABEL                  FIELD            SHARE? N
      GOSUB    --- .UTIL SUBR WRITE ILF</pre>

&lt;opt_fields_as_needed&gt; are the fields that define the parameters for the statement to be created. Just pass all the field you would normally see as editable when adding the statement in left to right order. You can omit passing all blank fields past the last field you want a value in. For example, to SET --- TEMP 30 to --- TEMP 80 on a TRUE you would pass.

<pre>      PASS         SET                        FIELD            SHARE? N
      PASS         T                          FIELD            SHARE? N
      PASS         ---                        FIELD            SHARE? N
      PASS         TEMP 30                    FIELD            SHARE? N
      PASS     --- SPACE                      FIELD            SHARE? N
      PASS         ---                        FIELD            SHARE? N
      PASS         TEMP 80                    FIELD            SHARE? N
      PASS     --- SPACE                      FIELD            SHARE? N
      GOSUB    --- .UTIL SUBR WRITE ILF</pre>

Also see <span style="text-decoration: underline;"> [[0LASubrUtilSubrClose][.UTIL SUBR CLOSE]] </span>and <span style="text-decoration: underline;"> [[0LASubrUtilSubrDelete][.UTIL SUBR DELETE]]</span>.

Note that the .UTIL SUBR * group of routines share certain internal fields therefore you can only use them in a process family with share class SUBPROCESS. In other words, don't call .UTIL SUBR CREATE in one process, then .UTIL SUBR WRITE ILF in another process that you have invoked Related or Detached.
---++ Comments:

_Read what other users have said about this page or add your own comments._

You must run the .UTIL SUBR CREATE before calling .UTIL SUBR WRITE ILF. Also consider using .UTIL SUBR DELETE to remove the subroutine from your design when finished.

To create a LABEL simply pass the verb LABEL and the label name. T/F indicators are not required in this statement.

-- Main.JeffPrentice - 2013-10-17
%COMMENT%

-- Main.PeteBrower - 2012-09-28
Topic revision: r6 - 2020-05-12 - JeanNeron