Deliberately uncommented in order for your discovery processes to be unhindered by preconception.
DEFINE !A ()
a,b,c,d,e,f,g
!ENDDEFINE.
DEFINE !B ()
h,i,j,k,l,m,n
!ENDDEFINE.
DEFINE !ANY (!POS !CHAREND('/') / !POS !CMDEND )
!IF ( !HEAD(!1) !NE !NULL)!THEN
COMPUTE !CONCAT('Calc_',!HEAD(!1),'_',!HEAD(!2))=
ANY(!QUOTE(!HEAD(!1)),!CONCAT('!',!HEAD(!2)) ) .
!ANY !TAIL(!1) / !TAIL(!2) ).
!IFEND
!ENDDEFINE.
SET MPRINT ON.
SET PRINTBACK ON.
DATA LIST FREE /a b c d e f g h i j k l m n (14A1).
BEGIN DATA
A V B S U S I C V S E H J K
U S H N M K O E W A C D B A
END DATA.
!ANY S W /A B .
LIST.
Please reply to the list and not to my personal email.
Those desiring my consulting or training services please feel free to email me.
---
"Nolite dare sanctum canibus neque mittatis margaritas vestras ante porcos ne forte conculcent eas pedibus suis."
Cum es damnatorum possederunt porcos iens ut salire off sanguinum cliff in abyssum?"
Locked
