-   script  ABCD    -1,{
mes "1st Line";
mes "Something Else";
next;
mes "4th Line";
mes "Something Else2";
.........
} BEFORE
 
-->>
 
-   script  ABCD    -1,{
getmessages(1);
next;
getmessages(2);
}
 
function    getmessages {
    SOME Query
    mes with Query Result
    return;
}