JESUS IS LORD!

JESUS IS LORD, and believe in your heart that GOD raised HIM from the
dead, thou shalt be saved, and thy house.(cf. THE HOLY BIBLE: ROMANS
10:9 and ACTS 16:31b)

Have you received THE LORD GOD OF ISRAEL’S MOST BELOVED and ONLY
BEGOTTEN SON, THE LORD JESUS CHRIST, to be your personal Lord and
Savior?

If not, say this prayer: “LORD GOD, please forgive me of my sins.
Thank YOU for YOUR Faithfulness in always being with me and loving me
so much to send me YOUR MOST BELOVED and ONLY BEGOTTEN SON, THE LORD
JESUS CHRIST, to die on the cross for me. I receive HIM now into my
heart and life to be my Lord and Savior. I pray this in the name of
GOD, THE FATHER; GOD, THE SON; and GOD, THE HOLY SPIRIT. â€* Amen.â€�

“So let everyone in Israel know for certain that GOD has made this
JESUS, whom you crucified, to be both Lord and Messiah!� ACTS 2:36

"For I say unto you, Ye shall not see me henceforth, till ye shall
say, Blessed is he that cometh in the name of the Lord." Matthew 23:39

Visit and share with family, friends, fans, and followers:
www.BIBLEstudycd.com/Lessons.html

May you be blessed abundantly! Hallelujah!

THE GOSPEL:
http://www.ebible.com/kjv/Matthew
http://www.ebible.com/kjv/Mark
http://www.ebible.com/kjv/Luke
http://www.ebible.com/kjv/John

>snip
> JESUS IS LORD, and believe in your heart that GOD raised HIM from the
>snip

I think that your syntax is incorrect. Try this...
***Partially Tested***
////////////////////////////////////////////////
Procedure Jesus_Is_Lord(alive,sins,rapture);
const Trinity:=3;
var
Saved:Boolean;
begin
while (alive=true) do
repeat
Try
Confess_Sins(Sins);
Repent(Sins);
Ask_Forgiveness(Sins);
Finally
Accept_Forgiveness(Sins);
end;
Until (Saved=true) or (Now>Rapture);
end;