Code to Post Production Journal BOM in MSD axapta

You can try following  Code to Post Production Journal BOM in axapta.

 ProdJournalCheckPostBOM PJCPostBOM;  
 ;  
 ttsbegin;  
 PJCPostBOM = ProdJournalCheckPostBOM::newPostJournal(“Prod0003“,true);  
 PJCPostBOM.run();  
 ttscommit;