WIP*更新生产批详细信息行产品配料

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58

DECLARE      l_batch_header_rec    gme_batch_header%ROWTYPE;      l_material_detail_rec gme_material_details%ROWTYPE;      x_material_detail_rec gme_material_details%ROWTYPE;      x_message_count       NUMBER;      x_message_list        VARCHAR2(240);      x_return_status       VARCHAR2(240); BEGIN      mo_global.set_policy_context('S',                                                                                   81);      fnd_global.apps_initialize(user_id      => 0,                                                                              resp_id      => 50783,                                                                              resp_appl_id => 555);                                                                  l_batch_header_rec.batch_id              := 41381;      --l_material_detail_rec.line_type          := -1;      l_material_detail_rec.material_detail_id := 72641;      l_material_detail_rec.plan_qty           := 93.706;      --l_material_detail_rec.material_detail_id := 72642;      --l_material_detail_rec.plan_qty := 39.3;      gme_api_pub.update_material_line(p_api_version         => 2.0,                                                                                              p_validation_level    => gme_common_pvt.g_max_errors,                                                                                              p_init_msg_list       => fnd_api.g_false,                                                                                              p_commit              => fnd_api.g_false,                                                                                              p_batch_header_rec    => l_batch_header_rec,                                                                                              p_material_detail_rec => l_material_detail_rec,                                                                                              p_locator_code        => NULL,                                                                                              p_org_code            => 'NXS',                                                                                              p_scale_phantom       => fnd_api.g_false,                                                                                              p_validate_flexfields => fnd_api.g_false,                                                                                              x_material_detail_rec => x_material_detail_rec,                                                                                              x_message_count       => x_message_count,                                                                                              x_message_list        => x_message_list,                                                                                              x_return_status       => x_return_status);      dbms_output.put_line('x_message_count:' || x_message_count);      dbms_output.put_line('x_message_list:' || x_message_list);      dbms_output.put_line('x_return_status:' || x_return_status);      IF (x_return_status <> 'S') THEN            dbms_output.put_line('更新失败');                   IF x_message_count >= 1 THEN                 FOR i IN 1 .. x_message_count                 LOOP                       dbms_output.put_line(i || '. ' || substr(fnd_msg_pub.get(p_encoded => fnd_api.g_false),                                                                                                                                    1,                                                                                                                                    255));                                   END LOOP;                         END IF;      ELSE            dbms_output.put_line('更新成功');      END IF; EXCEPTION      WHEN OTHERS THEN            dbms_output.put_line('处理异常'); END;