/IF NOT DEFINED (HEAP_QRPGLEH)
      /DEFINE HEAP_QRPGLEH
      *-----------------------------------------------------
     D createHeap      PR                  EXTPROC('CEECRHP')
     D handle                        10i 0
     d size                          10i 0 CONST OPTIONS(*OMIT)
     d incr                          10i 0 CONST OPTIONS(*OMIT)
     d allocStrat                    10i 0 CONST OPTIONS(*OMIT)
     d feedback                      12a   OPTIONS(*OMIT)
      *-----------------------------------------------------
     D discardHeap     PR                  EXTPROC('CEEDSHP')
     D handle                        10i 0
      *-----------------------------------------------------
     D allocHeap       PR                  EXTPROC('CEEGTST')
     D handle                        10i 0 CONST
     D size                          10i 0 CONST
     d adress                          *
     d feedback                      12a   OPTIONS(*OMIT)
      *-----------------------------------------------------
     D reallocHeap     PR                  EXTPROC('CEECZST')
     D adress                          *
     D size                          10i 0 CONST
     d feedback                      12a   OPTIONS(*OMIT)
      *-----------------------------------------------------
     D freeStorage     PR                  EXTPROC('CEEFRST')
     D adress                          *
     d feedback                      12a   OPTIONS(*OMIT)
      *-----------------------------------------------------
      /ENDIF