method MainBlock

Description

This method can be extended with code to execute when a business component is started.
Use it to initialise data items that are not part of the business component state.
(Data items that are part of the business component state should be initialised in InitInstance.)

PreCondition

This method is run when r-code for this component or a descendant component is loaded into memory. It is not to be confused with InitInstance, which is run when an instance is started.

Parameters

oiReturnStatus

output

integer

Return status of the method.

Internal usage

unused

program code (program/mail.p)

assign vcBase64Chars[1] = 'A':U
       vcBase64Chars[2] = 'B':U
       vcBase64Chars[3] = 'C':U
       vcBase64Chars[4] = 'D':U
       vcBase64Chars[5] = 'E':U
       vcBase64Chars[6] = 'F':U
       vcBase64Chars[7] = 'G':U
       vcBase64Chars[8] = 'H':U
       vcBase64Chars[9] = 'I':U
       vcBase64Chars[10] = 'J':U
       vcBase64Chars[11] = 'K':U
       vcBase64Chars[12] = 'L':U
       vcBase64Chars[13] = 'M':U
       vcBase64Chars[14] = 'N':U
       vcBase64Chars[15] = 'O':U
       vcBase64Chars[16] = 'P':U
       vcBase64Chars[17] = 'Q':U
       vcBase64Chars[18] = 'R':U
       vcBase64Chars[19] = 'S':U
       vcBase64Chars[20] = 'T':U
       vcBase64Chars[21] = 'U':U
       vcBase64Chars[22] = 'V':U
       vcBase64Chars[23] = 'W':U
       vcBase64Chars[24] = 'X':U
       vcBase64Chars[25] = 'Y':U
       vcBase64Chars[26] = 'Z':U
       vcBase64Chars[27] = 'a':U
       vcBase64Chars[28] = 'b':U
       vcBase64Chars[29] = 'c':U
       vcBase64Chars[30] = 'd':U
       vcBase64Chars[31] = 'e':U
       vcBase64Chars[32] = 'f':U
       vcBase64Chars[33] = 'g':U
       vcBase64Chars[34] = 'h':U
       vcBase64Chars[35] = 'i':U
       vcBase64Chars[36] = 'j':U
       vcBase64Chars[37] = 'k':U
       vcBase64Chars[38] = 'l':U
       vcBase64Chars[39] = 'm':U
       vcBase64Chars[40] = 'n':U
       vcBase64Chars[41] = 'o':U
       vcBase64Chars[42] = 'p':U
       vcBase64Chars[43] = 'q':U
       vcBase64Chars[44] = 'r':U
       vcBase64Chars[45] = 's':U
       vcBase64Chars[46] = 't':U
       vcBase64Chars[47] = 'u':U
       vcBase64Chars[48] = 'v':U
       vcBase64Chars[49] = 'w':U
       vcBase64Chars[50] = 'x':U
       vcBase64Chars[51] = 'y':U
       vcBase64Chars[52] = 'z':U
       vcBase64Chars[53] = '0':U
       vcBase64Chars[54] = '1':U
       vcBase64Chars[55] = '2':U
       vcBase64Chars[56] = '3':U
       vcBase64Chars[57] = '4':U
       vcBase64Chars[58] = '5':U
       vcBase64Chars[59] = '6':U
       vcBase64Chars[60] = '7':U
       vcBase64Chars[61] = '8':U
       vcBase64Chars[62] = '9':U
       vcBase64Chars[63] = '+':U
       vcBase64Chars[64] = '/':U.
       
set-size(vmEmpty) = 0.

<ANCESTOR-CODE>