(GIN Macro)
Defined in: MACROS SAR
Used in: WHATPERA867
5P6G [ 5PL6 [ 5Q5Q #MAC PROPNAME 5QKB # 5R52 [ THIS MACRO GIVES THE PROPERTY NAME OF A PROPERTY NUMBER: 5RJL [ THE PROPERTY NUMBER IS FOUND IN %A. 5S4= [ THE PROPERTY NAME IS LEFT IN ACOMMUNE1-ACOMMUNE3. 5SHW [ B0/B1 SET IN ACOMMUNE4 IF PROPERTY IS EXCL/PERM 5T3G [ :SYSTEM.PROPERTY IS FOUND OPEN AND LEFT OPEN 5TH6 # 5W2Q BRN M1 5WGB MEXCL #40000000 5X22 MPERM #20000000 5XFL M1 LDX 4 %A 5X^= SLL 4 2 5YDW REWIND 5YYG MSTEP STEP 5^D6 LDX 5 APROPNO(3) 5^XQ SLL 5 2 62CB TXU 5 4 62X2 BCS MSTEP 63BL LDN 4 APROPNAME(3) 63W= STOZ ACOMMUNE4(2) 64*W LDN 5 ACOMMUNE1(2) 64TG MOVE 4 3 65*6 LDX 4 APROPNO(3) 65SQ BPZ 4 MNOT 66#B LDX 5 MEXCL(1) 66S2 ORS 5 ACOMMUNE4(2) 67?L MNOT SLL 4 1 67R= BPZ 4 MOUT 68=W LDX 4 MPERM(1) 68QG ORS 4 ACOMMUNE4(2) 69=6 MOUT 69PQ #NOR