----- Original Message ----- 
From: "Caleb Ng" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Thursday, December 08, 2005 2:10 PM
Subject: [U2] Deciphering Pick UniBasic statement


> I'm trying to decipher and break the following IF/THEN/ELSE statement
> into multiple lines because I need to add some logic into it.   Being a
> PICK newbie, I'm having difficulty understanding it.  I believe this
> code was ported from an old MD Pick system but I want to make sure it
> behaves in a similar fashion once I break it apart.  I'm sure this will
> be no problem to gurus like yourselves.

IF P(2)-AR(12)<=28 THEN CC=CC+1; INS 0 BEFORE AR(14)<1,1>; DEL
AR(14)<1,9>; ELSE IF AR(13)=DATE() THEN CC=CC ELSE INS 1 BEFORE
AR(14)<1,1>; DEL AR(14)<1,9>

> 
     IF P(2)-AR(12) <= 28 THEN
         CC=CC+1
         INS 0 BEFORE AR(14)<1,1>
         DEL AR(14)<1,9>
    END ELSE
         IF AR(13) = DATE() THEN 
             CC=CC
         END ELSE
             INS 1 BEFORE AR(14)<1,1>
             DEL AR(14)<1,9>
         END
    END
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to