You can try following Code to Post Production Journal BOM in axapta.
ProdJournalCheckPostBOM PJCPostBOM;
;
ttsbegin;
PJCPostBOM = ProdJournalCheckPostBOM::newPostJournal(“Prod0003“,true);
PJCPostBOM.run();
ttscommit;