UniBasic Commands Reference - Rocket Software

In the next example, SWAP does not replace a character with a character, but it
replaces a string with a string. The program segment prints HARRY BELAFONTE.
1-892 UniBasic Commands Reference
STRING = 'MARION BELAFONTE'
SWAP 'MARION' WITH 'HARRY' IN STRING
PRINT STRING
The following program first creates a string that contains the null value, then calls a
subroutine that converts UniData delimiters and the null value to characters that can
be displayed or printed. Next, the program swaps the null value for another string
(“def”), calls the conversion subroutine again, and prints the string again.
A = @AM:"abc":@VM:@NULL:@VM:"ghi":@AM:"jkl"
B = A
CALL null.swap(B)
PRINT B
SWAP @NULL WITH "def" IN A
B = A
CALL null.swap(B)
PRINT B
The called subroutine is:
SUBROUTINE null.swap(B)
SWAP @NULL WITH "null" IN B
SWAP @AM WITH " " IN B
SWAP @VM WITH " " IN B
SWAP @SM WITH " " IN B
RETURN
This program prints:
:RUN BP null.swap.test
abc null ghi jkl
abc def ghi jkl
Related Command
UniBasic
CONVERT