Error in Routines

Vinodanand · Post by **Vinodanand** » Tue Apr 04, 2006 8:52 am

Hi,

I am getting the folowwing error in my routine 1 Errors detected, No Object Code Produced. Can any one help me on this....

DSguru2B · Post by **DSguru2B** » Tue Apr 04, 2006 8:56 am

can you send us the code. I believe there is a statment in your routine that the compiler is not able to construct. Need more info

Vinodanand · Post by **Vinodanand** » Tue Apr 04, 2006 9:04 am

month = PD[6,7] - Counter
If month <= 0 then
day = PD[9,10]
yr = PD[1,4]
month = 12
yr -= 1
Date = yr:'-':month:'-':day
Else
day = PD[9,10]
yr = PD[1,4]
Date = yr:'-':month:'-':day
End;
Ans = Date

here PD & Counter are input arguments...

kumar_s · Post by **kumar_s** » Tue Apr 04, 2006 9:18 am

May I know how you use this basic routine in your PX jobs

DSguru2B · Post by **DSguru2B** » Tue Apr 04, 2006 9:20 am

Try this

Code: Select all

month = ''
day = ''
yr = ''
Date = ''
ay = ''
month = PD[6,7] - Counter 
If month <= 0 then 
    day = PD[9,10]  
    yr = PD[1,4] 
    month = 12 
    yr = yr - 1 
    Date = yr:"-":month:"-":day 
End
If month > 0 then
day = PD[9,10] 
yr = PD[1,4] 
Date = yr:"-":month:"-":day 
End
Ans = Date

DSguru2B · Post by **DSguru2B** » Tue Apr 04, 2006 9:23 am

Really, is it a PX forum. I thought he mention in the Job Type "Server"

Vinodanand · Post by **Vinodanand** » Tue Apr 04, 2006 9:28 am

DSguru2B wrote:Really, is it a PX forum. I thought he mention in the Job Type "Server"

No its a server routine i'm talkin about

DSguru2B · Post by **DSguru2B** » Tue Apr 04, 2006 9:32 am

in your original code. you missed one one End. and there is no semicolon used after the last End.
heres your code. and the changes in bold

month = PD[6,7] - Counter
If month <= 0 then
day = PD[9,10]
yr = PD[1,4]
month = 12
yr -= 1
Date = yr:'-':month:'-':day
End
Else
day = PD[9,10]
yr = PD[1,4]
Date = yr:'-':month:'-':day
End
Ans = Date

Also, it would be nice if you could initilize the variables you are using. Otherwise you will see a warning in the director.

Vinodanand · Post by **Vinodanand** » Tue Apr 04, 2006 9:38 am

Hey guru,

Thnx mann.. It got compiled but what was the diff.. Do u mean that every variable should be initialized an initial value ...

Can we have an if else statement , if so hw can u give me an example..

DSguru2B · Post by **DSguru2B** » Tue Apr 04, 2006 9:45 am

Look at my previous post. The problem was not that you forgot to initilize the variables. The compiler wont give you the error that you were getting if you dont initize the variables.
Your problem was that you were missing one End.
for eg

Code: Select all

if (condition) then
statement 1
statement 2
statement 3
End
else
statement 7
statement 8
statement 9
End

The problem in your code was that you were missing the 'End' after statement 3 in my eg. above. Also you had a trailing semicolon ; after your last End.
Thats why the compiler was spitting back the code because it was not able to recognize the syntax.
Your only issue was syntax. And not the initilizing of the variables.

Code: Select all

BUT

, if you dont initilize your variables, you will see a warning in the director (log files) and not while compiling and testing the routine.
I hope that helps

DSguru2B · Post by **DSguru2B** » Tue Apr 04, 2006 10:05 am

And yea next time please post questions under right forum.
ADMIN: PLEASE MOVE THIS POST TO SERVER

Vinodanand · Post by **Vinodanand** » Tue Apr 04, 2006 10:09 am

thnx once again and by the way i have posted in the right forum

ArndW · Post by **ArndW** » Tue Apr 04, 2006 10:11 am

Vinodand,

you have posted to the PX forum and this is a server issue

If you use indentation or at least autoformat your jobs in the manager it would make the jobs easier to read, maintain and this error most likely would have been visible right away.

Vinodanand · Post by **Vinodanand** » Tue Apr 04, 2006 10:14 am

I'm sorry guys ... and thanks for the help.