MX-1
call  "ICHEXA"  using  Dat-1  [Dat-2]
                               Num-2
    

                                                                 MX-1
call  "ICMOVEX"  using  Dat-1  Dat-2  [Dat-3]
                                       Num-3
    

                                                                 MX-1
call  "ICMVC"  using  DatX-1  Dat-2  DatX-3  Dat-4  Dat-5
                              Num-2          Num-4  Num-5

Remarks:
   - DatX-1 is sending item, DatX-3 is receiving one
   - operand-2 and operand-4 are relative positions in them (from 0)
   - operand-5 is the length of transfer
    

                                                                 MX-1
call  "ICPACKB"  DatX-8  DatX-1
    

                                                                 Ex-a
000000*
       working-storage section.
       77   B pic x(8).
       77   X pic x.
       procedure division.
            call "ICPACKB" using B X.
    

                                                                 MX-1
call  "ICUNPKB"  DatX-1  DatX-8
    

                                                                 Ex-a
000000*
       working-storage section.
       77   X pic x.
       77   B pic x(8).
       procedure division.
            call "ICUNPKB" using X B.
    

                                                                 MX-1
call  "ICUGETV"  using  Dat-1  [Dat-2]
                                Num-2
    

                                                                 MX-1
call  "ICUFREE"  using  Dat-1
    

                                                                 MX-1
call  "ICVIRG"  using  Dat-1  [Dat-2]  DatX-3  "READ"
                               Num-2   LitX-3  "UPDATE"
                                                "WRITE"
                                                "APPEND"
    

                                                                 MX-1
call  "ICVIRF"  using  Dat-1  [Dat-2]
                               Num-2
    

                                                                 MX-1
call  "ICSORT"  using  Dat-1  [Dat-2]
                               Num-2
                               Ind-2
    

                                                                 Ex-a
000000*
       working-storage section.
       1   TAB.
        2   F pic 99.
        2   TXT pic x(20) occurs 10
            ascending TXT indexed I depending F.
       procedure division.
           call "ICSORT" using TXT F.
    

                                                                 MX-1
call  "ICVOLNY"  using  DatX-1  Dat9-2  Dat9-3

The result-code Dat9-3:
   0 - all is OK
   1 - positions from right was truncated
   2 - positions from left was truncated
   3 - 1 and 2
   4 - sending sign was ignored
   5 - 1 and 4
   6 - 2 and 4
   7 - 3 and 4
   8 - non-conform sending value - receiving item is not changed
    

                                                                 MX-1
call  "ICTIMEB"
    

                                                                 Ex-a
000000*
       working-storage section.
       1   SEC pic 9(8).
       procedure division.
           call "ICTIMEB".
           move tally to SEC.
           exhibit named SEC.
           stop " ".
           call "ICTIMEB".
           move tally to SEC.
           exhibit named SEC.
           stop " ".
    

                                                                 MX-1
call  "ICGEN"
    

                                                                 Ex-a
000000*
       working-storage section.
       1   GEN pic 9(8).
       procedure division.
           call "ICGEN".
           move tally to GEN.
           exhibit named GEN.
           call "ICGEN".
           move tally to GEN.
           exhibit named GEN.
           stop " ".
    

                                                                 MX-1
call  "ICF.."  using  Dat9-1  Dat9-2
                      Lit9-1

Remarks:
   - first operand = source argument, second one = output destination
   - list of corresponding functions in Borland Turbo C language:
          ICFLOG   = log(x),
          ICFLOG10 = log10(x),
          ICFEXP   = exp(x),
          ICFSQRT  = sqrt(x),
          ICFSIN   = sin(x),
          ICFCOS   = cos(x),
          ICFTAN   = tan(x),
          ICFCOTAN = 1./tan(x),
          ICFARSIN = asin(x),
          ICFARCOS = acos(x),
          ICFATAN  = atan(x),
          ICFSINH  = sinh(x),
          ICFCOSH  = cosh(x),
          ICFTANH  = tanh(x),
          ICFERF   = erf(x),
          ICFERFC  = erfc(x) = 1.0 - erf(x),
          ICFABS   = fabs(x),
          ICFLOOR  = floor(x),
          ICFCEIL  = ceil(x),
          ICFJ0    = j0(x),
          ICFJ1    = j1(x),
          ICFY0    = y0(x),
          ICFY1    = y1(x),
          ICFGAMMA = exp(gamma(x)),
          ICFLGAMA = gamma(x),